Fixed first letter of comments (should be upper case).

diff --git a/libsrc/runtime/div.s b/libsrc/runtime/div.s
index b33d852db8254d945a5adcdb57522e13372f4a7c..a67799fdf87b6a75a213f9bca75cbccf614f2950 100644 (file)
--- a/libsrc/runtime/div.s
+++ b/libsrc/runtime/div.s
@@ -14,16 +14,16 @@
 tosdiva0:
         ldx     #0
 tosdivax:
-        pha                         ; check if high-bytes indicate
-        txa                         ; different sign, so that we
-        ldy     #1                  ; negate the result after the operation
-        eor     (sp),y              ; eor with lhs high byte
-        sta     tmp1                ; save post negation indicator to tmp1
-        pla                         ; back to entry accu
+        pha                         ; Check if high-bytes indicate
+        txa                         ; different sign, so that we have to
+        ldy     #1                  ; negate the result after the operation.
+        eor     (sp),y              ; Eor with lhs high byte
+        sta     tmp1                ; Save post negation indicator to tmp1
+        pla                         ; Back to entry accu
         jsr     absvaludiv16
         ldx     ptr1+1
         lda     ptr1
-        ldy     tmp1                ; fetch indicator
+        ldy     tmp1                ; Fetch indicator
         bmi     negate
         rts
 negate: jmp     negax

diff --git a/libsrc/runtime/mod.s b/libsrc/runtime/mod.s
index eb120377be84e6560894b9f5ef62bc46ce8cc9a1..0706ba3159bc83b8a27fa65d89b36e685f7328da 100644 (file)
--- a/libsrc/runtime/mod.s
+++ b/libsrc/runtime/mod.s
@@ -19,14 +19,14 @@ tosmodax:
 ; modulo operation is the same as that of the left operand.
 
         pha                         
-        ldy     #1                  ; prepare lhs operant hi-byte fetch
+        ldy     #1                  ; Prepare lhs operant hi-byte fetch
         lda     (sp),y             
-        sta     tmp1                ; save post negation indicator to tmp1
-        pla                         ; back to entry accu
+        sta     tmp1                ; Save post negation indicator to tmp1
+        pla                         ; Back to entry accu
         jsr     absvaludiv16
-        ldx     sreg+1              ; remainder to return registers
+        ldx     sreg+1              ; Remainder to return registers
         lda     sreg
-        ldy     tmp1                ; fetch indicator
+        ldy     tmp1                ; Fetch indicator
         bmi     negate
         rts
 negate: jmp     negax

diff --git a/libsrc/runtime/negabs.s b/libsrc/runtime/negabs.s
index 5a9ca6e01d6e7a48fc64e5b02b8830631dd229f0..ef660f1da91d55e57fd2b823708e24b5fbcfe5e2 100644 (file)
--- a/libsrc/runtime/negabs.s
+++ b/libsrc/runtime/negabs.s
@@ -9,8 +9,8 @@
         .export         negax
         .export         _abs
 
-_abs:   cpx     #$00            ; test hi byte
-        bpl     L1              ; don't touch if positive
+_abs:   cpx     #$00            ; Test hi byte
+        bpl     L1              ; Don't touch if positive
 negax:  clc
         eor     #$FF
         adc     #1