examples/tempTest.spl

   1 //plus(x,y){
   2 //    return x+y;
   3 //}//
   4
   5 map(f, xs) {
   6     if (isEmpty(xs)) {
   7         return [];
   8     } else {
   9         return f(xs.hd) : map(f, xs.tl);
  10     }
  11 }
  12
  13 foldr(f, acc, xs) {
  14     if(isEmpty(xs)) {
  15         return acc;
  16     } else {
  17         return foldr(f, f(xs.hd, acc), xs.tl);
  18     }
  19 }
  20
  21 l2(x) :: Int -> Void {
  22     //return print(3);
  23     var y = print(3);
  24     return;
  25 }
  26
  27 main() {
  28     //var f = \x->print(x);
  29     var z = map(\x->print(3), 1:2:[]);
  30     var x = print(3);
  31     //var x = foldr(\x y->x+y, 0, 1:2:[]);
  32     //print(x);
  33     return;
  34 }