![](/images/backgrounds/286549/hp-sunsoft-pascal-4-0-users-manual-549395154x1.png)
6
The Pascal main program,
SimValMain.p
The commands to compile and execute SimVal.c and
SimValMain.p
program SimVal(output);
var
t: boolean | := true; |
f: boolean | := false; |
c: char | := 'z'; |
si: integer16 | := 9; |
i: integer | := 9; |
sr: shortreal | := 9.9; |
r: double | := 9.9; |
args: integer; |
|
procedure SimVal( t, f: boolean; c: char;
si: integer16;
i:integer;
sr: shortreal;
r:double;
var Reply: integer); external c;
begin
SimVal(t, f, c, si, i, sr, r, args); writeln(' args = ', args :6 oct);
end. { SimVal }
hostname% cc
args=111111
Function Return Values
Function return values match types in the same manner as with parameters, and they pass in much the same way. See “Variable Parameters” on page 94. The following example shows how to pass simple types.
130 | Pascal 4.0 User’s Guide |