X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=test%2Fsystem%2Fcasl2_opt%2Fopt_sL%2F0.txt;h=fd6c4ad97669b2337696552e264b06aafdfe2c71;hp=0414265b3aa7a795f7296fe4f1aaa2e339e4f03b;hb=d5687e0f30e8402985d569a595cc0bdadc89f725;hpb=a77e8363f86dfc38838990a174486166b7c5cbf2

diff --git a/test/system/casl2_opt/opt_sL/0.txt b/test/system/casl2_opt/opt_sL/0.txt
index 0414265..fd6c4ad 100644
--- a/test/system/casl2_opt/opt_sL/0.txt
+++ b/test/system/casl2_opt/opt_sL/0.txt
@@ -1,44 +1,53 @@
 ;;; sum_10.casl
-;;; 出力 GR0: 1から10までの整数をすべて加算した値
+;;; 1から10までの整数をすべて加算した値をメモリーに格納する
 MAIN    START
         PUSH    0,GR1
-        LAD     GR0,0           ; GR0を初期化
-        LD      GR1,FST         ; GR1に初項を転送
-LOOP    ADDL    GR0,GR1         ; ループ先頭
+        PUSH    0,GR2
+        XOR     GR2,GR2         ; GR2を初期化
+        LD      GR1,FST         ; GR1に初項をメモリーから転送
+LOOP    ADDL    GR2,GR1         ; ループ先頭。GR2 <- GR2 + GR1
         ADDL    GR1,STEP        ; GR1 <- GR1 + 公差
         CPL     GR1,LST         ; GR1が末項より大きい場合は終了
         JPL     FIN             ; ↓
         JUMP    LOOP            ; ループ終端
-FIN     POP     GR1
+FIN     ST      GR2,RST         ; GR2の結果をメモリーに転送
+        POP     GR2
+        POP     GR1
         RET
 FST     DC      1               ; 初項
 LST     DC      10              ; 末項
 STEP    DC      1               ; 公差
+RST     DS      1               ; 結果
         END
 
 Assemble ../../../../as/sample/sum_10.casl (0)
 ../../../../as/sample/sum_10.casl:    1:;;; sum_10.casl
-../../../../as/sample/sum_10.casl:    2:;;; 出力 GR0: 1から10までの整数をすべて加算した値
+../../../../as/sample/sum_10.casl:    2:;;; 1から10までの整数をすべて加算した値をメモリーに格納する
 ../../../../as/sample/sum_10.casl:    3:MAIN    START
 ../../../../as/sample/sum_10.casl:    4:        PUSH    0,GR1
-../../../../as/sample/sum_10.casl:    5:        LAD     GR0,0           ; GR0を初期化
-../../../../as/sample/sum_10.casl:    6:        LD      GR1,FST         ; GR1に初項を転送
-../../../../as/sample/sum_10.casl:    7:LOOP    ADDL    GR0,GR1         ; ループ先頭
-../../../../as/sample/sum_10.casl:    8:        ADDL    GR1,STEP        ; GR1 <- GR1 + 公差
-../../../../as/sample/sum_10.casl:    9:        CPL     GR1,LST         ; GR1が末項より大きい場合は終了
-../../../../as/sample/sum_10.casl:   10:        JPL     FIN             ; ↓
-../../../../as/sample/sum_10.casl:   11:        JUMP    LOOP            ; ループ終端
-../../../../as/sample/sum_10.casl:   12:FIN     POP     GR1
-../../../../as/sample/sum_10.casl:   13:        RET
-../../../../as/sample/sum_10.casl:   14:FST     DC      1               ; 初項
-../../../../as/sample/sum_10.casl:   15:LST     DC      10              ; 末項
-../../../../as/sample/sum_10.casl:   16:STEP    DC      1               ; 公差
-../../../../as/sample/sum_10.casl:   17:        END
+../../../../as/sample/sum_10.casl:    5:        PUSH    0,GR2
+../../../../as/sample/sum_10.casl:    6:        XOR     GR2,GR2         ; GR2を初期化
+../../../../as/sample/sum_10.casl:    7:        LD      GR1,FST         ; GR1に初項をメモリーから転送
+../../../../as/sample/sum_10.casl:    8:LOOP    ADDL    GR2,GR1         ; ループ先頭。GR2 <- GR2 + GR1
+../../../../as/sample/sum_10.casl:    9:        ADDL    GR1,STEP        ; GR1 <- GR1 + 公差
+../../../../as/sample/sum_10.casl:   10:        CPL     GR1,LST         ; GR1が末項より大きい場合は終了
+../../../../as/sample/sum_10.casl:   11:        JPL     FIN             ; ↓
+../../../../as/sample/sum_10.casl:   12:        JUMP    LOOP            ; ループ終端
+../../../../as/sample/sum_10.casl:   13:FIN     ST      GR2,RST         ; GR2の結果をメモリーに転送
+../../../../as/sample/sum_10.casl:   14:        POP     GR2
+../../../../as/sample/sum_10.casl:   15:        POP     GR1
+../../../../as/sample/sum_10.casl:   16:        RET
+../../../../as/sample/sum_10.casl:   17:FST     DC      1               ; 初項
+../../../../as/sample/sum_10.casl:   18:LST     DC      10              ; 末項
+../../../../as/sample/sum_10.casl:   19:STEP    DC      1               ; 公差
+../../../../as/sample/sum_10.casl:   20:RST     DS      1               ; 結果
+../../../../as/sample/sum_10.casl:   21:        END
 
 Label::::
 MAIN ---> #0000
-MAIN.LOOP ---> #0006
-MAIN.FIN ---> #000F
-MAIN.FST ---> #0011
-MAIN.LST ---> #0012
-MAIN.STEP ---> #0013
+MAIN.LOOP ---> #0007
+MAIN.FIN ---> #0010
+MAIN.FST ---> #0015
+MAIN.LST ---> #0016
+MAIN.STEP ---> #0017
+MAIN.RST ---> #0018