pTAL Reference Manual (H06.03+)

Built-In Routines

HP pTAL Reference Manual—523746-005

15-96

$XADR

$XADR converts a standard address to an EXTADDR address.

variable

is a variable that has a standard address.

$XADR returns an EXTADDR address. If the argument to $XADR is not a variable, the

compiler reports an error.

$XADR returns an absolute extended EXTADDR address in absolute segment 1 if

variable is a system global address (an SGBADDR, SGWADDR, SGXBADDR, or

SGXWADDR address).

Variable can be the name of a pointer preceded by an “@” operator. In this case,

$XADR returns the absolute address of the pointer, as in the following example.

pTAL privileged procedure No

Can be executed only by privileged procedures No

Sets condition code No

Sets $CARRY No

Sets $OVERFLOW No

Example 15-96. $XADR Routine

PROC p;

BEGIN

INT .p;

INT .EXT e;

...

@e := $XADR(@p);

...

END;

variable( )$XADR

VST115.vsd