pTAL Reference Manual (G06.24+, H06.09+, J06.03+)

Example 250 $EXTADDR_TO_BADDR Routine
PROC p(x);
STRING .EXT x;
BEGIN
STRING .j;
@j := $EXTADDR_TO_BADDR(@x);
@j := $EXTADDR_TO_BADDR(x); ! ERROR: x is STRING,
END; ! not EXTADDR
$EXTADDR_TO_WADDR
$EXTADDR_TO_WADDR converts an EXTADDR address to an WADDR address.
NopTAL privileged procedure
NoCan be executed only by privileged procedures
NoSets condition code
NoSets $CARRY
NoSets $OVERFLOW
expression
is an expression whose value is an EXTADDR address.
Example 251 $EXTADDR_TO_WADDR Routine
PROC p(x);
INT .EXT x;
BEGIN
INT .j;
@j := $EXTADDR_TO_WADDR(@x);
@j := $EXTADDR_TO_WADDR(x); ! ERROR: x is INT, not EXTADDR
END;
$EXT64ADDR_TO_EXTADDR
NOTE: 64-bit addressing functionality added to the EpTAL compiler starting with SPR
T0561H01^AAP. For more information, see Appendix E, “64-bit Addressing Functionality”
(page 531).
$EXT64ADDR_TO_EXTADDR converts an EXT64ADDR address to an EXTADDR address. No check
is performed to see if the resulting EXTADDR address is valid.
NopTAL privileged procedure
NoCan be executed only by privileged procedures
NoSets condition code
NoSets $CARRY
NoSets $OVERFLOW
306 Built-In Routines