summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--programs/sub-suite/subeditor.s4
1 files changed, 2 insertions, 2 deletions
diff --git a/programs/sub-suite/subeditor.s b/programs/sub-suite/subeditor.s
index aa9482a..800d565 100644
--- a/programs/sub-suite/subeditor.s
+++ b/programs/sub-suite/subeditor.s
@@ -412,8 +412,8 @@ print_char:
; inc step ;
lda rega ; Get the character back.
jsr get_ctrlidx ; Get the control code jump table index.
- lsl #1 ; Multiply the return value by two, to get the index.
- lea.w e, (ct_jtb+a); Get the address of the control code handler.
+ lea ct_jtb ; Get the pointer to the jump table.
+ mov.w e, (e+2*a); Get the address of the control code handler.
deb ; Reset B.
tba ; Reset A.
jsr (e) ; Jump to the handler for that control code.