add string literals

[cc1516.git] / examples / codeGen.spl

diff --git a/examples/codeGen.spl b/examples/codeGen.spl
index e5d938b..7e78897 100644 (file)
--- a/examples/codeGen.spl
+++ b/examples/codeGen.spl
@@ -26,6 +26,15 @@ isE(x) :: [a] -> Bool {
     }
 }
 
+test() {
+    var x =print(5);
+    var f = read;
+    var y = read();
+    print(True);
+    print('a');
+    print('h' : 'o' : 'i' : []);
+}
+
 main() {
  //   [Int] x2 = 0 : x1;
  //   [Int] x3 = [];
@@ -38,6 +47,9 @@ main() {
     var x = (True, 5) : (False,0) : [];
     var sdaf = isE(x1);
     var z = isEmpty(x1);
+    //char c = read();
     x.hd.snd = 8;
+    isE(x1);
+    print(4);
     return;
 }