Einfügen in eine sortierte Liste

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

*Wenn list.first gleich NIL oder element.appointment.time kleiner als list.first.appointment.time ist, dann ist das neue Element ganz zu Beginn der Liste einzufügen.
 
CalendarMan.om
IF (list.first = NIL) OR
      (Op.Compare(appointment.time,
         list.first.appointment.time) < 0) THEN
   (* insert element at the beginning of the list *)
   element.next := list.first; list.first := element;
ELSE
   (* ... *)
END;

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