diff options
| author | Quentin Carbonneaux <quentin.carbonneaux@yale.edu> | 2016-02-15 22:06:29 -0500 |
|---|---|---|
| committer | Quentin Carbonneaux <quentin.carbonneaux@yale.edu> | 2016-02-15 22:06:29 -0500 |
| commit | 2cfccce68099b3037471d3c6c34e8e6dbc899409 (patch) | |
| tree | fcd85a0c37760ded23b5b4c9d967d88fa1589b3f | |
| parent | b7dd7edbd5d6f821ffb30da2987d0666a1903145 (diff) | |
| download | roux-2cfccce68099b3037471d3c6c34e8e6dbc899409.tar.gz | |
use arguments in mandelbrot test
| -rw-r--r-- | lisc/test/mandel.ssa | 15 |
1 files changed, 2 insertions, 13 deletions
diff --git a/lisc/test/mandel.ssa b/lisc/test/mandel.ssa index ca3f647..7aaf311 100644 --- a/lisc/test/mandel.ssa +++ b/lisc/test/mandel.ssa @@ -1,12 +1,8 @@ # Print the Mandelbrot set on the # terminal line output. -# function w $mandel(d %x, d %y) { -function w $mandel() { +function w $mandel(d %x, d %y) { @mandel - %x =d loadd $x - %y =d loadd $y - %cr =d sub %y, d_0.5 %ci =d copy %x @loop @@ -39,10 +35,7 @@ function w $main() { %y =d phi @main d_-1, @loopy1 %y1 @loopx %x =d phi @loopy d_-1, @loopx1 %x1 - # %i =w call $mandel(d %x, d %y) - stored %x, $x - stored %y, $y - %i =w call $mandel() + %i =w call $mandel(d %x, d %y) jnz %i, @out, @in @in %r0 =w call $putchar(w 42) # '*' @@ -62,7 +55,3 @@ function w $main() { @ret ret 0 } - -# ABI not implemented, yet. -data $x = { l 0 } -data $y = { l 0 } |