clean up errors

This commit is contained in:
Kelvin Sherlock 2015-08-14 21:43:06 -04:00
parent e3208576c2
commit 37b79d95da
1 changed files with 5 additions and 9 deletions

View File

@ -548,26 +548,22 @@ do_name_buffer_1 proc
lda [ptr] ; total output buffer size
sec
sbc #4
bmi pre
bmi error
cmp 1,s
bcs ok
bts
pla
error_store_size
ldy #2
sta [ptr],y
error
pla
lda #buff_too_small
sta tool_error
plx
rts
pre
pla
lda #parm_range_err
sta tool_error
plx
rts
ok
pla ; strlen
ldy #2