7

The Pascal main program, SimRefMain.p

The commands to compile and execute SimRef.cc and

SimRefMain.p

program SimRefMain (output); var

t, f: boolean;

c:char;

i:integer;

s:integer16;

r:shortreal;

d:real;

procedure SimRef ( var t, f: boolean; var c: char;

var i: integer;

var s: integer16;

var r: shortreal;

var d: real

); external C;

begin

SimRef (t, f, c, i, s, r, d);

writeln (t, f: 6, c: 2, i: 2, s: 2, r: 4: 1, d: 4: 1); end.

hostname% CC -c SimRef.cc hostname% pc SimRef.o SimRefMain.p hostname% a.out

true false z 9 9 9.9 9.9

Arguments Passed by Value

Pascal arguments can also be passed by value. Here is how they work with C++.

The C++–Pascal Interface

157