RosettaCodeData/Task/Copy-stdin-to-stdout/XPL0/copy-stdin-to-stdout.xpl0
2023-07-01 13:44:08 -04:00

5 lines
96 B
Text

int C;
loop [C:= ChIn(1);
if C = $1A \EOF\ then quit;
ChOut(0, C);
]