Problems with file-handling an new GPC Beta
Hello all there ! To test the new Beta-Version of GPC I wrote a little program like this : program test; var i : integer; f : FILE of integer; begin assign(f,'./test.dat'); rewrite(f); for i:=1 to 10 do write(f,i); reset(f); while not (eof(f)) do begin read(f,i); writeln(i); end; close(f); end. When compiling there's no error or anything and it compiles quite nice, but when running my program I get a message like this : chris@bockermann:/home/chris/programs/pascal > ./test ?Gpc: `Reset', SeekUpdate' or `SeekRead' to nonexistent internal file `F' What did I do wrong ? Can anybody help me ? Thanks a lot ! Chris e-mail > chris@bockermann.ping.de ____________________________________ (subject "send pgp-key" for pgp-key)
participants (3)
-
chris@bockermann.ping.de -
George B. Smith -
Jesper Lund