Anonymous user
Loops/Foreach: Difference between revisions
There is a foreach loop in COBOL after all (although not standard-compliant). Corrected PL/I lang tag.
m (Added omit from tag for COBOL.) |
(There is a foreach loop in COBOL after all (although not standard-compliant). Corrected PL/I lang tag.) |
||
Line 429:
message(${file})
endforeach(file)</lang>
The following is in the Managed COBOL dialect:
{{trans|C#}}
{{works with|Visual COBOL}}
<lang cobol>01 things occurs 3.
...
set content of things to ("Apple", "Banana", "Coconut")
perform varying thing as string through things
display thing
end-perform</lang>
=={{header|Common Lisp}}==
Line 1,127 ⟶ 1,138:
=={{header|PL/I}}==
<lang
do i = lbound(A,1) to hbound(A,1);
put skip list (A(i));
Line 1,475 ⟶ 1,486:
</xsl:for-each></lang>
▲{{omit from|COBOL}}
{{omit from|GUISS}}
| |||