off-by-1 bug in okvs_get

2024-06-01 08:41:31 +00:00 · 2018-11-19 20:52:12 -05:00 · 2018-11-19 20:52:12 -05:00 · db29def11f
commit db29def11f
parent 69dda82958
1 changed files with 1 additions and 3 deletions
--- a/src/okvs.a
+++ b/src/okvs.a
@ -208,9 +208,7 @@ okvs_get
         ldy   #0
         lda   (PTR),y
         beq   @fail                 ; no keys, fail immediately
-         tax                         ; X = number of keys
-         inx
-         stx   @maxkeys
+         sta   @maxkeys              ; A = number of keys
         ldx   #0
         jsr   incptr                ; PTR -> first record
         +LDPARAM 3