more aliases cleanup
This commit is contained in:
1 parent
2d5bf15ac9
commit
1130db35e0
6 files changed
+68
-81
No files matched your search
@@ -5,9 +5,9 @@ basic_parse_line_number:
|
||||
|
||||
// Check if the number is a valid line number
|
||||
// i.e., 16 bits, no exponent, no decimal
|
||||
lda basic_fac1_mantissa+2
|
||||
ora basic_fac1_mantissa+3
|
||||
ora basic_fac1_exponent
|
||||
lda FAC1_mantissa+2
|
||||
ora FAC1_mantissa+3
|
||||
ora FAC1_exponent
|
||||
beq !+
|
||||
ml_bad_line_number:
|
||||
// Invalid line number
|
||||
@@ -19,9 +19,9 @@ ml_bad_line_number:
|
||||
bne ml_bad_line_number
|
||||
|
||||
// Got a valid line number.
|
||||
lda basic_fac1_mantissa+0
|
||||
lda FAC1_mantissa+0
|
||||
sta basic_line_number+0
|
||||
lda basic_fac1_mantissa+1
|
||||
lda FAC1_mantissa+1
|
||||
sta basic_line_number+1
|
||||
clc
|
||||
rts
|
||||
Reference in new issue
Block a user