X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=as%2FCMD%2Fpushpop.casl;fp=as%2FCMD%2Fpushpop.casl;h=f8c8d333d08090880311e2b3dba83ba523e2b634;hb=fb54b1c9d2fbc3d4a62c6b4d38ff68e9d3b25c26;hp=0000000000000000000000000000000000000000;hpb=b4e48008c95b35c692827326191698c22b06124f;p=YACASL2.git

diff --git a/as/CMD/pushpop.casl b/as/CMD/pushpop.casl
new file mode 100644
index 0000000..f8c8d33
--- /dev/null
+++ b/as/CMD/pushpop.casl
@@ -0,0 +1,11 @@
+PUSHPOP START
+        LAD     GR1,1
+        LAD     GR2,2
+        PUSH    0,GR1
+        PUSH    0,GR2
+        LAD     GR1,0
+        LAD     GR2,0
+        POP     GR2
+        POP     GR1
+        RET
+        END