2021-06-27 20:45:50 +00:00
|
|
|
( dev/console )
|
|
|
|
|
2021-07-11 16:51:11 +00:00
|
|
|
(
|
|
|
|
Copies data from stdin to both stdout and stderr.
|
|
|
|
)
|
|
|
|
|
2021-06-28 16:40:29 +00:00
|
|
|
%RTN { JMP2r }
|
|
|
|
|
2021-07-11 16:51:11 +00:00
|
|
|
|10 @Console [ &vector $2 &read $1 &pad $5 &write $1 &error $1 ]
|
2021-06-27 20:45:50 +00:00
|
|
|
|
|
|
|
( init )
|
|
|
|
|
|
|
|
|0100 ( -> )
|
2021-06-28 16:40:29 +00:00
|
|
|
|
2021-06-27 20:45:50 +00:00
|
|
|
;on-stdin .Console/vector DEO2
|
2021-06-28 16:40:29 +00:00
|
|
|
|
2021-06-27 20:45:50 +00:00
|
|
|
BRK
|
|
|
|
|
|
|
|
@on-stdin ( -> )
|
2021-06-28 16:40:29 +00:00
|
|
|
|
2021-07-11 16:51:11 +00:00
|
|
|
.Console/read DEI
|
|
|
|
DUP .Console/write DEO
|
|
|
|
.Console/error DEO
|
2021-06-28 16:40:29 +00:00
|
|
|
|
|
|
|
BRK
|
|
|
|
|