Next: , Previous: Value Accumulation Clauses, Up: Value Accumulation Clauses


6.1.3.1 Examples of COLLECT clause
     ;; Collect all the symbols in a list.
      (loop for i in '(bird 3 4 turtle (1 . 4) horse cat)
            when (symbolp i) collect i)
     =>  (BIRD TURTLE HORSE CAT)
     
     ;; Collect and return odd numbers.
      (loop for i from 1 to 10
            if (oddp i) collect i)
     =>  (1 3 5 7 9)
     
     ;; Collect items into local variable, but don't return them.
      (loop for i in '(a b c d) by #'cddr
            collect i into my-list
            finally (print my-list))
      |>  (A C)
     =>  NIL