commit 806b8c0fa922d394eaea8aa33dc3762da5a8e4f6
parent c6ed7170e7cad48c20afdfe344226bbab59a6210
Author: Devine Lu Linvega <aliceffekt@gmail.com>
Date: Sun, 31 Jul 2022 11:35:45 -0700
(hexdump.tal)Removed trailing short
Diffstat:
1 file changed, 5 insertions(+), 6 deletions(-)
diff --git a/projects/utils/hexdump.tal b/projects/utils/hexdump.tal
@@ -28,15 +28,14 @@ BRK
LIT2r 0000
&stream
#0000 ,&buf STR2
- ;&buf
- DUP2 .File/read DEO2
- LDA2 ,print JSR #2018 DEO
+ ;&buf .File/read DEO2
+ .File/success DEI2 #0000 EQU2 ,&eof JCN
+ ;&buf LDA2 ,print JSR #2018 DEO
INC2r
( linebreak )
STH2kr #0007 AND2 ORA ,&no-lb JCN
- #0a18 DEO
- &no-lb
- .File/success DEI2 ORA ,&stream JCN
+ #0a18 DEO &no-lb
+ ,&stream JMP &eof
POP2r
#010f DEO