~rabbits/left

cf936eebbf1736bf0f1c283b6e0122afd8d2a02d — neauoire 4 months ago 741cc8c
Toggle highlights
1 files changed, 8 insertions(+), 4 deletions(-)

M src/left.tal
M src/left.tal => src/left.tal +8 -4
@@ 449,10 449,12 @@ JMP2r
@walk-width ( addr* -- addr* width* )

	LDAk
	[ LIT ". ] EQUk NIP ,&special JCN
	[ LIT ", ] EQUk NIP ,&special JCN
	[ LIT "; ] EQUk NIP ,&special JCN
	[ LIT ": ] EQUk NIP ,&special JCN
	.textarea/highlight LDZ ,&skip-highlight JCN
		[ LIT ". ] EQUk NIP ,&special JCN
		[ LIT ", ] EQUk NIP ,&special JCN
		[ LIT "; ] EQUk NIP ,&special JCN
		[ LIT ": ] EQUk NIP ,&special JCN
		&skip-highlight
	#00 SWP ;font ADD2 LDA #00 SWP

JMP2r


@@ 885,6 887,7 @@ JMP2r

	,&color STR

	.textarea/highlight LDZ ,&skip-highlight JCN
	[ LIT ". ] NEQk NIP  ,&no-litzpa JCN
		POP #08 ;litzpa-icn ,&seg JMP
		&no-litzpa


@@ 897,6 900,7 @@ JMP2r
	[ LIT ": ] NEQk NIP  ,&no-rawabs JCN
		POP #08 ;rawabs-icn ,&seg JMP
		&no-rawabs
	&skip-highlight

	DUP #20 SUB #5e GTH ,draw-special JCN