命令テストの整理

[YACASL2.git] / as / cmd / CALL / call1.casl

diff --git a/as/cmd/CALL/call1.casl b/as/cmd/CALL/call1.casl
index f0282ca..bc420fb 100644 (file)
--- a/as/cmd/CALL/call1.casl
+++ b/as/cmd/CALL/call1.casl
@@ -1,11 +1,7 @@
 MAIN    START   BEGIN
-BEGIN   LD      GR1,=29
+BEGIN   LAD     GR1,29
         CALL    COPY
-        ST      GR2,B
         RET
-B       DS      1
-        END
-COPY    START
-        LD      GR2,GR1
+COPY    LD      GR2,GR1
         RET
         END