HP 3000 Manuals HP 3000 Manuals
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