HP Pascal/iX Reference Manual (31502-90022)

12- 77
TYPE
LogArray = ARRAY [1..80] OF shortint;
PROCEDURE FCheck;
INTRINSIC; {FCheck comes from the system intrinsic file}
$SYSINTR 'MYINTR'$
PROCEDURE FWrite;
INTRINSIC; {FWrite comes from MYINTR}
$SYSINTR$
FUNCTION FRead ( FileNum : shortint;
VAR Target : LogArray;
TCount : shortint) : shortint;
INTRINSIC; {This FRead description is compared to the one
in the system intrinsic file.}
Table 12-2 compares SPLINTR (SPL) and SYSINTR (HP Pascal) formats.
Neither format can be converted to the other automatically. For
instructions on conversion by hand, see the HP Pascal/iX Migration Guide
or the HP Pascal/HPUX Migration Guide .
Table 12-2. SPLINTR Format vs SYSINTR Format
----------------------------------------------------------------------------------------------
| | | |
| | Pascal/V | HP Pascal in Native Mode |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Creation | BUILDINT utility (independent | BUILDINT compiler option |
| | of Pascal/V) | (in HP Pascal) |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Result | SPLINTR (SPL) format file | SYSINTR (HP Pascal) format file |
| | | |
----------------------------------------------------------------------------------------------
| | | |
| Access | $SPLINTR ' file '$, where file is | $SYSINTR ' file '$, where file is |
| | in SPLINTR (SPL) format | in SYSINTR (HP Pascal) format |
| | | |
----------------------------------------------------------------------------------------------
SYSPROG
SYSPROG is an HP Pascal Option.
The SYSPROG compiler option is equivalent to $STANDARD_LEVEL
'EXT_MODCAL'$ (see "STANDARD_LEVEL" in this chapter). It provides
compatibility with Pascal on the HP 9000 Series 300 and 400 machines.
Syntax
$SYSPROG {ON }$
{OFF}
Default OFF.
Location Heading.
Example
$SYSPROG ON$
PROGRAM machine_dependent;
.
.
.