examples/codeGen.spl

   1 //f(x, y) {
   2 //    var ret = 0;
   3 //    if (x < y) {
   4 //         ret = x;
   5 //    }
   6 //    else {
   7 //        ret = y;
   8 //    }
   9 //    return ret;
  10 //}//
  11
  12 //main() {
  13 //      Int x1 = 1;
  14 //    var x2 = 4;
  15 //    var x3 = f(x1, x2);
  16 //    print(x1);
  17 //    x1 = 5;
  18 //    return x3 + x1;
  19 //}
  20
  21 Let Int x = 5;
  22
  23 isE(x) :: [a] -> Bool {
  24     if (x == []) {
  25         return True;
  26     } else {
  27         return False;
  28     }
  29 }
  30
  31 test() {
  32     var x =print(5);
  33     //var f = read;
  34     var y = read();
  35     print(True);
  36     print('a');
  37     print('h' : 'o' : 'i' : []);
  38 }
  39
  40 main() {
  41  //   [Int] x2 = 0 : x1;
  42  //   [Int] x3 = [];
  43  //   (Int, Bool) x4 = (4, True);
  44  //   //Bool y1 = isEmpty(x2); //gives weird type error, not sure why
  45 //    isEmpty(x2);
  46     [Int] x1 = 8 : 2 : [];
  47     (Bool, Int) z = (True, 2);
  48         var y = z.fst;
  49     var x = (True, 5) : (False,0) : [];
  50     var sdaf = isE(x1);
  51     var z = isEmpty(x1);
  52     //char c = read();
  53     x.hd.snd = 8;
  54     isE(x1);
  55     print(4);
  56     return;
  57 }