Changeset 12793


Ignore:
Timestamp:
Sep 9, 2009, 12:55:07 AM (10 years ago)
Author:
rme
Message:

Include watched areas in DO-CONSING-AREAS.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/macros.lisp

    r12646 r12793  
    35963596     (let ((,code (%fixnum-ref ,area  (area-code))))
    35973597       (when (or (eql ,code area-readonly)
     3598                 (eql ,code area-watched)
    35983599                 (eql ,code area-managed-static)
    35993600                 (eql ,code area-static)
Note: See TracChangeset for help on using the changeset viewer.