Mercurial > hg > graal-compiler
diff graal/com.oracle.graal.truffle.test/sl/TestInliningRecursive2.sl @ 17257:f735aa886cf6
Truffle: add new inlining tests; adapt tests for context sensitive inlining.
author | Christian Humer <christian.humer@gmail.com> |
---|---|
date | Mon, 29 Sep 2014 18:46:40 +0200 |
parents | |
children | 5787218bad91 |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/graal/com.oracle.graal.truffle.test/sl/TestInliningRecursive2.sl Mon Sep 29 18:46:40 2014 +0200 @@ -0,0 +1,37 @@ +/* + * 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() { + waitForOptimization(callUntilOptimized(test)); + assertTrue(isInlined(test, test, fib), "not inlined: test -> fib"); + if (getOption("TruffleContextSensitiveInlining")) { + assertTrue(isInlined(test, fib, call), "not inlined: fib -> call"); + assertFalse(isInlined(test, call, fib), "inlined: call -> fib"); + assertTrue(isInlined(test, call, void), "inlined: call -> void"); + } +}