diff graal/com.oracle.graal.truffle.test/src/sl/TestInliningRecursive1.sl @ 22720:bba4e91a2d63

Move .sl testcases/outputs (resources) into projects src directory
author Stefan Anzinger <stefan.anzinger@oracle.com>
date Tue, 29 Sep 2015 15:02:34 +0200
parents graal/com.oracle.graal.truffle.test/sl/TestInliningRecursive1.sl@e66a6f8d63e3
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/graal/com.oracle.graal.truffle.test/src/sl/TestInliningRecursive1.sl	Tue Sep 29 15:02:34 2015 +0200
@@ -0,0 +1,23 @@
+/* 
+ * 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);
+}