view graal/com.oracle.truffle.sl.test/tests/Call.sl @ 18665:96861e3f8cc5

made CFGPrinterObserver reset (upon close) properly
author Doug Simon <doug.simon@oracle.com>
date Thu, 11 Dec 2014 22:14:30 +0100
parents b16ec83edc73
children
line wrap: on
line source

function ret(a) { return a; } 
function dub(a) { return a * 2; } 
function inc(a) { return a + 1; } 
function dec(a) { return a - 1; } 
function call(f, v) { return f(v); }
 
function main() {  
  println(ret(42));
  println(dub(21));
  println(inc(41));
  println(dec(43));
  println(call(ret, 42));
  println(call(dub, 21));
  println(call(inc, 41));
  println(call(dec, 43));
}