Doubly-linked list/Element insertion: Difference between revisions
Content added Content deleted
No edit summary |
|||
Line 523: | Line 523: | ||
r.next = n |
r.next = n |
||
if r == l.tail: l.tail = n</lang> |
if r == l.tail: l.tail = n</lang> |
||
=={{header|Oberon-2}}== |
|||
<lang oberon2> |
|||
PROCEDURE (dll: DLList) InsertAfter*(p: Node; o: Box.Object); |
|||
VAR |
|||
n: Node; |
|||
BEGIN |
|||
n := NewNode(o); |
|||
n.prev := p; |
|||
n.next := p.next; |
|||
IF p.next # NIL THEN p.next.prev := n END; |
|||
p.next := n; |
|||
IF p = dll.last THEN dll.last := n END; |
|||
INC(dll.size) |
|||
END InsertAfter; |
|||
</lang> |
|||
=={{header|Objeck}}== |
=={{header|Objeck}}== |