Kernel 0.93

BIN/MORE.S.txt

@@ -256,15 +256,7 @@ CS.RUN.GETLINE	>PUSHWI	256
 				lda (pPS),y
 
 .1				>SYSCALL fgets
-				bcs .9
-				
-				lda #'\'
-				>PUSHA
-				ldy #S.PS.hStdErr
-				lda (pPS),y
-				>SYSCALL fputc
-				
-.9				rts
+				rts
 *--------------------------------------
 CS.RUN.PRINT	lda bLineNum
 				bpl .1

SYS/KERNEL.S.IO.txt

@@ -574,17 +574,18 @@ IO.WRITE.PIPE	ldy #S.FD.PIPE.S
 
 				bmi IO.READ.PIPE.EOF	Remote PS closed the Pipe
 
-				sec
 				ldy #S.FD.PIPE.Free
 				lda (pFD),y
 				ldy #2
+				sec
 				sbc (pStack),y
+
 				tax
+
 				ldy #S.FD.PIPE.Free+1
 				lda (pFD),y
 				ldy #3
 				sbc (pStack),y
-				
 				bcc IO.READ.PIPE.NODATA	not enough room in PIPE
 
 				ldy #S.FD.PIPE.Free+1