changeset 32:0a476b3e0ec4

Fix STOP to show BREAK message in immediate mode
author William Astle <lost@l-w.ca>
date Mon, 21 Nov 2022 22:22:17 -0700
parents e74a975b38d9
children 317b81c81808
files src/lwbasic.s
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/lwbasic.s	Mon Nov 21 22:22:01 2022 -0700
+++ b/src/lwbasic.s	Mon Nov 21 22:22:17 2022 -0700
@@ -1100,8 +1100,7 @@
                 ldx curstmt                     ; get current statement address
                 stx contstmt                    ; save it for CONT
 cmd_stop2       rol endflag                     ; get STOP/END to C (1=STOP)
-                ldx curline                     ; immediate mode?
-                beq cmd_stop3                   ; brif so - just return END/STOP status
+                bcc cmd_stop3                   ; brif END - don't do message
                 ldx #breakmsg                   ; do "BREAK IN"
                 jmp ERROR2                      ; the bottom half of the error handler can deal with the details
 cmd_stop3       puls x,pc                       ; lose return address and return to caller of interpretation loop