|
TYPE GreaterThanProc = PROCEDURE (i, j: INTEGER) : BOOLEAN; (* return true if item i is > item j *) ExchangeProc = PROCEDURE (i, j: INTEGER); (* swap items i and j *) |
Deklarationen von Prozedurtypen gleichen den
gewohnten Prozedurköpfen. Nur der Prozedurname
fällt weg.
| |
Danach können Variablen oder Parameter von
so einem Typ deklariert werden.
| |
Dann können an diese Variablen oder Parameter
Prozeduren dieses Typs zugewiesen oder übergeben
werden.
|
PROCEDURE Sort(gt: GreaterThanProc; exchange: ExchangeProc; nofitems: INTEGER); |
Copyright © 2004, 2005 Andreas Borchert, in HTML konvertiert am 18.02.2005 |