HP 3000 Manuals HP 3000 Manuals
Compiler Commands
In MPE, compilers are set up so that the file name parameters can be
typed with the compiler name, for example:
PASCAL source, uslfile, listfile
This feature is not available within HP Desk. However, the same effect
can be achieved in most cases with file equations and a run-time
parameter indicating which files are being equated. The PARM script
command also allows the user to specify the desired file names. This is
an example of how to define a Pascal compiler function in HP Desk using a
script file:
&COMMENT *** Declare variable INFO and initialize ***
&LOCALVAR info
&SAVE info ""
&COMMENT *** Set up default file equations ***
:FILE pastext=$stdin
:FILE pasusl=$oldpass
:FILE paslist=$stdlist
&COMMENT *** Check for parameters ***
&FORWARD 2 <NOT <PARMPRES 1>>
:FILE pastext=<PARM 1>
&FORWARD 2 <NOT <PARMPRES 2>>
:FILE pasusl=<PARM 2>
&FORWARD 2 <NOT <PARMPRES 3>>
:FILE paslist=<PARM 3>
&FORWARD 2 <NOT <PARMPRES 4>>
&SAVE info <MAKEQUOTED <PARMREM 4>>
&COMMENT *** Run the compiler ***
:RUN pascal.pub.sys;parm=7;info=<VAR info>
&COMMENT *** Reset the file equations and exit ***
:RESET pastext
:RESET pasusl
:RESET paslist
&EXIT
The compiler command is given in this format:
PASCAL [text],[,[usl][,[list][,[info]]]]
The fourth parameter onwards in this command is taken to be the info
string. This is different from giving this command in MPE when the info
string has to be included in quotation marks ("").
NOTE As with SEGMENTER, some compiler errors call the QUITPROG intrinsic
which causes MPE to terminate HP Desk.
(A PASXL script very similar to the one above can be designed by running
PASCALXL.PUB.SYS instead of PASCAL. However, although PASCAL is
programmatically executable on MPE/XL, PASXL is not.)