Singly-linked list/Traversal: Difference between revisions

m
(Added Odin variant)
m (→‎{{header|Wren}}: Minor tidy)
 
(4 intermediate revisions by 4 users not shown)
Line 754:
End</syntaxhighlight>
 
=={{header|BBC BASIC}}==
==={{header|BBC BASIC}}===
{{works with|BBC BASIC for Windows}}
<syntaxhighlight lang="bbcbasic"> DIM node{pNext%, iData%}
Line 1,284 ⟶ 1,285:
/* Mango */
/* Pear */</syntaxhighlight>
 
=={{header|Joy}}==
<syntaxhighlight lang="joy">['a 'b 'c '\n] [putch] step.</syntaxhighlight>
 
=={{header|jq}}==
Line 1,604 ⟶ 1,608:
 
=={{header|Pascal}}==
See [[Singly-linked_list/Traversal#Delphi | Delphi]]
 
=={{header|Peloton}}==
Line 1,669 ⟶ 1,673:
<span style="color: #008080;">with</span> <span style="color: #008080;">javascript_semantics</span>
<span style="color: #008080;">enum</span> <span style="color: #000000;">NEXT</span><span style="color: #0000FF;">,</span><span style="color: #000000;">DATA</span>
<span style="color: #008080;">constant</span> <span style="color: #000000;">empty_sll</span> <span style="color: #0000FF;">=</span> <span style="color: #0000FF;">{{</span><span style="color: #000000004600;">1NULL</span><span style="color: #0000FF;">}}</span>
<span style="color: #004080;">sequence</span> <span style="color: #000000;">sll</span> <span style="color: #0000FF;">=</span> <span style="color: #7060A8;">deep_copy</span><span style="color: #0000FF;">(</span><span style="color: #000000;">empty_sll</span><span style="color: #0000FF;">)</span>
Line 1,684 ⟶ 1,688:
<span style="color: #008080;">procedure</span> <span style="color: #000000;">show</span><span style="color: #0000FF;">()</span>
<span style="color: #004080;">integer</span> <span style="color: #000000;">idx</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">sll</span><span style="color: #0000FF;">[</span><span style="color: #000000;">1</span><span style="color: #0000FF;">][</span><span style="color: #000000;">NEXT</span><span style="color: #0000FF;">]</span>
<span style="color: #008080;">while</span> <span style="color: #000000;">idx</span><span style="color: #0000FF;">!=</span><span style="color: #000000004600;">1NULL</span> <span style="color: #008080;">do</span>
<span style="color: #0000FF;">?</span><span style="color: #000000;">sll</span><span style="color: #0000FF;">[</span><span style="color: #000000;">idx</span><span style="color: #0000FF;">][</span><span style="color: #000000;">DATA</span><span style="color: #0000FF;">]</span>
<span style="color: #000000;">idx</span> <span style="color: #0000FF;">=</span> <span style="color: #000000;">sll</span><span style="color: #0000FF;">[</span><span style="color: #000000;">idx</span><span style="color: #0000FF;">][</span><span style="color: #000000;">NEXT</span><span style="color: #0000FF;">]</span>
Line 1,694 ⟶ 1,698:
{{out}}
<pre>
{{2},{3,"ONE"},{4,"TWO"},{10,"THREE"}}
"ONE"
"TWO"
Line 2,193 ⟶ 2,197:
{{libheader|Wren-llist}}
{{libheader|Wren-fmt}}
<syntaxhighlight lang="ecmascriptwren">import "./llist" for LinkedList
import "./fmt" for Fmt
 
//create a new linked list and add the first 50 positive integers to it
9,476

edits