Minor optimization
1 files changed, 2 insertions(+), 2 deletions(-) M src/main.tal
M src/main.tal => src/main.tal +2 -2
@@ 1207,7 1207,7 @@ RTN STH2 #0c #00 &loop DUP DUP TOS STH2kr ++ LDA DUPk TOS STH2kr ++ LDA SWP .path/name + STZ INC GTHk ,&loop JCN ( end ) #00 SWP .path/name + STZ @@ 1240,7 1240,7 @@ RTN #1000 #0000 &loop DUP2 BANK-TEMP ++ LDA STH DUP2 [ DUP2 8// 8** ++ ] BANK ++ STHr ROT ROT STA DUP2k [ 8// 8** ++ ] BANK ++ STHr ROT ROT STA INC2 GTH2k ,&loop JCN POP2 POP2