From f18e0d2e2e20df9611c810f4d44f8ba44baa606e Mon Sep 17 00:00:00 2001 From: Devine Lu Linvega Date: Thu, 27 Apr 2023 10:58:52 -0700 Subject: [PATCH] (notepad) Removed unused routines --- gui/notepad/notepad.tal | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/gui/notepad/notepad.tal b/gui/notepad/notepad.tal index b83bafe..fe07846 100644 --- a/gui/notepad/notepad.tal +++ b/gui/notepad/notepad.tal @@ -275,7 +275,7 @@ BRK get-page DUP2 .selection/from STZ2 - scap .selection/to STZ2 + scap #0001 SUB2 .selection/to STZ2 ( >> ) @@ -682,15 +682,12 @@ JMP2r JMP2r &path ".theme $1 - ( @|stdlib ) @msfl ( b* a* len* -- ) STH2 SWP2 EQU2k ?&e &l DUP2k STH2kr ADD2 LDA ROT ROT STA INC2 GTH2k ?&l POP2 POP2 &e POP2r JMP2r @msfr ( b* a* len* -- ) STH2 EQU2k ?&e &l DUP2 LDAk ROT ROT STH2kr ADD2 STA #0001 SUB2 LTH2k ?&l POP2 POP2 &e POP2r JMP2r @scap ( str* -- end* ) LDAk #00 NEQ [ JMP JMP2r ] &w INC2 LDAk ?&w JMP2r -@sput ( chr str* -- ) scap INC2k #00 ROT ROT STA STA JMP2r -@phex ( short* -- ) SWP phex/b &b ( byte -- ) DUP #04 SFT phex/c &c ( char -- ) #0f AND DUP #09 GTH #27 MUL ADD #30 ADD #18 DEO JMP2r ( @|assets )