Mercurial > hg > graal-compiler
view graal/com.oracle.graal.truffle.test/sl/TestInliningRecursive2.sl @ 21405:cdb5eda3a4b5
[SPARC] sign extend array compare length
author | Stefan Anzinger <stefan.anzinger@oracle.com> |
---|---|
date | Fri, 15 May 2015 23:03:42 +0200 |
parents | e66a6f8d63e3 |
children |
line wrap: on
line source
/* * Tests that indirect recursions are not inlined. */ function fib(a) { if (a == 2 || a == 1) { return 1; } return call(fib, a-1) + call(fib, a-2) + call(void, 0); } function call(f, a) { return f(a); } function void(a) { return a; } 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), "not inlined: test -> fib"); }