Changeset 12534 for branches/working-0711/ccl/lib/macros.lisp
- Timestamp:
- Aug 5, 2009, 11:51:47 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/working-0711/ccl/lib/macros.lisp
r12408 r12534 761 761 762 762 763 (defmacro defloadvar ( &environment envvar value &optional doc)763 (defmacro defloadvar (var value &optional doc) 764 764 `(progn 765 765 (defstaticvar ,var ,nil ,@(if doc `(,doc))) … … 1263 1263 (svref ,vtemp ,itemp))))) 1264 1264 1265 (defmacro %svset (v i new &environment env)1265 (defmacro %svset (v i new) 1266 1266 (let* ((vtemp (make-symbol "VECTOR")) 1267 1267 (itemp (make-symbol "INDEX")) … … 2751 2751 2752 2752 2753 (defmacro with-hash-table-iterator ((mname hash-table) &body body &environment env)2753 (defmacro with-hash-table-iterator ((mname hash-table) &body body) 2754 2754 "WITH-HASH-TABLE-ITERATOR ((function hash-table) &body body) 2755 2755 provides a method of manually looping over the elements of a hash-table.
Note: See TracChangeset
for help on using the changeset viewer.