HP Pascal/iX Reference Manual (31502-90022)

12- 48
LIST_CODE
LIST_CODE is an HP Pascal Option.
When the LIST_CODE compiler option is ON (and the LIST option is also
ON), the compiler produces a mnemonic listing of the object code of each
procedure in the program. The mnemonic listing appears at the end of the
source listing of the compilation unit.
Syntax
$LIST_CODE {ON }$
{OFF}
Default OFF.
Location Anywhere.
Scope Applies to the entire compilation unit that contains it.
The effective value is the last value before the
compilation unit's END statement.
Example
PAGE 1 HEWLETT-PACKARD ...
0 1.000 0 $LIST_CODE ON$
0 2.000 0 $STANDARD_LEVEL 'HP_MODCAL'$
0 3.000 0 $OS 'HPUX'$
0 4.000 0 PROGRAM x;
0 5.000 0 VAR
0 6.000 0 lp : globalanyptr;
1 7.000 0 bigarr : PACKED ARRAY [1.10] OF char;
2 8.000 0 i,j : integer;
4 9.000 1 BEGIN
4 10.000 1 i := 5; j := 10;
6 11.000 1 lp := addr(bigarr, i+j);
7 12.000 1 END.
PROGRAM
0 STW 2,-20(0,30) 38 LDW 28(0,27),22
4 LDO 48(30),30 3C ADD0 21,22,1
8 STW 0,-4(0,30) 40 ADD 19,1,31
C BL P_INIT_ARGS,2 44 STW 20,8(0,27)
10 NOP 48 STW 31,12(0,27)
14 BL U_INIT_TRAPS,2 00002711
18 NOP 4C BL P_TERMINATE,2
1C LDI 5,1 50 NOP
20 STW 1,32(0,27) 54 NOP
24 LDI 10,31 58 BL U_EXIT,2
28 STW 31,28(0,27) 5C NOP
2C LDO 16(27),19 60 LDW -68(0,30),2
30 LDSID (0,19),20 64 BV 0(2)
34 LDW 32(0,27),21 68 LDO -48(30),30
LISTINTR
LISTINTR is an HP Pascal Option.
The LISTINTR compiler option lists to a specified file the contents of an
intrinsic file. The intrinsic file is that specified by the BUILDINT or
SYSINTR compiler option. If neither BUILDINT nor SYSINTR is specified,
the system intrinsic file is accessed.
Syntax
$LISTINTR [ string ]$