Re: MAP (and variants) vs LOOP - Popular opinion observation?

Nathan Baum wrote:

Suppose you have
 
   (loop for x in (get-list)
         do (format t "~A~%" x))
 
and then it turns out you need to print a numeric index. You can do
 
   (loop for x in (get-list)
         for i from 0
         do (format t "~A - ~A~%" i x))
 
If you start with
 
   (mapc (lambda (x) (format t "~A~%" x)) (get-list))
 
it seems (to me) that it'd be harder to modify it as needed,
 
   (let ((list (get-list)))
     (mapc (lambda (i x) (format t "~A - ~A" i x))
           (range 0 (length list))
           list))
 
(I'm assuming the toolkit includes a RANGE utility, or something similar.)

Gauche Scheme

Shorter than the loop:

(for-each
  (cut  print <> " - " <>)
  (lrange 0)
  '(a b c))

0 - a
1 - b
2 - c


(for-each
  (cut  print <> " - " <> " - " <>)
  (lrange 0)
  '(a b c)
  '(! ? @))

0 - a - !
1 - b - ?
2 - c - @



(use srfi-42) ; do-ec

(do-ec (:list x (index i) '(a b c)) (print i " - "  x))

0 - a
1 - b
2 - c