Kombination von Einlese-Prozeduren

AddressBook2.om

PROCEDURE ReadEntry(VAR entry: Entry) : BOOLEAN; (* read a new entry; return TRUE if successful *) BEGIN entry.used := TRUE; RETURN ReadName(entry.name) & ReadCity(entry.city) END ReadEntry;

Wenn konsequent die Einlese-Operationen als BOOLEAN-wertige Funktions-Prozeduren zur Verfügung stehen, dann können diese gut kombiniert werden.

Wegen der Kurzschluß-Bewertung wird die &-Kette sofort abgebrochen, sobald eine der Funktions-Prozeduren FALSE liefert. Somit ist bei Eingabe-Ende auch wirklich gleich Schluß.

	Wenn konsequent die Einlese-Operationen als BOOLEAN-wertige Funktions-Prozeduren zur Verfügung stehen, dann können diese gut kombiniert werden.
	Wegen der Kurzschluß-Bewertung wird die `&`-Kette sofort abgebrochen, sobald eine der Funktions-Prozeduren FALSE liefert. Somit ist bei Eingabe-Ende auch wirklich gleich Schluß.