HP Pascal/iX Programmer's Guide (31502-90023)

10: 2
compiler option.)
To list an intrinsic file, use the LISTINTR compiler option (refer to the
HP Pascal/iX Reference Manual the HP Pascal/HP-UX Reference Manual ,
depending on your implementation, for more information on the LISTINTR
compiler option).
NOTE The compiler options LITERAL_ALIAS and UPPERCASE apply to all
external routine names, including intrinsic names. When either of
these options is set, the compiler performs a case-sensitive search
of the intrinsic file for the intrinsic names.
INTRINSIC Directive
The INTRINSIC directive allows a program to access an intrinsic routine.
It follows the routine declaration.
Example
PROGRAM p;
VAR
f,m : shortint;
PROCEDURE FSETMODE; INTRINSIC;
BEGIN
FSETMODE(f,m);
END.
The program p can call the intrinsic procedure FSETMODE because it
declares it with the INTRINSIC directive.
The system name of an intrinsic is the name by which the operating system
recognizes it, the name that it has in the intrinsic file.
The system names of some intrinsics are illegal in HP Pascal. If you
want to use such an intrinsic in your program, give it a legal name in
your program and specify its system name with the ALIAS compiler option
(refer to the HP PascaliX Reference Manual the HP Pascal/HP-UX Reference
Manual , depending on your implementation, for more information on ALIAS).
Example
$SYSINTR 'myintr'$ {myintr contains the intrinsic P'F'INFO}
PROGRAM q (output);
PROCEDURE pfileinfo $ALIAS 'P''F''INFO'$; INTRINSIC;
BEGIN
pfileinfo;
END.
The name P'F'INFO is illegal in HP Pascal because it contains single
quotes. The program q can call the intrinsic procedure P'F'INFO by the
name pfileinfo because it declares it with the INTRINSIC directive and
specifies its system name with the ALIAS compiler option.
Actual and Intrinsic Parameter Compatibility
An intrinsic's actual parameters are those with which your program calls
it. Its intrinsic parameters are those in its definition, in the
intrinsic file. Its formal parameters are those that your program
declares for it.