[Coco] OS-9 Pascal

[Frederick D Provoncha]

On Wed, 16 Feb 2005 13:22:31 -0500 John Donaldson
<jadonaldson at charter.net> writes:
>   I have gotten a little farther. I copied PascalErrs to the /DD/CMDS 
> 
> directory. It now get pass that
> and looks like it does the directery listing of /R0. At least I 
> think it 
> does. It clears the screen and the
> listing is displayed then the screen clears again and it starts the 
> 
> excuting  "qp.startup" over and over.
>   According to the docs, it is suppose to display the contents of 
> /R0 
> and then prompt you for the name
> of the source code file. So it is almost working.
>    Is the Basci09 source for the modules in "QP" avaible. I suppect 
> the 
> problem may be in one of these or
> there is something else I'm not doing correctly.
> 
> John Donaldson

Upon further analysis of the source code in 'qp.b09', I think I know what
your problem is. Early on in the program there is an 'ON ERROR GOTO 100'
statement. Right after that is line 100. Later on the program loads &
executes the 'qp.startup' file. The program, I believe, is having trouble
finding the 'qp.startup' file. This is causing an error, which sends
execution back to line 100. This creates an endless loop.

To solve the problem, either make sure that the 'qp.startup' file is
exactly where the program is looking for it, or your second option is to
modify the 'qp.b09' source code file to hard-code the location of
'qp.startup' into the program. You'll need to change the line that reads
'startup:=drive+"/PASCAL/qp.startup"' to whatever the location of the
'qp.startup' is in your setup, and then recompile 'qp.b09' in Basic09.
Clear as mud? Sorry if it's not clear enough. Let me know how it goes.

Fred Provoncha
Stansbury Park, UT