サンプルファイルにPUSHとPOPを追加

diff --git a/as/addl.casl b/as/addl.casl
index 0501cbaaea314bc92df9b841a63125fb10d76c35..cacbded52c0ddd97908c7a7d63a566f9ee5aba38 100644 (file)
--- 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