HP Pascal/iX Reference Manual (31502-90022)

12- 19
The compiler does not generate type-checking code for intrinsic routines.
(An intrinsic routine is identified as such with the INTRINSIC directive.
See the HP Pascal/iX Programmer's Guide or the HP Pascal/HP-UX
Programmer's Guide .)
Example
PAGE 1 HEWLETT-PACKARD ... (C) HEWLETT-PACKARD CO. 1986 ...
0 1.000 0
0 2.000 0
0 3.000 0 $SUBPROGRAM$
0 4.000 0 PROGRAM t;
0 5.000 0
0 6.000 0 $CHECK_FORMAL_PARM 0$
0 7.000 0
0 8.000 0 {CHECK_FORMAL_PARM prevents the linker from
0 9.000 0 complaining if this procedure is called with
0 10.000 0 fewer than seven actual parameters}
0 11.000 0
0 12.000 0 PROCEDURE proc (parm_count : integer;
2 13.000 0 parm1,
3 14.000 0 parm2,
4 15.000 0 parm3,
5 16.000 0 parm4,
6 17.000 0 parm5,
7 18.000 0 parm6 : integer);
8 19.000 1 BEGIN
8 20.000 1 END;
8 21.000 0
0 22.000 1 BEGIN
0 23.000 1 END.
CODE
CODE is an HP Pascal Option.
When the CODE compiler option is ON, the compiler generates object code
after parsing a compilation block.
The command line option -C also specifies this option.
Syntax
$CODE {ON }$
{OFF}
Default ON
Location Anywhere, but it affects only the procedure, function, or
outer block that contains it.
The CODE option affects an entire procedure, function, or outer block.
To suppress the object code for smaller portions of source code, use the
SKIP_TEXT option, or enclose that portion of source code in comment
symbols.
Example
The compiler generates no object code for proc2. Although $CODE OFF$ is
in the middle of proc2, it affects the entire procedure.
PROGRAM show_code;
PROCEDURE proc1;
BEGIN
:
END;
PROCEDURE proc2;