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

Example 261 $FLTR Routine
REAL rrlnum;
INT(32) dblnum := 147D;
rrlnum := $FLTR (dblnum); ! Return rounded REAL value
$FREEZE
NOTE:
The EpTAL compiler does not support this procedure. Use $TRIGGER (page 345) instead. (The
EpTAL compiler does allow $FREEZE as a DEFINE name.)
Execution does not return from this call.
$FREEZE halts the processor in which its process is running and any other processors on the same
node that have FREEZE enabled.
YespTAL privileged procedure
YesCan be executed only by privileged procedures
NoSets condition code
NoSets $CARRY
NoSets $OVERFLOW
$HALT
NOTE:
The EpTAL compiler does not support this procedure. Use $TRIGGER (page 345) instead. (The
EpTAL compiler does allow $HALT as a DEFINE name.)
Execution does not return from this call.
$HALT halts the processor in which its process is running.
YespTAL privileged procedure
YesCan be executed only by privileged procedures
NoSets condition code
NoSets $CARRY
NoSets $OVERFLOW
$HIGH
$HIGH converts the high-order (leftmost) 16 bits of an INT(32) or EXTADDR value to an INT value.
Nonatomic Operations 315