1 files changed, 2 insertions(+), 2 deletions(-)
M src/left.tal
M src/left.tal => src/left.tal +2 -2
@@ 888,8 888,8 @@ JMP2r
DUP #20 SUB #5e GTH ?draw-special
- ( width ) #00 SWP STH2k ;font ADD2 LDA
- ( addr* ) ;font/glyphs STH2r #0020 SUB2 #50 SFT2 ADD2
+ ( width ) STHk get-chrw NIP
+ ( addr* ) ;font/glyphs #00 STHr #0020 SUB2 #50 SFT2 ADD2
&seg ( width addr* -- )