Singly-linked list/Traversal: Difference between revisions
Content added Content deleted
No edit summary |
(→{{header|ooRexx}}: Add example for ooRexx) |
||
Line 422: | Line 422: | ||
- : unit = ()</lang> |
- : 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}}== |
=={{header|Pascal}}== |
||
See [[Singly-linked_list#Delphi | Delphi]] |
See [[Singly-linked_list#Delphi | Delphi]] |