( dev/console )

(
	Copies data from stdin to both stdout and stderr.
)

%RTN { JMP2r }

|10 @Console [ &vector $2 &read $1 &pad $5 &write $1 &error $1 ]

( init )

|0100 ( -> )

	;on-stdin .Console/vector DEO2

BRK

@on-stdin ( -> )

	.Console/read DEI
	DUP .Console/write DEO
	.Console/error DEO

BRK