|
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; |
Copyright © 1999 Andreas Borchert, in HTML konvertiert am 29.06.1999 |