System Debug Reference Manual (32650-90888)

432 Chapter10
System Debug Standard Functions
func prog
Parameters
value An expression to be coerced. All types are valid.
Examples
%cmdebug > wl prog(12.304)
PROG %12.304
Coerce the simple long pointer into a PROG logical code pointer.
%cmdebug > wl prog( sort )
PROG %2.346
Print the address of the procedure named sort. Note that the search path used for
procedure name lookups is restricted to the program file (PROG).
%cmdebug > wl prog(pub(24.630))
PROG %24.630
The coercion simply changes the associated logical file. The pointer's bit pattern remains
unchanged.
$nmdat > wl prog( 1 )
PROG $0.1
$nmdat > wl prog( ffff )
PROG $0.ffff
$nmdat > wl prog( 1234abcd )
PROG $0.1234abcd
$nmdat > wl prog( -1 )
PROG $0.ffffffff
Table 10-9. Derivation of PROG LGRP Bit Pattern
Parameter Type Action
BOOL 0.1 if TRUE, 0.0 if FALSE.
U16
U32
SPTR
Set the SID part to zero. Right justify the original value in the low-order
32 bits of the offset part with zero fill.
S16
S32
S64
Set the SID part to zero. Right justify the original value in the low-order
32 bits of the offset part with sign extension.
LONG Class Transfer both parts of the address unchanged.
EADDR
SADDR
Transfer the SID part unchanged. Transfer the low-order 32 bits of the
offset part.
STR Transfer the ASCII bit pattern for the last eight characters in the string.
Strings shorter than eight characters are treated as if they were extended
on the left with nulls.