lang/basic/test/test19.b

   1 100 read a
   2 110 print a
   3 120 restore
   4 130 read b
   5 140 print b
   6 142 restore
   7 143 restore 170
   8 144 read b,c
   9 145 print b,c
  10 146 print "try to read beyond eof"
  11 147 read d
  12 148 print d
  13 150 data 6
  14 170 data 8,9
  15 180 end