Einfügen in eine sortierte Liste II

[Vorheriges Kapitel] [Vorherige Seite] [Inhaltsverzeichnis] [Nächste Seite] [Nächstes Kapitel]

*Wenn list.first ungleich NIL und appointment.time größer oder gleich list.first.appointment.time ist, dann ist element in jedem Falle hinter list.first einzufügen.
 
*Folgende WHILE-Schleife sucht dann die Einfügeposition, wobei element immer irgendwo hinter prev einzufügen ist.
 
CalendarMan.om
prev := list.first; ptr := list.first.next;
WHILE (ptr # NIL) &
      (Op.Compare(appointment.time,
         ptr.appointment.time) >= 0) DO
   prev := ptr; ptr := ptr.next;
END;

[Vorheriges Kapitel] [Vorherige Seite] [Inhaltsverzeichnis] [Nächste Seite] [Nächstes Kapitel]
Copyright © 1999 Andreas Borchert, in HTML konvertiert am 29.06.1999