view graal/com.oracle.graal.truffle.test/sl/TestInliningRecursive1.sl @ 17405:04d6bb76cfb3

Truffle: update callUntilOptimized to wait for the compilation and call it once optimized.
author Christian Humer <christian.humer@gmail.com>
date Thu, 09 Oct 2014 17:25:59 +0200
parents f735aa886cf6
children e66a6f8d63e3
line wrap: on
line source

/* 
 * Test recursive calls do not get inlined and do not crash.
 */
function fib(a) { 
    if (a == 2 || a == 1) {
        return 1;
    }
    return fib(a-1) + fib(a-2);
}

function test() {
    i = 0;
    sum = 0;
    while (i < 100) {
        sum = sum + fib(7);
        i = i + 1;
    }
    return sum;
}

function main() {
    callUntilOptimized(test);
    assertTrue(isInlined(test, test, fib), "fib is not inlined");
    assertFalse(isInlined(test, fib, fib), "fib -> fib is not inlined");
}