Singly-linked list/Element insertion: Difference between revisions

m
+Stata
(→‎{{header|Perl 6}}: Mark as broken)
m (+Stata)
Line 1,450:
insert_after(A, C);</lang>
 
=={{header|TclStata}}==
<lang tcl># Assume rest of definition is already present
oo::define List method insertAfter element {
$element attach $next
set next $element
}
 
See [[Singly-linked list/Element definition#Stata]].
set A [List new "A" [List new "B"]]
$A insertAfter [List new "C"]</lang>
 
=={{header|X86 Assembly}}==
1,336

edits