When pugs is invoked as C<pugs -> so that it reads the program from
standard in, I think it should re-open stdin before the code is
executed.

In perl 5:
--

[EMAIL PROTECTED]:~/pugs$ perl -

while (<STDIN>) {
  print $_;
}

(Ctrl+d)
I type and it repeats
I type and it repeats


In pugs:
--

[EMAIL PROTECTED]:~/pugs$ ./pugs -

for =$*IN -> $line {
  print $line;
}

(Ctrl+d)
Fail: <stdin>: hGetContents: illegal operation (handle is closed)

However, it does work if I put it in a file and run it the normal way.

Tom

Reply via email to