X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=as%2Fcasl2lib%2Faddl32.casl;h=23740bf0b84efedc505d472c29c009f999a7fc69;hp=37d2f250e45ca4fd56ceec3065e2209c71855a91;hb=3c757d760e9af5c84f56e8e3e4cc69eb85721d7c;hpb=e934f979236c43e098be7b500e7bc11103911630 diff --git a/as/casl2lib/addl32.casl b/as/casl2lib/addl32.casl index 37d2f25..23740bf 100644 --- a/as/casl2lib/addl32.casl +++ b/as/casl2lib/addl32.casl @@ -1,4 +1,4 @@ -;;; 2つの32ビット数値を加算する +;;; 2つの32ビット値を加算する ;;; 32ビットの値を、連続する2語の領域に格納 ;;; 入力 GR1:数値1の先頭アドレス GR2:数値2の先頭アドレス ;;; 出力 GR0:和の先頭アドレス @@ -36,8 +36,8 @@ OV LAD GR3,=#8000 ; 強制的にオーバーフロー発生 FIN LAD GR0,A ; GR0 <- A RPOP RET -X DS 1 ; 数値1のアドレス -Y DS 1 ; 数値2のアドレス +X DS 1 ; 数値1の先頭アドレス +Y DS 1 ; 数値2の先頭アドレス A DS 2 ; 和 LEN DC 2 ; 数値の語数 END