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

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

diff --git a/as/FUNC/mula_call1.casl b/as/FUNC/mula_call1.casl
index e8eaa61..da362bd 100644 (file)
--- a/as/FUNC/mula_call1.casl
+++ b/as/FUNC/mula_call1.casl
@@ -1,13 +1,13 @@
 ;;; casl2 mula_call0.casl mula.casl outa.casl
 MAIN    START
-        LAD     GR1,151
-        LAD     GR2,255
+        LAD     GR1,9
+        LAD     GR2,23
         CALL    MULA
         JOV     WAN
         LD      GR1,GR0
         CALL    OUTA
         JUMP    FIN
-WAN     OUT     MSG,MLEN        
+WAN     OUT     MSG,MLEN
 FIN     RET
 MSG     DC      'OF'
 MLEN    DC      2