Mercurial > hg > truffle
annotate graal/com.oracle.truffle.sl.test/tests/HelloEqualsWorld.sl @ 18122:a545fb29cb89
Add missing data types to cmove instruction.
author | Roland Schatz <roland.schatz@oracle.com> |
---|---|
date | Mon, 20 Oct 2014 11:10:15 +0200 |
parents | 25a18b4a5b90 |
children |
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 } |