(hexdump.tal)Removed trailing short
This commit is contained in:
parent
c6ed7170e7
commit
806b8c0fa9
|
@ -28,15 +28,14 @@ BRK
|
||||||
LIT2r 0000
|
LIT2r 0000
|
||||||
&stream
|
&stream
|
||||||
#0000 ,&buf STR2
|
#0000 ,&buf STR2
|
||||||
;&buf
|
;&buf .File/read DEO2
|
||||||
DUP2 .File/read DEO2
|
.File/success DEI2 #0000 EQU2 ,&eof JCN
|
||||||
LDA2 ,print JSR #2018 DEO
|
;&buf LDA2 ,print JSR #2018 DEO
|
||||||
INC2r
|
INC2r
|
||||||
( linebreak )
|
( linebreak )
|
||||||
STH2kr #0007 AND2 ORA ,&no-lb JCN
|
STH2kr #0007 AND2 ORA ,&no-lb JCN
|
||||||
#0a18 DEO
|
#0a18 DEO &no-lb
|
||||||
&no-lb
|
,&stream JMP &eof
|
||||||
.File/success DEI2 ORA ,&stream JCN
|
|
||||||
POP2r
|
POP2r
|
||||||
#010f DEO
|
#010f DEO
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue