diff options
Diffstat (limited to 'lisc/test')
-rw-r--r-- | lisc/test/eucl.ssa | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/lisc/test/eucl.ssa b/lisc/test/eucl.ssa new file mode 100644 index 0000000..71725ea --- /dev/null +++ b/lisc/test/eucl.ssa @@ -0,0 +1,15 @@ +# euclide's algorithm in ssa +# it is a fairly interesting +# ssa program because of the +# swap of b and a + +@start + +@loop + %a = phi @start 380, @loop %r + %b = phi @start 747, @loop %a + %r = rem %b, %a + jez %r, @end, @loop + +@end + ret |