Mercurial > hg > truffle
view graal/com.oracle.graal.truffle.test/sl/TestInliningRecursive1.sl @ 18104:eaf39a954227
Merge with jdk8u25-b17
author | Gilles Duboscq <duboscq@ssw.jku.at> |
---|---|
date | Thu, 16 Oct 2014 11:57:39 +0200 |
parents | 04d6bb76cfb3 |
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"); }