かけ算を実行するCASL2ファイルのリファクタリング

[YACASL2.git] / as / FUNC / mula_call.casl

diff --git a/as/FUNC/mula_call.casl b/as/FUNC/mula_call.casl
index eeaf6d0..6fa37b6 100644 (file)
--- a/as/FUNC/mula_call.casl
+++ b/as/FUNC/mula_call.casl
@@ -7,7 +7,6 @@ LOOPX   CPA     GR3,XCNT
 LOOPY   CPA     GR4,YCNT
         JZE     XNEXT
         LD      GR2,Y,GR4
-        OUT     SEP,SLEN
         CALL    OUTA
         PUSH    0,GR1
         LD      GR1,GR2
@@ -19,7 +18,7 @@ LOOPY   CPA     GR4,YCNT
         LD      GR1,GR0
         CALL    OUTA
         POP     GR1
-YNEXT   OUT     SEP,SLEN        
+YNEXT   OUT     SEP,SLEN
         LAD     GR4,1,GR4
         JUMP    LOOPY
 WOV     OUT     YOMSG,YLEN