![](/images/backgrounds/286549/hp-sunsoft-pascal-4-0-users-manual-549395279x1.png)
A
The Pascal program, enable.p. This example sets the conditional variable two to true, which is equivalent to setting the
The commands to compile and output enable.p
Example
program enable_example(output);
{This program demonstrates the use of the %enable compiler directive. }
var
a:integer;
b:integer;
%var one, two %enable two
begin
%if one %then
a := maxint;
writeln('One is defined as ', a:2, '.'); %endif
%if two %then
b := minint;
writeln('Two is defined as ', b:2, '.'); %endif
end. { enable_example }
hostname% pc
Two is defined as
The %endif directive indicates the end of a %if or %ifdef directive. See the sections on %if and %ifdef for more information on this directive.
The %error DirectiveThe %error directive causes the compiler to print a string on the standard output and treat it as an error.
Pascal Preprocessor | 255 |