Trouble with eof...

Local myfile:TStream = OpenStream("test.txt")
While Not Eof(myfile)
   Print ReadLine(myfile)
Wend
SeekStream(myfile, StreamSize(myfile))
WriteLine(myfile, "yada")
CloseStream(myfile)
FlushMem