X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2Faddl.casl;h=cacbded52c0ddd97908c7a7d63a566f9ee5aba38;hb=e46d8634095f166ac28f03b17a8e0676e6c275a0;hp=0e8bcdb28444d0952184f7d80d9c09d0de2bf538;hpb=65d7685bd755ca7810a340677417c7a0106f4792;p=YACASL2.git

diff --git a/as/addl.casl b/as/addl.casl
index 0e8bcdb..cacbded 100644
--- a/as/addl.casl
+++ b/as/addl.casl
@@ -1,8 +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