From cca1b95ecd28c39095d315c4a91a7d7736f5ff06 Mon Sep 17 00:00:00 2001
From: j8takagi <j8takagi@nifty.com>
Date: Sat, 6 Feb 2021 11:10:47 +0900
Subject: [PATCH] =?utf8?q?=E3=83=9E=E3=83=8B=E3=83=A5=E3=82=A2=E3=83=AB?=
 =?utf8?q?=E3=81=AE=E3=82=B5=E3=83=B3=E3=83=97=E3=83=AB=E3=82=BD=E3=83=BC?=
 =?utf8?q?=E3=82=B9=E3=82=92=E6=9B=B4=E6=96=B0?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 doc/manual.texi | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/doc/manual.texi b/doc/manual.texi
index 2f15d6b..abf7653 100644
--- a/doc/manual.texi
+++ b/doc/manual.texi
@@ -394,21 +394,21 @@ $ @kbd{casl2 -t addl.casl | grep 'GR1:' | tail -1}
 @example
 $ @kbd{cat sum_10.casl}
 ;;; 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         ; ループ先頭
+        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の結果をメモリーに転送
         RET
 FST     DC      1               ; 初項
 LST     DC      10              ; 末項
 STEP    DC      1               ; 公差
+RST     DS      1               ; 結果
         END
 @end example
 
-- 
2.18.0