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

diff --git a/as/CMD/call0.casl b/as/CMD/call0.casl
new file mode 100644
index 0000000..bcd9543
--- /dev/null
+++ b/as/CMD/call0.casl
@@ -0,0 +1,12 @@
+MAIN    START   BEGIN
+BEGIN   LD      GR1,A
+        CALL    COPY
+        ST      GR2,B
+        RET
+A       DC      29
+B       DS      1
+        END
+COPY    START
+        LD      GR2,GR1
+        RET
+        END