diff options
| author | bnewbold <bnewbold@robocracy.org> | 2016-12-19 09:21:35 +0000 | 
|---|---|---|
| committer | bnewbold <bnewbold@robocracy.org> | 2016-12-19 09:21:35 +0000 | 
| commit | 0adbd20ff8b4d4f8156ee941d3d0b17e80c3a80f (patch) | |
| tree | e8c30003fb45b95e32d3981adc12181096587fe1 /src/transpile_scheme.rs | |
| parent | d60554fce09f8be1bb4d96a83db49577dfbf550d (diff) | |
| download | modelthing-0adbd20ff8b4d4f8156ee941d3d0b17e80c3a80f.tar.gz modelthing-0adbd20ff8b4d4f8156ee941d3d0b17e80c3a80f.zip | |
tweaks to work with modelica-parser-lalrpop
Diffstat (limited to 'src/transpile_scheme.rs')
| -rw-r--r-- | src/transpile_scheme.rs | 7 | 
1 files changed, 6 insertions, 1 deletions
| diff --git a/src/transpile_scheme.rs b/src/transpile_scheme.rs index 5c8bd66..79492d8 100644 --- a/src/transpile_scheme.rs +++ b/src/transpile_scheme.rs @@ -46,14 +46,19 @@ impl TranspileScheme for Expr {          match *self {              Integer(e) => Ok(format!("{}", e)),              Float(e) => Ok(format!("{}", e)), +            Boolean(true) => Ok(format!("#t")), +            Boolean(false) => Ok(format!("#f")), +            StringLiteral(ref s) => Ok(format!("\"{}\"", s)),              Ident(ref e) => Ok(format!("{}", e)),              Der(ref e) => Ok(format!("(der {})", try!(e.repr_scheme()))), -            Abs(ref e) => Ok(format!("(abs {})", try!(e.repr_scheme()))), +            Sign(ref e) => Ok(format!("(sign {})", try!(e.repr_scheme()))), +            MathUnaryExpr(func, ref e) => Ok(format!("({:?} {})", func, try!(e.repr_scheme()))),              BinExpr(op, ref l, ref r) =>                  Ok(format!("({:?} {} {})",                      op,                      try!(l.repr_scheme()),                      try!(r.repr_scheme()))), +            Array(_) => Err("Array unimplemented".to_string()),          }      }  } | 
