examples/StmtEx.spl

   1 var x = True;
   2 var y = 3;
   3 var z = 3 + y;
   4 Int a = facR(4);
   5 //Int b = test(3);
   6 var f = beep();
   7 var n = True;
   8 var l = 1:2:[];
   9
  10 facR(n) :: Int -> Int {
  11     test(3);
  12     if (True) {
  13         return 3;
  14     } else {
  15         return 4;
  16     }
  17     return 5;
  18 }
  19
  20 test(e) :: Int -> Bool {
  21     var i = 0;
  22     i = 1;
  23     l.tl = 4:[];
  24     l.tl.hd = 3;
  25     //l= 1:3:[]
  26     facR(z);
  27     while (e < 3) {
  28         return True;
  29     }
  30 }
  31
  32 beep() {
  33     boop();
  34 }
  35
  36 boop() {
  37     beep();
  38 }