1 files changed, 12 insertions(+), 12 deletions(-)

M src/uxnrea.tal

@@ 79,11 79,21 @@ BRK
 
 @reassemble ( -- )
 
+	( setup export )
+	;dst .File2/name DEO2
+	[ LIT2 01 -File2/delete ] DEO
+	#0001 .File2/length DEO2
+
+	( clear memory )
+	;sym DUP2 .symlen LDZ2 ADD2 SWP2
+	&l
+		#0000 OVR2 STA2
+		INC2 INC2 GTH2k ?&l
+	POP2 POP2
+
 	load-symbols
 	stream
 	#0a emit
-	#0a emit
-
 
 JMP2r
 


@@ 143,15 153,6 @@ JMP2r
 
 JMP2r
 
-@handle-padding ( -- )
-
-	#0918 DEO
-	.nested LDZ #00 EQU ?&no-pad
-		#0918 DEO
-		&no-pad
-
-JMP2r
-
 @handle-style ( label* -- label* )
 
 	( detect scope styles )


@@ 380,7 381,6 @@ JMP2r
 
 	DUP .last LDZ EQU ?&skip
 		DUP emit
-		( handle-padding )
 		&skip
 	POP