HP SunSoft Pascal 4.0 Bedienungsanleitung PDF herunterladen (Seite 154)

100

101

130 Pascal 4.0 User’s Guide

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.

The Pascal main program,

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 }

The commands to compile and

execute SimVal.c and

SimValMain.p

hostname% cc -c SimVal.c

hostname% pc SimVal.o SimValMain.p

hostname% a.out

args=111111

1 2 ... 149 150 151 152 153 154 155 156 157 158 159 ... 332 333

Kommentare zu diesen Handbüchern

Keine Kommentare

HP SunSoft Pascal 4.0 Bedienungsanleitung Seite 154

Kommentare zu diesen Handbüchern

Verwandte Produkte und Handbücher für Software HP SunSoft Pascal 4.0