Doubly-linked list/Element insertion: Difference between revisions
Content added Content deleted
m (→{{header|Lua}}) |
MaiconSoft (talk | contribs) (Added Delphi example) |
||
Line 288: | Line 288: | ||
A B |
A B |
||
A C B </pre> |
A C B </pre> |
||
=={{header|Delphi}}== |
|||
{{libheader| System.SysUtils}} |
|||
{{libheader|Boost.LinkedList}}[https://github.com/MaiconSoft/DelphiBoostLib] |
|||
<lang Delphi> |
|||
program Element_insertion; |
|||
{$APPTYPE CONSOLE} |
|||
uses |
|||
System.SysUtils,Boost.LinkedList; |
|||
var |
|||
List:TLinkedList<Integer>; |
|||
Node:TLinkedListNode<Integer>; |
|||
begin |
|||
List := TLinkedList<Integer>.Create; |
|||
Node:= List.Add(5); |
|||
List.AddAfter(Node,7); |
|||
List.AddAfter(Node,15); |
|||
Writeln(List.ToString); |
|||
List.Free; |
|||
Readln; |
|||
end.</lang> |
|||
{{out}} |
|||
<pre>[ 5, 15, 7]</pre> |
|||
See [[#Pascal]] for vanilla version. |
|||
=={{header|E}}== |
=={{header|E}}== |
||
Line 297: | Line 323: | ||
<lang e>insert(A_node, C)</lang> |
<lang e>insert(A_node, C)</lang> |
||
=={{header|Erlang}}== |
=={{header|Erlang}}== |