big

play/t.ssa

@@ -0,0 +1,12 @@
+type :scm = {l 2}
+export
+function w $main () {
+@start
+    %x0 =l call $GC_malloc (l 16)
+    %.3 =l add %x0, 8
+    storel 10, %x0
+    storel 14, %.3
+    %x1 =l call $scm_write (l %x0)
+    %x2 =l call $scm_write (l 18)
+    ret %x2
+}