Loops/Foreach: Difference between revisions
→{{header|Common Lisp}}: Added DO iterator
Langurmonkey (talk | contribs) |
SantiagoPiM (talk | contribs) (→{{header|Common Lisp}}: Added DO iterator) |
||
Line 804:
(for x in the-list)
(print x))</lang>
=== Using DO ===
<lang lisp>
(let ((the-list '(1 7 "foo" 1 4))) ; Set the-list as the list
(do ((i the-list (rest i))) ; Initialize to the-list and set to rest on every loop
((null i)) ; Break condition
(print (first i)))) ; On every loop print list's first element
</lang>
{{out}}
<pre>
1
7
"foo"
1
4
</pre>
=={{header|D}}==
| |||