Sun Microsystems SunSoft Pascal 4.0 User Manual page 272

A
The Pascal program,
config.p, which defines the
conditional variables one and
two
The output when you compile
config.p without the
-config option
The output when you define the
variable one
248
Example
program config_example(output);
{ This program demonstrates the use of the
%config compiler directive. }
var
a: integer := maxint;
b: integer := minint;
%var one two
begin
writeln('Begin program.');
%if one %then
writeln('One is defined as ', a:2, '.');
%elseif two %then
writeln('Two is defined as ', b:2, '.');
%elseif %config %then
writeln('Nothing is defined.');
%endif
writeln('End program.')
end. { config_example }
hostname% pc -xl config.p
hostname% a.out
Begin program.
End program.
hostname% pc -xl -config one config.p
hostname% a.out
Begin program.
One is defined as 32767.
End program.
Pascal 4.0 User's Guide