X-Git-Url: http://git.joshuawise.com/snipe.git/blobdiff_plain/6c5506c5b97dabd72ba38c1f033dc4fded52cbfd..e63d3705454c62fd1eff1c0c9cd78f042e621fbc:/trans/tree.sml?ds=sidebyside

diff --git a/trans/tree.sml b/trans/tree.sml
index 2111fc1..d03180e 100644
--- a/trans/tree.sml
+++ b/trans/tree.sml
@@ -23,6 +23,7 @@ sig
     | CALL of Ast.ident * exp list
     | MEMORY of exp
     | ALLOC of exp
+    | STRING of Stringref.stringref
     | COND of exp * exp * exp
     | STMVAR of stm list * exp
     | NULLPTR
@@ -55,6 +56,7 @@ struct
     | CALL of Ast.ident * exp list
     | MEMORY of exp
     | ALLOC of exp
+    | STRING of Stringref.stringref
     | COND of exp * exp * exp
     | STMVAR of stm list * exp
     | NULLPTR