From e1462ae9894ea6122876d22faa9d566b7a6678be Mon Sep 17 00:00:00 2001 From: Paul Gardner-Stephen Date: Sun, 28 Apr 2019 16:20:04 +0930 Subject: [PATCH] replace out of range branch to stop inference by Ophis --- c64/basic/pack_word.s | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/c64/basic/pack_word.s b/c64/basic/pack_word.s index b1119b07..e9e42de1 100644 --- a/c64/basic/pack_word.s +++ b/c64/basic/pack_word.s @@ -190,8 +190,9 @@ consider_next_char: ;; Pack next char inx dec tokenise_work1 - bne pack_char_loop - + beq + + jmp pack_char_loop +* ;; Add 1 to length if nybl waiting to be flushed ;; (but leave flag set so the caller knows if the ;; bottom nybl might be different if the string were