Anonymous user
Singly-linked list/Traversal: Difference between revisions
→{{header|ooRexx}}: Add example for ooRexx
No edit summary |
(→{{header|ooRexx}}: Add example for ooRexx) |
||
Line 422:
- : unit = ()</lang>
=={{header|ooRexx}}==
See [[Singly-linked_list/Element_definition#ooRexx|Singly-Linked List/Element Definition in ooRexx]] for the full class definition.
<lang ooRexx>
say "Manual list traversal"
index = list~first -- demonstrate traversal
loop while index \== .nil
say index~value
index = index~next
end
say
say "Do ... Over traversal"
do value over list
say value
end
</lang>
=={{header|Pascal}}==
See [[Singly-linked_list#Delphi | Delphi]]
| |||