Kernel 0.93

BIN/SH.S.CMD.txt

@@ -1031,7 +1031,7 @@ FOR.EXEC		jsr CORE.ArgV.NextChar	skip "`"
 				>PUSHWI 0				auxtype
 				>PUSHBI 0				type
 				>PUSHBI O.RDONLY+O.TEXT
-				>LEA.G IO.NodBuf
+				>LEA.G IO.FIFO
 				>SYSCALL fopen
 				bcs .9
 

BIN/SH.S.IO.txt

@@ -25,7 +25,7 @@ IO.Pipe.In		>LDA.G IO.hOut
 				>PUSHWI 0				auxtype
 				>PUSHBI 0				type
 				>PUSHBI O.RDONLY
-				>LEA.G IO.NodBuf
+				>LEA.G IO.FIFO
 
 				>SYSCALL fopen
 				bcs IO.Set.RTS
@@ -58,37 +58,17 @@ IO.Reset.In		>LDA.G IO.hIn
 .8				clc
 IO.Reset.In.RTS	rts
 *--------------------------------------
-IO.Pipe.Out		>LDYAI 512
-				>SYSCALL pipe
+IO.Pipe.Out		>PUSHWI 0				mode
+				>LEA.G IO.FIFO
+				>SYSCALL MKFIFO
 				bcs IO.Reset.In.RTS
-				>STA.G IO.hPipe
-				
-				>PUSHA
-				>PUSHBI 1
-				>PUSHW L.NOD.Template
-				>LEA.G IO.NodBuf
-				>SYSCALL sprintf
-
-				>PUSHB.G IO.hPipe
-				>PUSHWI 0
-				>LEA.G IO.NodBuf
-				>SYSCALL mknod
-				bcs .99
 
 				>PUSHWI 0				auxtype
 				>PUSHBI 0				type
 				>PUSHBI O.WRONLY
-				>LEA.G IO.NodBuf
-
+				>LEA.G IO.FIFO
 				>SYSCALL fopen
-				bcc IO.Set.Out
-
-.99				pha
-				>LDA.G IO.hPipe
-				>SYSCALL close
-				pla
-				sec
-				rts
+				bcs IO.Reset.In.RTS
 *--------------------------------------
 IO.Set.Out		pha
 				jsr IO.Reset.Out

BIN/SH.S.txt

@@ -753,11 +753,10 @@ HIS.Index		.BS 1
 IO.hIn			.BS 1
 IO.hOut			.BS 1
 IO.hErr			.BS 1
-IO.hPipe		.BS 1
 
 *M32.BUF			.BS 12					-1234567890\0
 M32.BUF			.EQ *
-IO.NodBuf		.BS 12					/DEV/PIPExx\0
+IO.FIFO			.BS 12					/DEV/FIFOxx\0
 *--------------------------------------
 DS.END			.ED
 *--------------------------------------

SYS/KERNEL.S.STAT.txt

@@ -318,8 +318,6 @@ K.MKFIFO		>STYA ZPPtr1			pathname buffer
 				>LDYA ZPPtr1
 				jsr K.sprintf
 				
-				lda #S.STAT.MODE.FIFO
-				sta K.S.STAT+S.STAT.DEV
 				bra K.MkNod.I
 */--------------------------------------
 * # MkNod