pTAL Reference Manual (H06.08+)

Compiler Directives
HP pTAL Reference Manual—523746-006
17-56
SAVEGLOBALS
NOROUND
turns off rounding. That is, rounding does not occur when a FIXED value is
assigned to a FIXED variable that has a smaller fpoint. If the fpoint of the
assignment value is greater than that of the variable, the assignment value is
truncated and some precision is lost.
SAVEGLOBALS
SAVEGLOBALS saves all global data declarations in a file for use in subsequent
compilations that specify the USEGLOBALS directive.
file-name
is the name of a disk file to which the compiler is to write the global data
declarations.
If file-name already exists, the compiler purges the existing file and creates an
unstructured global declarations file.
Default: NOROUND
Placement: Anywhere
Scope:
•
ROUND applies to subsequent code until overridden by NOROUND
•
NOROUND applies to subsequent code until overridden by ROUND
Dependencies: None
Example 17-29. ROUND Directive
?ROUND ! Request rounding
! Global declarations
PROC a;
BEGIN
FIXED(2) f1;
FIXED(3) f2;
f1 := f2;
END;
Note. The EpTAL compiler does not accept this directive. See Migrating from TNS/R to TNS/E
on page 17-11.
define-name
SAVEGLOBALS
file-name
VST670.vsd