1 files changed, 6 insertions(+), 8 deletions(-)

M src/left.tal

@@ 603,9 603,8 @@ JMP2r
 
 	.selection/from LDZ2 #0001 SUB2
 		DUP2 trim
-		select-start
 
-JMP2r
+!select-start
 
 ( .. )
 


@@ 626,9 625,9 @@ JMP2r
 @trim ( addr* -- )
 
 	get-eof #0001 msfl
-	#ffff mod-length
+	#ffff
 
-JMP2r
+!mod-length
 
 @is-selected ( addr* -- addr* bool )
 


@@ 1059,10 1058,9 @@ JMP2r
 
 @get-segw ( addr* -- addr* width* )
 
-	DUP2 is-rune ?&special
-	LDAk get-chrw
+	DUP2 is-rune ?&special LDAk
 
-JMP2r
+!get-chrw
 	&special #0007 JMP2r
 
 @get-chrw ( c -- width* )


@@ 1319,6 1317,6 @@ JMP2r
 JMP2r
 	&found SWP2 SUB2 JMP2r
 
-@runes [ ",_.-;=?! ] $1
+@runes [ ",_.-;=!? ] $1
 
 ~src/manifest.tal