name comparison logic was backwards.

This commit is contained in:
Kelvin Sherlock 2021-07-18 12:00:37 -04:00
parent e1f5635e6f
commit d2507eb925

View File

@ -571,6 +571,7 @@ next_index
@ok @ok
lda buffer+BTNodeDescriptor.numRecords lda buffer+BTNodeDescriptor.numRecords
beq advance beq advance
xba
sta count sta count
ldx #512-2 ; last entry ldx #512-2 ; last entry
@ -660,6 +661,10 @@ name_check proc
; copy into catstr and upper case it. ; copy into catstr and upper case it.
; save x and y. ; save x and y.
;
; a = 0 if match
; a = -1 if catalog entry < target
; a = +1 if catalog entry > target
with data with data
@ -714,8 +719,8 @@ cmp
@x @x
ldy #0 ldy #0
@loop @loop
lda target_str,y lda cat_str,y
cmp cat_str,y cmp target_str,y
beq @next beq @next
blt lt blt lt
bge gt bge gt