Mercurial > hg > index.cgi
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