From dab9590ce754e6fd4b3a311a195fcf797c3b3eb3 Mon Sep 17 00:00:00 2001 From: Quentin Carbonneaux Date: Fri, 18 Sep 2015 17:50:14 -0400 Subject: add the first stand-alone test program --- lisc/test/echo.ssa | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 lisc/test/echo.ssa (limited to 'lisc/test/echo.ssa') diff --git a/lisc/test/echo.ssa b/lisc/test/echo.ssa new file mode 100644 index 0000000..56e7305 --- /dev/null +++ b/lisc/test/echo.ssa @@ -0,0 +1,28 @@ +function $main(w %argc, l %argv) { +@start + %fmt =l alloc8 8 + storel 1663398693, %fmt # "%s%c" + %av0 =l add %argv, 8 + %ac0 =w sub %argc, 1 +@loop + %av =l phi @start %av0, @loop2 %av1 + %ac =w phi @start %ac0, @loop2 %ac1 + %c0 =w ceq %ac, 0 + jnz %c0, @end, @loop1 +@loop1 + %c1 =w ceq %ac, 1 + jnz %c1, @last, @nolast +@last + jmp @loop2 +@nolast + jmp @loop2 +@loop2 + %sep =w phi @last 10, @nolast 32 + %arg =l load %av + %r =w call $printf(l %fmt, l %arg, w %sep) + %av1 =l add %av, 8 + %ac1 =w sub %ac, 1 + jmp @loop +@end + ret +} -- cgit 1.4.1