HP SunSoft Pascal 4.0 - Manual (Page 164)

140 Pascal 4.0 User’s Guide
7
Simple Types without the -xl Option
Without the -xl option, simple types match, as in the following example:
The Pascal procedure,
SampRef , in the file, Samp.p
procedure SamRef (
var t, f: boolean;
var c: char;
var i: integer;
var s: integer16;
var r: shortreal;
var d: real
);
begin
t := true;
f := false;
c := 'z';
i := 9;
s := 9;
r := 9.9;
d := 9.9;
end;