diff options
Diffstat (limited to 'test')
-rw-r--r-- | test/abi1.ssa | 1 | ||||
-rw-r--r-- | test/abi2.ssa | 1 | ||||
-rw-r--r-- | test/abi3.ssa | 1 | ||||
-rw-r--r-- | test/abi4.ssa | 1 | ||||
-rw-r--r-- | test/abi5.ssa | 1 | ||||
-rw-r--r-- | test/align.ssa | 1 | ||||
-rw-r--r-- | test/collatz.ssa | 1 | ||||
-rw-r--r-- | test/cprime.ssa | 1 | ||||
-rw-r--r-- | test/cup.ssa | 1 | ||||
-rw-r--r-- | test/dark.ssa | 1 | ||||
-rw-r--r-- | test/double.ssa | 1 | ||||
-rw-r--r-- | test/echo.ssa | 1 | ||||
-rw-r--r-- | test/eucl.ssa | 1 | ||||
-rw-r--r-- | test/euclc.ssa | 1 | ||||
-rw-r--r-- | test/fpcnv.ssa | 2 | ||||
-rw-r--r-- | test/loop.ssa | 1 | ||||
-rw-r--r-- | test/mandel.ssa | 1 | ||||
-rw-r--r-- | test/max.ssa | 1 | ||||
-rw-r--r-- | test/prime.ssa | 1 | ||||
-rw-r--r-- | test/puts10.ssa | 1 | ||||
-rw-r--r-- | test/sum.ssa | 1 |
21 files changed, 22 insertions, 0 deletions
diff --git a/test/abi1.ssa b/test/abi1.ssa index 69cce44..049f10e 100644 --- a/test/abi1.ssa +++ b/test/abi1.ssa @@ -20,6 +20,7 @@ function $alpha(l %p, w %l, l %n) { ret } +export function $test() { @start %p =l alloc4 17 diff --git a/test/abi2.ssa b/test/abi2.ssa index b82c80c..42a3bae 100644 --- a/test/abi2.ssa +++ b/test/abi2.ssa @@ -1,5 +1,6 @@ type :fps = { s, b, s } +export function s $sum(:fps %p) { @start %f1 =s load %p diff --git a/test/abi3.ssa b/test/abi3.ssa index 608d1db..35cade8 100644 --- a/test/abi3.ssa +++ b/test/abi3.ssa @@ -2,6 +2,7 @@ type :four = {l, b, w} data $z = { w 0 } +export function $test() { @start %a =w loadw $z diff --git a/test/abi4.ssa b/test/abi4.ssa index 4c3d89b..844d985 100644 --- a/test/abi4.ssa +++ b/test/abi4.ssa @@ -18,6 +18,7 @@ function $alpha(l %p, w %l, l %n) { ret } +export function :mem $test() { @start %p =l alloc4 17 diff --git a/test/abi5.ssa b/test/abi5.ssa index 4c5eaea..7899035 100644 --- a/test/abi5.ssa +++ b/test/abi5.ssa @@ -18,6 +18,7 @@ data $fmt6 = { b "t6: %s\n", b 0 } data $fmt7 = { b "t7: %f %f\n", b 0 } data $fmt8 = { b "t8: %d %d %d %d\n", b 0 } +export function $test() { @start %r1 =:st1 call $t1() diff --git a/test/align.ssa b/test/align.ssa index 84d1fb9..49f1183 100644 --- a/test/align.ssa +++ b/test/align.ssa @@ -1,3 +1,4 @@ +export function $test() { @start %x =l alloc16 16 diff --git a/test/collatz.ssa b/test/collatz.ssa index 373ecac..0a593b1 100644 --- a/test/collatz.ssa +++ b/test/collatz.ssa @@ -3,6 +3,7 @@ # we use a fast local array to # memoize small collatz numbers +export function $test() { @start %mem =l alloc4 4000 diff --git a/test/cprime.ssa b/test/cprime.ssa index 1ca60e1..8fadef3 100644 --- a/test/cprime.ssa +++ b/test/cprime.ssa @@ -2,6 +2,7 @@ # compiler from the C program # following in comments +export function w $main() { @start %v0 =l alloc8 4 diff --git a/test/cup.ssa b/test/cup.ssa index 013394f..b53c86e 100644 --- a/test/cup.ssa +++ b/test/cup.ssa @@ -1,5 +1,6 @@ # counts up from -1988 to 1991 +export function $test() { @start @loop diff --git a/test/dark.ssa b/test/dark.ssa index 5046af3..373b1b1 100644 --- a/test/dark.ssa +++ b/test/dark.ssa @@ -6,6 +6,7 @@ type :magic = align 1 { 0 } data $ret = { l 0 } +export function $test(:magic %p) { @start %av =w loadw $a diff --git a/test/double.ssa b/test/double.ssa index d885d28..ac6c4c5 100644 --- a/test/double.ssa +++ b/test/double.ssa @@ -1,3 +1,4 @@ +export function $test() { @start %x1 =d copy d_0.1 diff --git a/test/echo.ssa b/test/echo.ssa index d3c8a25..6671a6a 100644 --- a/test/echo.ssa +++ b/test/echo.ssa @@ -1,3 +1,4 @@ +export function w $main(w %argc, l %argv) { @start %fmt =l alloc8 8 diff --git a/test/eucl.ssa b/test/eucl.ssa index f50fd2c..838c1b8 100644 --- a/test/eucl.ssa +++ b/test/eucl.ssa @@ -3,6 +3,7 @@ # ssa program because of the # swap of b and a +export function $test() { @start diff --git a/test/euclc.ssa b/test/euclc.ssa index c76db2f..3449234 100644 --- a/test/euclc.ssa +++ b/test/euclc.ssa @@ -1,3 +1,4 @@ +export function w $test() { @l0 %a =l alloc4 4 diff --git a/test/fpcnv.ssa b/test/fpcnv.ssa index 5fd3be9..06d2478 100644 --- a/test/fpcnv.ssa +++ b/test/fpcnv.ssa @@ -1,5 +1,6 @@ # floating point casts and conversions +export function s $fneg(s %f) { @fneg %b0 =w cast %f @@ -8,6 +9,7 @@ function s $fneg(s %f) { ret %rs } +export function d $ftrunc(d %f) { @ftrunc %l0 =l ftosi %f diff --git a/test/loop.ssa b/test/loop.ssa index c8c4ee0..98914d9 100644 --- a/test/loop.ssa +++ b/test/loop.ssa @@ -1,6 +1,7 @@ # simple looping program # sums all integers from 100 to 0 +export function $test() { @start diff --git a/test/mandel.ssa b/test/mandel.ssa index efefeb3..67d960a 100644 --- a/test/mandel.ssa +++ b/test/mandel.ssa @@ -29,6 +29,7 @@ function w $mandel(d %x, d %y) { ret 0 } +export function w $main() { @main @loopy diff --git a/test/max.ssa b/test/max.ssa index 547e9d4..27fa8ca 100644 --- a/test/max.ssa +++ b/test/max.ssa @@ -6,6 +6,7 @@ data $arr = { b 10, b -60, b 10, b 100, b 200, b 0 } +export function $test() { @start @loop diff --git a/test/prime.ssa b/test/prime.ssa index 12d0273..2273e1d 100644 --- a/test/prime.ssa +++ b/test/prime.ssa @@ -1,6 +1,7 @@ # find the 10,001st prime # store it in a +export function $test() { @start @loop diff --git a/test/puts10.ssa b/test/puts10.ssa index 1dcf227..8c6ed5e 100644 --- a/test/puts10.ssa +++ b/test/puts10.ssa @@ -1,3 +1,4 @@ +export function $main() { @start %y =l alloc4 4 diff --git a/test/sum.ssa b/test/sum.ssa index 266054e..08ba8c0 100644 --- a/test/sum.ssa +++ b/test/sum.ssa @@ -1,5 +1,6 @@ # Simple test for addressing modes. +export function w $sum(l %arr, w %num) { @start @loop |