mech-io 0.2.45

Input/output library for the Mech language
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58

extern crate crossbeam_channel;
use mech_core::*;
use mech_utilities::*;
use crossbeam_channel::Sender;

lazy_static! {
  static ref IO_OUT: u64 = hash_str("io/out");
  static ref TEXT: u64 = hash_str("text");
  static ref COLOR: u64 = hash_str("color");
}

export_machine!(io_out, io_out_reg);

extern "C" fn io_out_reg(registrar: &mut dyn MachineRegistrar, outgoing: Sender<RunLoopMessage>, capability_token: &CapabilityToken) -> Result<String,MechError> {
  match capability_token.verify_capability(&Capability::StdOut) {
    Ok(()) => {
      registrar.register_machine(Box::new(Out{outgoing}));
      Ok("#io/out = [|text<string> color<u32>|]".to_string())      
    },
    Err(x) => Err(x),
  }
}

#[derive(Debug)]
pub struct Out {
  outgoing: Sender<RunLoopMessage>,
  //printed: usize,
}

impl Machine for Out {

  fn name(&self) -> String {
    "io/out".to_string()
  }

  fn id(&self) -> u64 {
    hash_str(&self.name())
  }

  fn on_change(&mut self, table: &Table) -> Result<(), MechError> {
    for i in 1..=table.rows {
      let text = table.get(&TableIndex::Index(i),&TableIndex::Alias(*TEXT))?;
      let color = table.get(&TableIndex::Index(i),&TableIndex::Alias(*COLOR))?;
      match (text,color) {
        (Value::String(string),_) => {
          println!("{:?}", string);
        }
        (Value::Bool(truth),_) => {
          println!("{:?}", truth);
        }
        x => {return Err(MechError{tokens: vec![], msg: "".to_string(), id: 8395, kind: MechErrorKind::GenericError(format!("{:?}",x))})},
      }
    }
    //table.clear();
    Ok(())
  }
}