pTAL Reference Manual (G06.24+, H06.09+, J06.03+)
NoSets $CARRY
NoSets $OVERFLOW
xbase
INT(32):variable
is the base address of the current extended segment.
xlimit
output
INT(32):variable
is the limit of the current extended segment.
Consult the system description manual for your system for the format in which the base and limit
values are returned.
Example 296 $READBASELIMIT Routine
INT(32) xbase;
INT(32) xlimit;
$READBASELIMIT(xbase, xlimit);
$READCLOCK
$READCLOCK returns the current setting of the system clock as a FIXED value.
NopTAL privileged procedure
NoCan be executed only by privileged procedures
NoSets condition code
NoSets $CARRY
NoSets $OVERFLOW
Example 297 $READCLOCK Routine
FIXED the_time;
the_time := $READCLOCK; ! Return current clock time
$READSPT
NOTE: The EpTAL compiler does not support this procedure.
$READSPT returns (copies) an entry from the Segment Page Table (SPT).
NopTAL privileged procedure
YesCan be executed only by privileged procedures
NoSets condition code
Nonatomic Operations 339