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

Example 278 $MAX Routine
REAL realval := -3E0;
max := $MAX (realval, 5E0); ! Return 5E0
$MIN
$MIN returns the minimum of two signed values.
NopTAL privileged procedure
NoCan be executed only by privileged procedures
NoSets condition code
NoSets $CARRY
NoSets $OVERFLOW
expression
is an INT, INT(32), FIXED(fpoint ), REAL, or REAL(64) expression. Both expressions must be
of the same data type.
Example 279 $MIN Routine
FIXED fixval := -3F;
min := $MIN (fixval, 5F); ! Return -3F
$MOVEANDCXSUMBYTES
$MOVEANDCXSUMBYTES moves a specified number of bytes from one memory location to
another and computes a checksum (bytewise exclusive “or”) on the bytes moved.
NopTAL privileged procedure
NoCan be executed only by privileged procedures
NoSets condition code
NoSets $CARRY
NoSets $OVERFLOW
checksum
input,output
uINT:variable
contains an initial value for the checksum. When $MOVEANDCXSUMBYTES completes,
checksum contains the newly computed value.
destaddr
input,output
Nonatomic Operations 327