[comp.sys.apple2] Need help with Orca/Pascal

billh@hplsla.HP.COM (Bill Harris) (02/26/91)

I have what seems like a simple question about Orca/Pascal on the IIGS.  I
have a 1.25MB machine with 3.5" and 5.25" disks.  My son is writing a
program that reads a text file into an array of records.  The problem comes
in the reset command.  Initially it seemed to work ok, and he could read in
his file just fine.  At that time, he had a few logical problems later in
the program that kept it from stopping, so he used the stop command in the
Orca debugger.  Now everytime he gets to the reset command, it quits with
an error message to the effect that "read (or mark?) is already at end of
file" (that is not an exact quote).

It seems to me that we fixed this once by deleting the text file and
creating a new one.  Now the program shows the same error on trying to read
the new file.

I suspect that somehow Mark is at EOF and that I need to use GSOS calls to
move Mark to the beginning of the file, followed by closing it.  With the
configuration I presently have (and my unfamiliarity with the Orca
directory structure--i.e., where to put the interface files so that Orca
will find them), I haven't successfully done that, although I think I now
see how in the GSOS reference.  (If this is what I need, any hints on doing
this that might save me time will be appreciated.)

Can anyone tell me if this is a problem that should be cured directly in
Pascal?  Shouldn't the system close the file upon exiting the program, even
if it happens through a "Stop" command from the debugger?  (I was guessing
that Stop would close all files at that system level and above.)  Shouldn't
a reset() move Mark back to the beginning of the file?

If you e-mail responses, I will post a summary.

Thanks,

Bill Harris
billh%hplsla@hplabs.hp.com