~rabbits/dexe

fd25b112fbe7d6d7db57d3cddfdaabbdd8227e92 — neauoire 1 year, 10 months ago ec284ce
Only advance on char view
1 files changed, 4 insertions(+), 4 deletions(-)

M src/dexe.tal
M src/dexe.tal => src/dexe.tal +4 -4
@@ 437,11 437,11 @@ JMP2r
	&loop
		STH2k [ LIT &c $1 ] STH2r STA
		INC2 GTH2k ,&loop JCN
	( advance selection when 1 cell )
	POP2 .selection/from LDZ2 SUB2 NIP #01 GTH ,&no-advance JCN
		;move-right JSR2
		&no-advance
	#01 .state/changed STZ
	( advance selection when 1 cell )
	POP2 .selection/from LDZ2 SUB2 NIP #01 EQU
	.selection/mode LDZ
		AND ;move-right JCN2
	;redraw ( .. )

JMP2