Next: Local Variable Initializations, Previous: The for-as-package subclause, Up: Variable Initialization and Stepping Clauses

#### 6.1.2.14 Examples of for-as-package subclause

     (let ((*package* (make-package "TEST-PACKAGE-1")))
       ;; For effect, intern some symbols
       (read-from-string "(THIS IS A TEST)")
       (export (intern "THIS"))
       (loop for x being each present-symbol of *package*
              do (print x)))
     |>  A
     |>  TEST
     |>  THIS
     |>  IS
    ⇒  NIL