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

M src/nasu.tal

@@ 178,7 178,7 @@ BRK
 	[ #7f ] NEQk NIP ,&no-delete JCN ;filepath #0040 ;mclr JSR2 POP JMP2r &no-delete
 	[ #20 ] GTHk NIP ,&no-special JCN ;untrap JSR2 POP JMP2r &no-special
 	;filepath ;slen JSR2 NIP #3f EQU ,&no-push JCN
-		DUP ;filepath ROT ;sput JSR2
+		DUP ;filepath ;sput JSR2
 		&no-push
 	POP
 


@@ 1385,9 1385,9 @@ JMP2r
 
 JMP2r
 
-@sput ( str* char -- )
+@sput ( char str* -- )
 
-	ROT ROT ,scap JSR STA
+	,scap JSR STA
 
 JMP2r