d6
/
nxu
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

improve comment compatibility

This commit is contained in:
~d6 2022-04-20 23:02:27 -04:00
parent 5172fc95d7
commit 210ab31b6e
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
femto.tal
View File

@ -30,8 +30,8 @@
( these save one byte and are easier to read. ) ( these save one byte and are easier to read. )
%emit-! { LIT2 '! 18 DEO } %emit-! { LIT2 '! 18 DEO }
%emit-$ { LIT2 '$ 18 DEO } %emit-$ { LIT2 '$ 18 DEO }
%emit-( { LIT2 '( 18 DEO } %emit-lpar { LIT2 28 18 DEO }
%emit-) { LIT2 ') 18 DEO } %emit-rpar { LIT2 29 18 DEO }
%emit-, { LIT2 ', 18 DEO } %emit-, { LIT2 ', 18 DEO }
%emit-0 { LIT2 '0 18 DEO } %emit-0 { LIT2 '0 18 DEO }
%emit-1 { LIT2 '1 18 DEO } %emit-1 { LIT2 '1 18 DEO }
@ -1154,11 +1154,11 @@
sp sp
.buffer/line-count LDZ2 ;emit-dec2 JSR2 .buffer/line-count LDZ2 ;emit-dec2 JSR2
;messages/lines ;print JSR2 ;messages/lines ;print JSR2
sp emit-( sp emit-lpar
;cur-col JSR2 INC2 ;emit-dec2 JSR2 ;cur-col JSR2 INC2 ;emit-dec2 JSR2
emit-, emit-,
.cursor/row LDZ2 INC2 ;emit-dec2 JSR2 .cursor/row LDZ2 INC2 ;emit-dec2 JSR2
emit-) sp emit-[ emit-rpar sp emit-[
LIT 's .config/insert-tabs LDZ ADD emit LIT 's .config/insert-tabs LDZ ADD emit
emit-] sp emit-] sp
;messages/help-msg ;print JSR2 ;messages/help-msg ;print JSR2