fix char under cursor draw/undraw bug

This commit is contained in:
Paul Gardner-Stephen committed 2019-04-22 12:31:45 +09:30
1 parent b257ac8234
commit 296fdcfd7a
2 files changed
+6 -2

No files matched your search

+5
View File
@@ -5,6 +5,11 @@
;; cursor_is_visible
;; colour_under_cursor
show_cursor_if_enabled:
bit cursor_blink_disable
bpl show_cursor
rts
show_cursor:
;; Set cursor as though it had just finished the off phase,
;; so that the call to blink_cursor paints it
+1 -2
View File
@@ -326,8 +326,7 @@ not_quote:
no_screen_advance_to_next_line:
chrout_done:
;; Make cursor immediately visible
jsr show_cursor
jsr show_cursor_if_enabled
;; Restore X and Y, set carry to mark success on exit
pla