From 4d280bade96b3be1a036a688ef7a8d7a54d7592a Mon Sep 17 00:00:00 2001 From: "Tadashi G. Takaoka" Date: Tue, 18 Jun 2024 20:19:44 +0900 Subject: [PATCH] [samples] Fix typos in comments --- samples/f3850/arith.inc | 8 ++++---- samples/f3850/arith.lst | 8 ++++---- samples/f3850/mandelbrot.lst | 8 ++++---- samples/i8048/arith.inc | 8 ++++---- samples/i8048/arith.lst | 8 ++++---- samples/i8048/mandelbrot.lst | 8 ++++---- samples/i8051/arith.inc | 10 +++++----- samples/i8051/arith.lst | 10 +++++----- samples/i8051/mandelbrot.lst | 10 +++++----- samples/ins8060/arith.inc | 6 +++--- samples/ins8060/arith.lst | 6 +++--- samples/ins8060/mandelbrot.lst | 6 +++--- samples/ins8070/arith.inc | 2 +- samples/ins8070/arith.lst | 2 +- samples/ins8070/mandelbrot.lst | 2 +- samples/mc6805/arith.inc | 8 ++++---- samples/mc6805/arith.lst | 8 ++++---- samples/mc6805/mandelbrot.lst | 8 ++++---- samples/scn2650/arith.inc | 6 +++--- samples/scn2650/arith.lst | 6 +++--- samples/scn2650/mandelbrot.lst | 6 +++--- samples/z86/arith.inc | 6 +++--- samples/z86/arith.lst | 6 +++--- samples/z86/mandelbrot.lst | 6 +++--- samples/z88/arith.inc | 16 ++++++++-------- samples/z88/arith.lst | 16 ++++++++-------- samples/z88/mandelbrot.lst | 16 ++++++++-------- 27 files changed, 105 insertions(+), 105 deletions(-) diff --git a/samples/f3850/arith.inc b/samples/f3850/arith.inc index c3bc6677..41c95992 100644 --- a/samples/f3850/arith.inc +++ b/samples/f3850/arith.inc @@ -33,7 +33,7 @@ print_uint16_digit: da udiv16 ; 4:5/6:7=4:5...6:7 lr A, 7 lr 0, A - pi push0 ; push reminder + pi push0 ; push remainder pi call da print_uint16_loop pi pop0 @@ -385,11 +385,11 @@ ucmp16_eq: pi pop1 jmp return -;;; Unsigned division: dividend / divisor = quotient ... reminder +;;; Unsigned division: dividend / divisor = quotient ... remainder ;;; @praram 4:5 dividend ;;; @praram 6:7 divisor ;;; @return 4:5 quotient -;;; @return 6:7 reminder +;;; @return 6:7 remainder ;;; @clobber 4 5 6 7 A udiv16: pi pushQ ; save Q @@ -484,7 +484,7 @@ udiv16_return: lr A, 4 lr 6, A lr A, 5 - lr 7, A ; 6:7=reminder + lr 7, A ; 6:7=remainder lr A, QU lr 4, A lr A, QL diff --git a/samples/f3850/arith.lst b/samples/f3850/arith.lst index 0f18f7c7..a85cfd05 100644 --- a/samples/f3850/arith.lst +++ b/samples/f3850/arith.lst @@ -788,7 +788,7 @@ (1) 1329 : 14 9B da udiv16 ; 4:5/6:7=4:5...6:7 (1) 132B : 47 lr A, 7 (1) 132C : 50 lr 0, A -(1) 132D : 28 02 03 pi push0 ; push reminder +(1) 132D : 28 02 03 pi push0 ; push remainder (1) 1330 : 28 02 65 pi call (1) 1333 : 13 14 da print_uint16_loop (1) 1335 : 28 02 31 pi pop0 @@ -1140,11 +1140,11 @@ (1) 1495 : 28 02 3D pi pop1 (1) 1498 : 29 02 82 jmp return (1) 149B : -(1) 149B : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 149B : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 149B : ;;; @praram 4:5 dividend (1) 149B : ;;; @praram 6:7 divisor (1) 149B : ;;; @return 4:5 quotient -(1) 149B : ;;; @return 6:7 reminder +(1) 149B : ;;; @return 6:7 remainder (1) 149B : ;;; @clobber 4 5 6 7 A (1) 149B : udiv16: (1) 149B : 28 02 24 pi pushQ ; save Q @@ -1239,7 +1239,7 @@ (1) 1510 : 44 lr A, 4 (1) 1511 : 56 lr 6, A (1) 1512 : 45 lr A, 5 -(1) 1513 : 57 lr 7, A ; 6:7=reminder +(1) 1513 : 57 lr 7, A ; 6:7=remainder (1) 1514 : 02 lr A, QU (1) 1515 : 54 lr 4, A (1) 1516 : 03 lr A, QL diff --git a/samples/f3850/mandelbrot.lst b/samples/f3850/mandelbrot.lst index 16ef029b..154b169c 100644 --- a/samples/f3850/mandelbrot.lst +++ b/samples/f3850/mandelbrot.lst @@ -553,7 +553,7 @@ (1) 3E2 : 05 54 da udiv16 ; 4:5/6:7=4:5...6:7 (1) 3E4 : 47 lr A, 7 (1) 3E5 : 50 lr 0, A -(1) 3E6 : 28 02 C1 pi push0 ; push reminder +(1) 3E6 : 28 02 C1 pi push0 ; push remainder (1) 3E9 : 28 03 23 pi call (1) 3EC : 03 CD da print_uint16_loop (1) 3EE : 28 02 EF pi pop0 @@ -905,11 +905,11 @@ (1) 54E : 28 02 FB pi pop1 (1) 551 : 29 03 40 jmp return (1) 554 : -(1) 554 : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 554 : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 554 : ;;; @praram 4:5 dividend (1) 554 : ;;; @praram 6:7 divisor (1) 554 : ;;; @return 4:5 quotient -(1) 554 : ;;; @return 6:7 reminder +(1) 554 : ;;; @return 6:7 remainder (1) 554 : ;;; @clobber 4 5 6 7 A (1) 554 : udiv16: (1) 554 : 28 02 E2 pi pushQ ; save Q @@ -1004,7 +1004,7 @@ (1) 5C9 : 44 lr A, 4 (1) 5CA : 56 lr 6, A (1) 5CB : 45 lr A, 5 -(1) 5CC : 57 lr 7, A ; 6:7=reminder +(1) 5CC : 57 lr 7, A ; 6:7=remainder (1) 5CD : 02 lr A, QU (1) 5CE : 54 lr 4, A (1) 5CF : 03 lr A, QL diff --git a/samples/i8048/arith.inc b/samples/i8048/arith.inc index 8de4b254..23940a3e 100644 --- a/samples/i8048/arith.inc +++ b/samples/i8048/arith.inc @@ -40,7 +40,7 @@ print_uint16_loop: call udiv16 movx A, @R1 mov R0, A ; restore buffer pointer - mov A, R4 ; lo(reminder) + mov A, R4 ; lo(remainder) add A, #'0' inc R0 movx @R0, A ; write to buffer @@ -322,11 +322,11 @@ mulsi2_store: mov @R0, A ret -;;; Unsigned division: dividend / divisor = quotient ... reminder +;;; Unsigned division: dividend / divisor = quotient ... remainder ;;; @praram R3:R2 dividend ;;; @praram R5:R4 divisor ;;; @return R3:R2 quotient -;;; @return R5:R4 reminder +;;; @return R5:R4 remainder ;;; @clobber A R0 R2 R3 R4 R5 R6 R7 udiv16: mov A, R4 @@ -413,7 +413,7 @@ udiv16_store: mov A, R2 mov R4, A mov A, R3 - mov R5, A ; store reminder + mov R5, A ; store remainder movx A, @R0 mov R2, A inc R0 diff --git a/samples/i8048/arith.lst b/samples/i8048/arith.lst index c886d3af..b653a76e 100644 --- a/samples/i8048/arith.lst +++ b/samples/i8048/arith.lst @@ -520,7 +520,7 @@ (1) 250 : 74 D8 call udiv16 (1) 252 : 81 movx A, @R1 (1) 253 : A8 mov R0, A ; restore buffer pointer -(1) 254 : FC mov A, R4 ; lo(reminder) +(1) 254 : FC mov A, R4 ; lo(remainder) (1) 255 : 03 30 add A, #'0' (1) 257 : 18 inc R0 (1) 258 : 90 movx @R0, A ; write to buffer @@ -802,11 +802,11 @@ (1) 3D6 : A0 mov @R0, A (1) 3D7 : 83 ret (1) 3D8 : -(1) 3D8 : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 3D8 : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 3D8 : ;;; @praram R3:R2 dividend (1) 3D8 : ;;; @praram R5:R4 divisor (1) 3D8 : ;;; @return R3:R2 quotient -(1) 3D8 : ;;; @return R5:R4 reminder +(1) 3D8 : ;;; @return R5:R4 remainder (1) 3D8 : ;;; @clobber A R0 R2 R3 R4 R5 R6 R7 (1) 3D8 : udiv16: (1) 3D8 : FC mov A, R4 @@ -893,7 +893,7 @@ (1) 42C : FA mov A, R2 (1) 42D : AC mov R4, A (1) 42E : FB mov A, R3 -(1) 42F : AD mov R5, A ; store reminder +(1) 42F : AD mov R5, A ; store remainder (1) 430 : 80 movx A, @R0 (1) 431 : AA mov R2, A (1) 432 : 18 inc R0 diff --git a/samples/i8048/mandelbrot.lst b/samples/i8048/mandelbrot.lst index 27f1dbb1..57ef0c27 100644 --- a/samples/i8048/mandelbrot.lst +++ b/samples/i8048/mandelbrot.lst @@ -587,7 +587,7 @@ (1) 224 : 74 D8 call udiv16 (1) 226 : 81 movx A, @R1 (1) 227 : A8 mov R0, A ; restore buffer pointer -(1) 228 : FC mov A, R4 ; lo(reminder) +(1) 228 : FC mov A, R4 ; lo(remainder) (1) 229 : 03 30 add A, #'0' (1) 22B : 18 inc R0 (1) 22C : 90 movx @R0, A ; write to buffer @@ -869,11 +869,11 @@ (1) 3D6 : A0 mov @R0, A (1) 3D7 : 83 ret (1) 3D8 : -(1) 3D8 : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 3D8 : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 3D8 : ;;; @praram R3:R2 dividend (1) 3D8 : ;;; @praram R5:R4 divisor (1) 3D8 : ;;; @return R3:R2 quotient -(1) 3D8 : ;;; @return R5:R4 reminder +(1) 3D8 : ;;; @return R5:R4 remainder (1) 3D8 : ;;; @clobber A R0 R2 R3 R4 R5 R6 R7 (1) 3D8 : udiv16: (1) 3D8 : FC mov A, R4 @@ -960,7 +960,7 @@ (1) 42C : FA mov A, R2 (1) 42D : AC mov R4, A (1) 42E : FB mov A, R3 -(1) 42F : AD mov R5, A ; store reminder +(1) 42F : AD mov R5, A ; store remainder (1) 430 : 80 movx A, @R0 (1) 431 : AA mov R2, A (1) 432 : 18 inc R0 diff --git a/samples/i8051/arith.inc b/samples/i8051/arith.inc index a575bb81..15093f55 100644 --- a/samples/i8051/arith.inc +++ b/samples/i8051/arith.inc @@ -31,7 +31,7 @@ print_uint16_loop: mov R4, #LOW(10) mov R5, #HIGH(10) acall udiv16 - mov A, R4 ; lo(reminder) + mov A, R4 ; lo(remainder) add A, #'0' inc DPTR movx @DPTR, A ; write to buffer @@ -271,11 +271,11 @@ mulsi2_store: mov @R0, A ret -;;; Unsigned division: dividend / divisor = quotient ... reminder +;;; Unsigned division: dividend / divisor = quotient ... remainder ;;; @praram R3:R2 dividend ;;; @praram R5:R4 divisor ;;; @return R3:R2 quotient -;;; @return R5:R4 reminder +;;; @return R5:R4 remainder ;;; @clobber A R0 R1 R2 R3 R4 R5 R6 R7 udiv16: mov A, R5 @@ -286,7 +286,7 @@ udiv16: mov A, R3 jnz udiv16_calc ; branch if dividend >= 256 mov A, R2 ; A=dividend (<256) - div AB ; A=quotient B=reminder + div AB ; A=quotient B=remainder mov R2, A mov R4, B udiv16_div0: @@ -348,7 +348,7 @@ udiv16_next: mov A, R2 mov R4, A mov A, R3 - mov R5, A ; store reminder + mov R5, A ; store remainder mov A, R6 mov R2, A mov A, R7 diff --git a/samples/i8051/arith.lst b/samples/i8051/arith.lst index f3c39c93..fbadabf1 100644 --- a/samples/i8051/arith.lst +++ b/samples/i8051/arith.lst @@ -560,7 +560,7 @@ (1) 26C : 7C 0A mov R4, #LOW(10) (1) 26E : 7D 00 mov R5, #HIGH(10) (1) 270 : 71 52 acall udiv16 -(1) 272 : EC mov A, R4 ; lo(reminder) +(1) 272 : EC mov A, R4 ; lo(remainder) (1) 273 : 24 30 add A, #'0' (1) 275 : A3 inc DPTR (1) 276 : F0 movx @DPTR, A ; write to buffer @@ -800,11 +800,11 @@ (1) 350 : F6 mov @R0, A (1) 351 : 22 ret (1) 352 : -(1) 352 : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 352 : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 352 : ;;; @praram R3:R2 dividend (1) 352 : ;;; @praram R5:R4 divisor (1) 352 : ;;; @return R3:R2 quotient -(1) 352 : ;;; @return R5:R4 reminder +(1) 352 : ;;; @return R5:R4 remainder (1) 352 : ;;; @clobber A R0 R1 R2 R3 R4 R5 R6 R7 (1) 352 : udiv16: (1) 352 : ED mov A, R5 @@ -815,7 +815,7 @@ (1) 35A : EB mov A, R3 (1) 35B : 70 06 jnz udiv16_calc ; branch if dividend >= 256 (1) 35D : EA mov A, R2 ; A=dividend (<256) -(1) 35E : 84 div AB ; A=quotient B=reminder +(1) 35E : 84 div AB ; A=quotient B=remainder (1) 35F : FA mov R2, A (1) 360 : AC F0 mov R4, B (1) 362 : udiv16_div0: @@ -877,7 +877,7 @@ (1) 39A : EA mov A, R2 (1) 39B : FC mov R4, A (1) 39C : EB mov A, R3 -(1) 39D : FD mov R5, A ; store reminder +(1) 39D : FD mov R5, A ; store remainder (1) 39E : EE mov A, R6 (1) 39F : FA mov R2, A (1) 3A0 : EF mov A, R7 diff --git a/samples/i8051/mandelbrot.lst b/samples/i8051/mandelbrot.lst index 0b60ef2b..eaaa7fa1 100644 --- a/samples/i8051/mandelbrot.lst +++ b/samples/i8051/mandelbrot.lst @@ -614,7 +614,7 @@ (1) 240 : 7C 0A mov R4, #LOW(10) (1) 242 : 7D 00 mov R5, #HIGH(10) (1) 244 : 71 26 acall udiv16 -(1) 246 : EC mov A, R4 ; lo(reminder) +(1) 246 : EC mov A, R4 ; lo(remainder) (1) 247 : 24 30 add A, #'0' (1) 249 : A3 inc DPTR (1) 24A : F0 movx @DPTR, A ; write to buffer @@ -854,11 +854,11 @@ (1) 324 : F6 mov @R0, A (1) 325 : 22 ret (1) 326 : -(1) 326 : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 326 : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 326 : ;;; @praram R3:R2 dividend (1) 326 : ;;; @praram R5:R4 divisor (1) 326 : ;;; @return R3:R2 quotient -(1) 326 : ;;; @return R5:R4 reminder +(1) 326 : ;;; @return R5:R4 remainder (1) 326 : ;;; @clobber A R0 R1 R2 R3 R4 R5 R6 R7 (1) 326 : udiv16: (1) 326 : ED mov A, R5 @@ -869,7 +869,7 @@ (1) 32E : EB mov A, R3 (1) 32F : 70 06 jnz udiv16_calc ; branch if dividend >= 256 (1) 331 : EA mov A, R2 ; A=dividend (<256) -(1) 332 : 84 div AB ; A=quotient B=reminder +(1) 332 : 84 div AB ; A=quotient B=remainder (1) 333 : FA mov R2, A (1) 334 : AC F0 mov R4, B (1) 336 : udiv16_div0: @@ -931,7 +931,7 @@ (1) 36E : EA mov A, R2 (1) 36F : FC mov R4, A (1) 370 : EB mov A, R3 -(1) 371 : FD mov R5, A ; store reminder +(1) 371 : FD mov R5, A ; store remainder (1) 372 : EE mov A, R6 (1) 373 : FA mov R2, A (1) 374 : EF mov A, R7 diff --git a/samples/ins8060/arith.inc b/samples/ins8060/arith.inc index 81ac33f5..17b8686e 100644 --- a/samples/ins8060/arith.inc +++ b/samples/ins8060/arith.inc @@ -373,7 +373,7 @@ umul16_end: st 1(P1) ; negate product jmp mulsi2_exit_1 -;;; Signed divide; dividend /= divisor ... reminder +;;; Signed divide; dividend /= divisor ... remainder ;;; xppc P1 ;;; .dbyte &divisor ;;; .dbyte ÷nd @@ -385,7 +385,7 @@ umul16_end: ;;; @local P2[7:6] return address vREMINDER: .dbyte 0 divsi2_exit: - ld 2(P2) ; P2[3:2]dividend/reminder + ld 2(P2) ; P2[3:2]dividend/remainder st vREMINDER ld 3(P2) st vREMINDER+1 @@ -447,7 +447,7 @@ divsi2_dividend: jmp udiv16 divsi2_exit_1: jmp divsi2_exit -;;; Unsigned divide; quotient = dividend / divisor ... reminder +;;; Unsigned divide; quotient = dividend / divisor ... remainder ;;; @param P2[1:0] divisor ;;; @param P2[3:2] dividend ;;; @return P1[1:0] quotient diff --git a/samples/ins8060/arith.lst b/samples/ins8060/arith.lst index 53f8c6dc..f1905203 100644 --- a/samples/ins8060/arith.lst +++ b/samples/ins8060/arith.lst @@ -836,7 +836,7 @@ (1) 13F7 : C9 01 st 1(P1) ; negate product (1) 13F9 : 90 B3 jmp mulsi2_exit_1 (1) 13FB : -(1) 13FB : ;;; Signed divide; dividend /= divisor ... reminder +(1) 13FB : ;;; Signed divide; dividend /= divisor ... remainder (1) 13FB : ;;; xppc P1 (1) 13FB : ;;; .dbyte &divisor (1) 13FB : ;;; .dbyte ÷nd @@ -848,7 +848,7 @@ (1) 13FB : ;;; @local P2[7:6] return address (1) 13FB : 00 00 vREMINDER: .dbyte 0 (1) 13FD : divsi2_exit: -(1) 13FD : C2 02 ld 2(P2) ; P2[3:2]dividend/reminder +(1) 13FD : C2 02 ld 2(P2) ; P2[3:2]dividend/remainder (1) 13FF : C8 FB st vREMINDER (1) 1401 : C2 03 ld 3(P2) (1) 1403 : C8 F8 st vREMINDER+1 @@ -910,7 +910,7 @@ (1) 1466 : 90 02 jmp udiv16 (1) 1468 : divsi2_exit_1: (1) 1468 : 90 93 jmp divsi2_exit -(1) 146A : ;;; Unsigned divide; quotient = dividend / divisor ... reminder +(1) 146A : ;;; Unsigned divide; quotient = dividend / divisor ... remainder (1) 146A : ;;; @param P2[1:0] divisor (1) 146A : ;;; @param P2[3:2] dividend (1) 146A : ;;; @return P1[1:0] quotient diff --git a/samples/ins8060/mandelbrot.lst b/samples/ins8060/mandelbrot.lst index 77b1af9c..5d7d372e 100644 --- a/samples/ins8060/mandelbrot.lst +++ b/samples/ins8060/mandelbrot.lst @@ -1025,7 +1025,7 @@ (1) 14CC : C9 01 st 1(P1) ; negate product (1) 14CE : 90 B3 jmp mulsi2_exit_1 (1) 14D0 : -(1) 14D0 : ;;; Signed divide; dividend /= divisor ... reminder +(1) 14D0 : ;;; Signed divide; dividend /= divisor ... remainder (1) 14D0 : ;;; xppc P1 (1) 14D0 : ;;; .dbyte &divisor (1) 14D0 : ;;; .dbyte ÷nd @@ -1037,7 +1037,7 @@ (1) 14D0 : ;;; @local P2[7:6] return address (1) 14D0 : 00 00 vREMINDER: .dbyte 0 (1) 14D2 : divsi2_exit: -(1) 14D2 : C2 02 ld 2(P2) ; P2[3:2]dividend/reminder +(1) 14D2 : C2 02 ld 2(P2) ; P2[3:2]dividend/remainder (1) 14D4 : C8 FB st vREMINDER (1) 14D6 : C2 03 ld 3(P2) (1) 14D8 : C8 F8 st vREMINDER+1 @@ -1099,7 +1099,7 @@ (1) 153B : 90 02 jmp udiv16 (1) 153D : divsi2_exit_1: (1) 153D : 90 93 jmp divsi2_exit -(1) 153F : ;;; Unsigned divide; quotient = dividend / divisor ... reminder +(1) 153F : ;;; Unsigned divide; quotient = dividend / divisor ... remainder (1) 153F : ;;; @param P2[1:0] divisor (1) 153F : ;;; @param P2[3:2] dividend (1) 153F : ;;; @return P1[1:0] quotient diff --git a/samples/ins8070/arith.inc b/samples/ins8070/arith.inc index ba04a9f9..e9731a5c 100644 --- a/samples/ins8070/arith.inc +++ b/samples/ins8070/arith.inc @@ -29,7 +29,7 @@ print_uint16_loop: or A, E bz print_uint16_end jsr divmod10 ; P3=value/10, EA=value%10 - push A ; push reminder + push A ; push remainder jsr print_uint16_loop pop A print_uint16_zero: diff --git a/samples/ins8070/arith.lst b/samples/ins8070/arith.lst index 3de93951..4a3b3892 100644 --- a/samples/ins8070/arith.lst +++ b/samples/ins8070/arith.lst @@ -402,7 +402,7 @@ (1) 121D : 58 or A, E (1) 121E : 6C 0D bz print_uint16_end (1) 1220 : 20 2D 12 jsr divmod10 ; P3=value/10, EA=value%10 -(1) 1223 : 0A push A ; push reminder +(1) 1223 : 0A push A ; push remainder (1) 1224 : 20 1B 12 jsr print_uint16_loop (1) 1227 : 38 pop A (1) 1228 : print_uint16_zero: diff --git a/samples/ins8070/mandelbrot.lst b/samples/ins8070/mandelbrot.lst index 90d1514d..c485f534 100644 --- a/samples/ins8070/mandelbrot.lst +++ b/samples/ins8070/mandelbrot.lst @@ -218,7 +218,7 @@ (1) 1081 : 58 or A, E (1) 1082 : 6C 0D bz print_uint16_end (1) 1084 : 20 91 10 jsr divmod10 ; P3=value/10, EA=value%10 -(1) 1087 : 0A push A ; push reminder +(1) 1087 : 0A push A ; push remainder (1) 1088 : 20 7F 10 jsr print_uint16_loop (1) 108B : 38 pop A (1) 108C : print_uint16_zero: diff --git a/samples/mc6805/arith.inc b/samples/mc6805/arith.inc index 6c579ea2..4561bc19 100644 --- a/samples/mc6805/arith.inc +++ b/samples/mc6805/arith.inc @@ -278,11 +278,11 @@ mul16_multiply: mul16_end: rts -;;; Unsigned division: dividend / divisor = quotient ... reminder +;;; Unsigned division: dividend / divisor = quotient ... remainder ;;; @praram R1 dividend ;;; @praram R2 divisor ;;; @return R0 quotient -;;; @return R1 reminder +;;; @return R1 remainder ;;; @clobber R2 udiv16: lda R2H @@ -329,11 +329,11 @@ udiv16_next: udiv16_end: rts -;;; Division; dividend / divisor = quotient ... reminder +;;; Division; dividend / divisor = quotient ... remainder ;;; @param R1 dividend ;;; @param R2 divisor ;;; @return R0 quotient -;;; @return R1 reminder +;;; @return R1 remainder ;;; @clobber R2 div16: lda R1H diff --git a/samples/mc6805/arith.lst b/samples/mc6805/arith.lst index e9a830b4..ec2b211b 100644 --- a/samples/mc6805/arith.lst +++ b/samples/mc6805/arith.lst @@ -770,11 +770,11 @@ (1) 63A : mul16_end: (1) 63A : 81 rts (1) 63B : -(1) 63B : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 63B : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 63B : ;;; @praram R1 dividend (1) 63B : ;;; @praram R2 divisor (1) 63B : ;;; @return R0 quotient -(1) 63B : ;;; @return R1 reminder +(1) 63B : ;;; @return R1 remainder (1) 63B : ;;; @clobber R2 (1) 63B : udiv16: (1) 63B : B6 14 lda R2H @@ -821,11 +821,11 @@ (1) 681 : udiv16_end: (1) 681 : 81 rts (1) 682 : -(1) 682 : ;;; Division; dividend / divisor = quotient ... reminder +(1) 682 : ;;; Division; dividend / divisor = quotient ... remainder (1) 682 : ;;; @param R1 dividend (1) 682 : ;;; @param R2 divisor (1) 682 : ;;; @return R0 quotient -(1) 682 : ;;; @return R1 reminder +(1) 682 : ;;; @return R1 remainder (1) 682 : ;;; @clobber R2 (1) 682 : div16: (1) 682 : B6 12 lda R1H diff --git a/samples/mc6805/mandelbrot.lst b/samples/mc6805/mandelbrot.lst index 6cc6d529..aae8a538 100644 --- a/samples/mc6805/mandelbrot.lst +++ b/samples/mc6805/mandelbrot.lst @@ -772,11 +772,11 @@ (1) 583 : mul16_end: (1) 583 : 81 rts (1) 584 : -(1) 584 : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 584 : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 584 : ;;; @praram R1 dividend (1) 584 : ;;; @praram R2 divisor (1) 584 : ;;; @return R0 quotient -(1) 584 : ;;; @return R1 reminder +(1) 584 : ;;; @return R1 remainder (1) 584 : ;;; @clobber R2 (1) 584 : udiv16: (1) 584 : B6 57 lda R2H @@ -823,11 +823,11 @@ (1) 5CA : udiv16_end: (1) 5CA : 81 rts (1) 5CB : -(1) 5CB : ;;; Division; dividend / divisor = quotient ... reminder +(1) 5CB : ;;; Division; dividend / divisor = quotient ... remainder (1) 5CB : ;;; @param R1 dividend (1) 5CB : ;;; @param R2 divisor (1) 5CB : ;;; @return R0 quotient -(1) 5CB : ;;; @return R1 reminder +(1) 5CB : ;;; @return R1 remainder (1) 5CB : ;;; @clobber R2 (1) 5CB : div16: (1) 5CB : B6 55 lda R1H diff --git a/samples/scn2650/arith.inc b/samples/scn2650/arith.inc index 0b8b480c..df245370 100644 --- a/samples/scn2650/arith.inc +++ b/samples/scn2650/arith.inc @@ -213,10 +213,10 @@ mulsi2_sign: mulsi2_r2: res 1 -;;; Unsigned division: dividend / divisor = quotient ... reminder +;;; Unsigned division: dividend / divisor = quotient ... remainder ;;; @praram udiv16_dividend ;;; @praram udiv16_divisor -;;; @return udiv16_reminder reminder +;;; @return udiv16_reminder remainder ;;; @return R0:R1 quotient ;;; @clobber R0 R1 PSL udiv16: @@ -297,7 +297,7 @@ udiv16_next: ;;; Signed division: dividend /= divisor ;;; @param @R2: dividend ;;; @param @R3: divisor -;;; @return udiv16_reminder: reminder +;;; @return udiv16_reminder: remainder ;;; @clobber R0 R1 PSL divsi2: loda,r0 arith_work,r2 diff --git a/samples/scn2650/arith.lst b/samples/scn2650/arith.lst index 106209f4..03e85b60 100644 --- a/samples/scn2650/arith.lst +++ b/samples/scn2650/arith.lst @@ -596,10 +596,10 @@ (1) 129A : mulsi2_r2: (1) 129A : res 1 (1) 129B : -(1) 129B : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 129B : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 129B : ;;; @praram udiv16_dividend (1) 129B : ;;; @praram udiv16_divisor -(1) 129B : ;;; @return udiv16_reminder reminder +(1) 129B : ;;; @return udiv16_reminder remainder (1) 129B : ;;; @return R0:R1 quotient (1) 129B : ;;; @clobber R0 R1 PSL (1) 129B : udiv16: @@ -680,7 +680,7 @@ (1) 1313 : ;;; Signed division: dividend /= divisor (1) 1313 : ;;; @param @R2: dividend (1) 1313 : ;;; @param @R3: divisor -(1) 1313 : ;;; @return udiv16_reminder: reminder +(1) 1313 : ;;; @return udiv16_reminder: remainder (1) 1313 : ;;; @clobber R0 R1 PSL (1) 1313 : divsi2: (1) 1313 : 0E 6F 00 loda,r0 arith_work,r2 diff --git a/samples/scn2650/mandelbrot.lst b/samples/scn2650/mandelbrot.lst index 01449cf0..eab43716 100644 --- a/samples/scn2650/mandelbrot.lst +++ b/samples/scn2650/mandelbrot.lst @@ -662,10 +662,10 @@ (1) 12E6 : mulsi2_r2: (1) 12E6 : res 1 (1) 12E7 : -(1) 12E7 : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 12E7 : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 12E7 : ;;; @praram udiv16_dividend (1) 12E7 : ;;; @praram udiv16_divisor -(1) 12E7 : ;;; @return udiv16_reminder reminder +(1) 12E7 : ;;; @return udiv16_reminder remainder (1) 12E7 : ;;; @return R0:R1 quotient (1) 12E7 : ;;; @clobber R0 R1 PSL (1) 12E7 : udiv16: @@ -746,7 +746,7 @@ (1) 135F : ;;; Signed division: dividend /= divisor (1) 135F : ;;; @param @R2: dividend (1) 135F : ;;; @param @R3: divisor -(1) 135F : ;;; @return udiv16_reminder: reminder +(1) 135F : ;;; @return udiv16_reminder: remainder (1) 135F : ;;; @clobber R0 R1 PSL (1) 135F : divsi2: (1) 135F : 0E 6F 00 loda,r0 arith_work,r2 diff --git a/samples/z86/arith.inc b/samples/z86/arith.inc index d292f9e4..7b53cd3b 100644 --- a/samples/z86/arith.inc +++ b/samples/z86/arith.inc @@ -195,10 +195,10 @@ mulsi2_end: ld 1(R4), R15 ret -;;; Unsigned division: dividend / divisor = quotient ... reminder +;;; Unsigned division: dividend / divisor = quotient ... remainder ;;; @praram RR14: dividend ;;; @praram RR12: divisor -;;; @return RR14: reminder +;;; @return RR14: remainder ;;; @return RR12: quotient ;;; @clobber R10-R15 udiv16: @@ -236,7 +236,7 @@ udiv16_readd: add R15, R13 ; dividend += divisor adc R14, R12 ; FLAG.D is always cleared udiv16_next: - djnz R9, udiv16_loop ; RR14=reminder + djnz R9, udiv16_loop ; RR14=remainder ld R12, R10 ; RR12=quotient ld R13, R11 udiv16_end: diff --git a/samples/z86/arith.lst b/samples/z86/arith.lst index 0b9bc67f..1d838552 100644 --- a/samples/z86/arith.lst +++ b/samples/z86/arith.lst @@ -695,10 +695,10 @@ (1) 13D8 : D7 F4 01 ld 1(R4), R15 (1) 13DB : AF ret (1) 13DC : -(1) 13DC : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 13DC : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 13DC : ;;; @praram RR14: dividend (1) 13DC : ;;; @praram RR12: divisor -(1) 13DC : ;;; @return RR14: reminder +(1) 13DC : ;;; @return RR14: remainder (1) 13DC : ;;; @return RR12: quotient (1) 13DC : ;;; @clobber R10-R15 (1) 13DC : udiv16: @@ -736,7 +736,7 @@ (1) 1410 : 02 FD add R15, R13 ; dividend += divisor (1) 1412 : 12 EC adc R14, R12 ; FLAG.D is always cleared (1) 1414 : udiv16_next: -(1) 1414 : 9A E5 djnz R9, udiv16_loop ; RR14=reminder +(1) 1414 : 9A E5 djnz R9, udiv16_loop ; RR14=remainder (1) 1416 : C8 EA ld R12, R10 ; RR12=quotient (1) 1418 : D8 EB ld R13, R11 (1) 141A : udiv16_end: diff --git a/samples/z86/mandelbrot.lst b/samples/z86/mandelbrot.lst index 1fe75393..e3540b37 100644 --- a/samples/z86/mandelbrot.lst +++ b/samples/z86/mandelbrot.lst @@ -706,10 +706,10 @@ (1) 328 : D7 F4 01 ld 1(R4), R15 (1) 32B : AF ret (1) 32C : -(1) 32C : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 32C : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 32C : ;;; @praram RR14: dividend (1) 32C : ;;; @praram RR12: divisor -(1) 32C : ;;; @return RR14: reminder +(1) 32C : ;;; @return RR14: remainder (1) 32C : ;;; @return RR12: quotient (1) 32C : ;;; @clobber R10-R15 (1) 32C : udiv16: @@ -747,7 +747,7 @@ (1) 360 : 02 FD add R15, R13 ; dividend += divisor (1) 362 : 12 EC adc R14, R12 ; FLAG.D is always cleared (1) 364 : udiv16_next: -(1) 364 : 9A E5 djnz R9, udiv16_loop ; RR14=reminder +(1) 364 : 9A E5 djnz R9, udiv16_loop ; RR14=remainder (1) 366 : C8 EA ld R12, R10 ; RR12=quotient (1) 368 : D8 EB ld R13, R11 (1) 36A : udiv16_end: diff --git a/samples/z88/arith.inc b/samples/z88/arith.inc index a0976f3d..b7b4d2b9 100644 --- a/samples/z88/arith.inc +++ b/samples/z88/arith.inc @@ -174,10 +174,10 @@ mulsi2_end: ld 1(R4), R15 ret -;;; Unsigned division: dividend / divisor = quotient ... reminder +;;; Unsigned division: dividend / divisor = quotient ... remainder ;;; @praram RR14: dividend ;;; @praram RR12: divisor -;;; @return RR14: reminder +;;; @return RR14: remainder ;;; @return RR12: quotient ;;; @clobber R10-R15 udiv16: @@ -190,7 +190,7 @@ udiv16: ldw RR10, RR14 div RR10, R13 ; calculate RR14/R13 jr ov, udiv16_8 ; branch if quotient is overflowed - ld R12, #0 ; R10=reminder, R11=quotient + ld R12, #0 ; R10=remainder, R11=quotient ld R13, R11 ld R14, R12 ld R15, R10 @@ -203,16 +203,16 @@ udiv16_8: ld R10, #0 div RR10, R9 ld R12, R11 ; high(quotient)=high(dividend)/divisor - ld R14, R10 ; high(reminder)=high(dividend)%divisor + ld R14, R10 ; high(remainder)=high(dividend)%divisor pop R11 ; low(dividend) ld R10, #0 div RR10, R9 ld R13, R11 ; low(quotient)=low(dividend)/divisor - ld R15, R10 ; low(reminder)=low(dividend)%divisor - div RR14, R9 ; R14=reminder, R15=quotient + ld R15, R10 ; low(remainder)=low(dividend)%divisor + div RR14, R9 ; R14=remainder, R15=quotient add R13, R15 ; adjust quotient adc R12, #0 - ld R15, R14 ; reminder + ld R15, R14 ; remainder ld R14, R12 pop R9 ret @@ -246,7 +246,7 @@ udiv16_readd: add R15, R13 ; dividend += divisor adc R14, R12 ; FLAG.D is always cleared udiv16_next: - djnz R9, udiv16_loop ; RR14=reminder + djnz R9, udiv16_loop ; RR14=remainder ldw RR12, RR10 ; RR12=quotient pop R9 udiv16_end: diff --git a/samples/z88/arith.lst b/samples/z88/arith.lst index 92d34082..debf0493 100644 --- a/samples/z88/arith.lst +++ b/samples/z88/arith.lst @@ -670,10 +670,10 @@ (1) 1248 : 97 F4 01 ld 1(R4), R15 (1) 124B : AF ret (1) 124C : -(1) 124C : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 124C : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 124C : ;;; @praram RR14: dividend (1) 124C : ;;; @praram RR12: divisor -(1) 124C : ;;; @return RR14: reminder +(1) 124C : ;;; @return RR14: remainder (1) 124C : ;;; @return RR12: quotient (1) 124C : ;;; @clobber R10-R15 (1) 124C : udiv16: @@ -686,7 +686,7 @@ (1) 1258 : C4 CE CA ldw RR10, RR14 (1) 125B : 94 CD CA div RR10, R13 ; calculate RR14/R13 (1) 125E : 4B 09 jr ov, udiv16_8 ; branch if quotient is overflowed -(1) 1260 : CC 00 ld R12, #0 ; R10=reminder, R11=quotient +(1) 1260 : CC 00 ld R12, #0 ; R10=remainder, R11=quotient (1) 1262 : D8 CB ld R13, R11 (1) 1264 : E8 CC ld R14, R12 (1) 1266 : F8 CA ld R15, R10 @@ -699,16 +699,16 @@ (1) 1271 : AC 00 ld R10, #0 (1) 1273 : 94 C9 CA div RR10, R9 (1) 1276 : C8 CB ld R12, R11 ; high(quotient)=high(dividend)/divisor -(1) 1278 : E8 CA ld R14, R10 ; high(reminder)=high(dividend)%divisor +(1) 1278 : E8 CA ld R14, R10 ; high(remainder)=high(dividend)%divisor (1) 127A : 50 CB pop R11 ; low(dividend) (1) 127C : AC 00 ld R10, #0 (1) 127E : 94 C9 CA div RR10, R9 (1) 1281 : D8 CB ld R13, R11 ; low(quotient)=low(dividend)/divisor -(1) 1283 : F8 CA ld R15, R10 ; low(reminder)=low(dividend)%divisor -(1) 1285 : 94 C9 CE div RR14, R9 ; R14=reminder, R15=quotient +(1) 1283 : F8 CA ld R15, R10 ; low(remainder)=low(dividend)%divisor +(1) 1285 : 94 C9 CE div RR14, R9 ; R14=remainder, R15=quotient (1) 1288 : 02 DF add R13, R15 ; adjust quotient (1) 128A : 16 CC 00 adc R12, #0 -(1) 128D : F8 CE ld R15, R14 ; reminder +(1) 128D : F8 CE ld R15, R14 ; remainder (1) 128F : E8 CC ld R14, R12 (1) 1291 : 50 C9 pop R9 (1) 1293 : AF ret @@ -742,7 +742,7 @@ (1) 12C0 : 02 FD add R15, R13 ; dividend += divisor (1) 12C2 : 12 EC adc R14, R12 ; FLAG.D is always cleared (1) 12C4 : udiv16_next: -(1) 12C4 : 9A E5 djnz R9, udiv16_loop ; RR14=reminder +(1) 12C4 : 9A E5 djnz R9, udiv16_loop ; RR14=remainder (1) 12C6 : C4 CA CC ldw RR12, RR10 ; RR12=quotient (1) 12C9 : 50 C9 pop R9 (1) 12CB : udiv16_end: diff --git a/samples/z88/mandelbrot.lst b/samples/z88/mandelbrot.lst index a7873f93..34d4e979 100644 --- a/samples/z88/mandelbrot.lst +++ b/samples/z88/mandelbrot.lst @@ -709,10 +709,10 @@ (1) 122F : 97 F4 01 ld 1(R4), R15 (1) 1232 : AF ret (1) 1233 : -(1) 1233 : ;;; Unsigned division: dividend / divisor = quotient ... reminder +(1) 1233 : ;;; Unsigned division: dividend / divisor = quotient ... remainder (1) 1233 : ;;; @praram RR14: dividend (1) 1233 : ;;; @praram RR12: divisor -(1) 1233 : ;;; @return RR14: reminder +(1) 1233 : ;;; @return RR14: remainder (1) 1233 : ;;; @return RR12: quotient (1) 1233 : ;;; @clobber R10-R15 (1) 1233 : udiv16: @@ -725,7 +725,7 @@ (1) 123F : C4 CE CA ldw RR10, RR14 (1) 1242 : 94 CD CA div RR10, R13 ; calculate RR14/R13 (1) 1245 : 4B 09 jr ov, udiv16_8 ; branch if quotient is overflowed -(1) 1247 : CC 00 ld R12, #0 ; R10=reminder, R11=quotient +(1) 1247 : CC 00 ld R12, #0 ; R10=remainder, R11=quotient (1) 1249 : D8 CB ld R13, R11 (1) 124B : E8 CC ld R14, R12 (1) 124D : F8 CA ld R15, R10 @@ -738,16 +738,16 @@ (1) 1258 : AC 00 ld R10, #0 (1) 125A : 94 C9 CA div RR10, R9 (1) 125D : C8 CB ld R12, R11 ; high(quotient)=high(dividend)/divisor -(1) 125F : E8 CA ld R14, R10 ; high(reminder)=high(dividend)%divisor +(1) 125F : E8 CA ld R14, R10 ; high(remainder)=high(dividend)%divisor (1) 1261 : 50 CB pop R11 ; low(dividend) (1) 1263 : AC 00 ld R10, #0 (1) 1265 : 94 C9 CA div RR10, R9 (1) 1268 : D8 CB ld R13, R11 ; low(quotient)=low(dividend)/divisor -(1) 126A : F8 CA ld R15, R10 ; low(reminder)=low(dividend)%divisor -(1) 126C : 94 C9 CE div RR14, R9 ; R14=reminder, R15=quotient +(1) 126A : F8 CA ld R15, R10 ; low(remainder)=low(dividend)%divisor +(1) 126C : 94 C9 CE div RR14, R9 ; R14=remainder, R15=quotient (1) 126F : 02 DF add R13, R15 ; adjust quotient (1) 1271 : 16 CC 00 adc R12, #0 -(1) 1274 : F8 CE ld R15, R14 ; reminder +(1) 1274 : F8 CE ld R15, R14 ; remainder (1) 1276 : E8 CC ld R14, R12 (1) 1278 : 50 C9 pop R9 (1) 127A : AF ret @@ -781,7 +781,7 @@ (1) 12A7 : 02 FD add R15, R13 ; dividend += divisor (1) 12A9 : 12 EC adc R14, R12 ; FLAG.D is always cleared (1) 12AB : udiv16_next: -(1) 12AB : 9A E5 djnz R9, udiv16_loop ; RR14=reminder +(1) 12AB : 9A E5 djnz R9, udiv16_loop ; RR14=remainder (1) 12AD : C4 CA CC ldw RR12, RR10 ; RR12=quotient (1) 12B0 : 50 C9 pop R9 (1) 12B2 : udiv16_end: