test28.b 138 B

1234567
  1. 10 rem reading beyond eof
  2. 11 open "r",#1,"tst/test01"
  3. 13 print eof(#1)
  4. 20 while eof(#1) <> -1
  5. 22 line #1, l$
  6. 23 print eof(#1), l
  7. 24 wend