Update of /project/cl-enumeration/cvsroot/enumerations In directory cl-net:/tmp/cvs-serv1974 Modified Files: foreach.lisp Log Message: Copyright updated and other minor cosmetic changes. --- /project/cl-enumeration/cvsroot/enumerations/foreach.lisp 2005/03/09 18:18:02 1.1.1.1 +++ /project/cl-enumeration/cvsroot/enumerations/foreach.lisp 2010/12/30 13:22:52 1.2 @@ -1,10 +1,15 @@ -;;; -*- Mode: Lisp -*- +;;;; -*- Mode: Lisp -*- + +;;;; foreach.lisp -- +;;;; +;;;; See file COPYING for copyright and licensing information. + (in-package "ENUM") -;;; foreach -- -;;; Of course it'd be better to do a DEFINE-LOOP-PATH or whatever. But this ain't standard. -;;; Note also that declarations are not properly handled. +;;;; foreach -- +;;;; Of course it'd be better to do a DEFINE-LOOP-PATH or whatever. But this ain't standard. +;;;; Note also that declarations are not properly handled. (defmacro foreach ((var object &rest keys) &body forms-and-clauses) "Simplified iteration construct over an `enumerable' object. @@ -51,4 +56,4 @@ ,@forms-only ; This trick allows us to reuse the full LOOP forms. ))))) -;;; end of file -- foreach.lisp -- +;;;; end of file -- foreach.lisp --