X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2Faddl.casl;fp=as%2Faddl.casl;h=cacbded52c0ddd97908c7a7d63a566f9ee5aba38;hp=0501cbaaea314bc92df9b841a63125fb10d76c35;hb=71492ed8d58051866a0ab179f76d5dc2296ca178;hpb=80d4fc2d9a7022362c88cac0adbddd32ce7a3a62

diff --git a/as/addl.casl b/as/addl.casl
index 0501cba..cacbded 100644
--- a/as/addl.casl
+++ b/as/addl.casl
@@ -1,10 +1,12 @@
 ;;; ADDL r,adr
 MAIN    START
+        PUSH    0,GR1
         LD      GR1,A
         ADDL    GR1,B
         ST      GR1,C
+        POP     GR1
         RET
 A       DC      3
-B       DC      1
+B       DC      2
 C       DS      1
         END