TAL Reference Manual

Compiler Directives
TAL Reference Manual—526371-001
16-18
Example of CHECK Directive
•
If NOCHECK is in effect or if your program has disabled arithmetic traps, control
passes to the statement following the unlabeled CASE statement and program
results are unpredictable.
Labeled CASE Statement
CHECK and NOCHECK do not affect the labeled CASE statement. If you omit the
OTHERWISE clause in a labeled CASE statement and the selector value does not
select an alternative, a run-time error occurs.
Example of CHECK Directive
This example uses CHECK to provide a stack overflow trap if the extended stack
overflows:
!This is MYSOURCE file
?CHECK
PROC a;
BEGIN
!Lots of extended local data declarations
!Lots of code
CALL a;
!More code
END;
CODE Directive
CODE lists instruction codes and constants in octal format after each procedure.
The default is CODE.
VST1607.vsd
POPCODE
PUSHCODE
NOCODE
CODE