# HG changeset patch
# User William Astle <lost@l-w.ca>
# Date 1670646871 25200
# Node ID 1f74c2df443f76227a066899b0cd8e774f25774c
# Parent  090db8c5d5092b7b03d035653ace24d8109a3a2e
Fix jump target for case where keyword lookup finds nothing

diff -r 090db8c5d509 -r 1f74c2df443f src/lwbasic.s
--- a/src/lwbasic.s	Wed Nov 23 22:26:20 2022 -0700
+++ b/src/lwbasic.s	Fri Dec 09 21:34:31 2022 -0700
@@ -1404,7 +1404,7 @@
                 puls d,x                        ; get back input pointer and clear stack temporaries
                 com ,s                          ; set "not token flag"
                 lda ,x+                         ; get character
-                bra tokenize0a                  ; stash it and continue
+                bra tokenize2                   ; stash it and continue
 tokenize11      ldx 2,s                         ; get back start of input token
 tokenize12      ldb ,x+                         ; get input character
                 cmpb #'z                        ; is it above lower case Z?