Mercurial > hg > truffle

annotate truffle/com.oracle.truffle.sl.test/src/tests/HelloEqualsWorld.sl @ 22201:df6a1647cfb3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Move .sl testcases/outputs (resources) into projects src directory
author Stefan Anzinger <stefan.anzinger@oracle.com>
date Tue, 29 Sep 2015 15:01:34 +0200
parents truffle/com.oracle.truffle.sl.test/tests/HelloEqualsWorld.sl@9c8c0937da41
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
15064
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
1 function doIt(a) {
15234
25a18b4a5b90 Backed out changeset: 6133189d8eea (SL: temporary disable failing HelloEqualsWorld.)
Lukas Stadler <lukas.stadler@oracle.com>
parents: 15095
diff changeset
2 println("Initial stack trace:");
25a18b4a5b90 Backed out changeset: 6133189d8eea (SL: temporary disable failing HelloEqualsWorld.)
Lukas Stadler <lukas.stadler@oracle.com>
parents: 15095
diff changeset
3 println(stacktrace());
15064
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
4
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
5 hello = 123;
15234
25a18b4a5b90 Backed out changeset: 6133189d8eea (SL: temporary disable failing HelloEqualsWorld.)
Lukas Stadler <lukas.stadler@oracle.com>
parents: 15095
diff changeset
6 println("After 123 assignment:");
25a18b4a5b90 Backed out changeset: 6133189d8eea (SL: temporary disable failing HelloEqualsWorld.)
Lukas Stadler <lukas.stadler@oracle.com>
parents: 15095
diff changeset
7 println(stacktrace());
15064
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
8
15234
25a18b4a5b90 Backed out changeset: 6133189d8eea (SL: temporary disable failing HelloEqualsWorld.)
Lukas Stadler <lukas.stadler@oracle.com>
parents: 15095
diff changeset
9 helloEqualsWorld();
25a18b4a5b90 Backed out changeset: 6133189d8eea (SL: temporary disable failing HelloEqualsWorld.)
Lukas Stadler <lukas.stadler@oracle.com>
parents: 15095
diff changeset
10 println("After hello assignment:");
25a18b4a5b90 Backed out changeset: 6133189d8eea (SL: temporary disable failing HelloEqualsWorld.)
Lukas Stadler <lukas.stadler@oracle.com>
parents: 15095
diff changeset
11 println(stacktrace());
15064
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
12
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
13 // readln();
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
14 }
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
15
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
16 function main() {
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
17 i = 0;
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
18 while (i < 10) {
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
19 doIt(i);
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
20 i = i + 1;
f675818d9ad0 new getStackTrace and getCurrentFrame functionality in TruffleRuntime
Lukas Stadler <lukas.stadler@oracle.com>
parents:
diff changeset
21 }
15088
d3add9b82b71 change to StackIntrospection and Truffle getStackTrace implementation
Lukas Stadler <lukas.stadler@oracle.com>
parents: 15064
diff changeset
22 }