Loop over multiple arrays simultaneously: Difference between revisions
Content added Content deleted
Underscore (talk | contribs) (Added Perl 6.) |
(added Clojure version) |
||
Line 23: | Line 23: | ||
end Array_Loop_Test; |
end Array_Loop_Test; |
||
</lang> |
</lang> |
||
=={{header|Clojure}}== |
|||
<lang clojure> |
|||
(doseq [s (map #(str %1 %2 %3) "abc" "ABC" "123")] |
|||
(println s)) |
|||
</lang> |
|||
The sequence stops when the shortest list is exhausted. |
|||
=={{header|Common Lisp}}== |
=={{header|Common Lisp}}== |
||