|
Allegro CL |
6.1 The LOOP Facility 6.1.2 Variable Initialization and Stepping Clauses 6.1.2.1 Iteration Control 6.1.2.1.7 The for-as-package subclause
6.1.2.1.7.1 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 |