Anonymous user
Doubly-linked list/Element insertion: Difference between revisions
Doubly-linked list/Element insertion (view source)
Revision as of 05:35, 16 February 2013
, 11 years ago→{{header|Perl 6}}: add entry
m (→{{header|REXX}}: changed the style of the output. -- ~~~~) |
(→{{header|Perl 6}}: add entry) |
||
Line 603:
my $node_c = { %node_model };
insert($node_a, $node_c);</lang>
=={{header|Perl 6}}==
Using the generic definitions from other entries:
<lang perl6>class DLElem_Str does DLElem[Str] {}
class DLList_Str does DLList[DLElem_Str] {}
my $sdll = DLList_Str.new;
my $b = $sdll.first.post-insert('A').post-insert('B');
$b.pre-insert('C');
say $sdll.list; # A C B</lang>
{{out}}
<pre>A C B</pre>
=={{header|PicoLisp}}==
| |||