Problems with file-handling an new GPC Beta

Wed, 8 Oct 1997 18:28:22 +0200 (CEST)

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)

Christian Bockermann (chris@bockermann.ping.de (Christian Bockermann))