X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2Fcmd%2FCALL%2Fcall0.casl;h=d6a6a40073a030253f8d9bd4eb3a7ea3265196fd;hp=bcd954394ba5029829d7caeca1c3851486b3f2c0;hb=e90ae6766bac6e16a608ea7b31eb9d8a5924b83c;hpb=58ee37be62a5e359d0f6eb603cc86b5692f74b90

diff --git a/as/cmd/CALL/call0.casl b/as/cmd/CALL/call0.casl
index bcd9543..d6a6a40 100644
--- a/as/cmd/CALL/call0.casl
+++ b/as/cmd/CALL/call0.casl
@@ -1,10 +1,7 @@
-MAIN    START   BEGIN
-BEGIN   LD      GR1,A
+MAIN    START
+        LAD     GR1,29
         CALL    COPY
-        ST      GR2,B
         RET
-A       DC      29
-B       DS      1
         END
 COPY    START
         LD      GR2,GR1