small cleanup in BASIC

This commit is contained in:
FeralChild64 committed 2020-06-22 18:45:24 +02:00
1 parent 37b32759dc
commit 524d532433
8 files changed
+64 -48

No files matched your search

+2 -17
View File
@@ -11,7 +11,7 @@ fetch_device_secondary:
// Fetch the device number
jsr fetch_device_secondary_uint8
jsr fetch_coma_uint8
bcs fetch_device_secondary_done
sta FA
@@ -22,7 +22,7 @@ fetch_secondary:
// Fetch secondary address
jsr fetch_device_secondary_uint8
jsr fetch_coma_uint8
bcs fetch_device_secondary_done
sta SA
@@ -32,18 +32,3 @@ fetch_secondary:
fetch_device_secondary_done:
rts
fetch_device_secondary_uint8: // also called by 'cmd_merge'
jsr injest_comma
bcs !+
jsr injest_spaces
jsr basic_parse_line_number
lda LINNUM+1
bne_16 do_ILLEGAL_QUANTITY_error
lda LINNUM+0
clc
!:
rts