Revision: 3545 Author: ksprotte URL: http://bknr.net/trac/changeset/3545

need to write now bos.m2.allocation-cache::rebuild-cache in two exceptional places U trunk/projects/bos/m2/allocation.lisp

Modified: trunk/projects/bos/m2/allocation.lisp =================================================================== --- trunk/projects/bos/m2/allocation.lisp 2008-07-22 08:45:49 UTC (rev 3544) +++ trunk/projects/bos/m2/allocation.lisp 2008-07-22 08:50:30 UTC (rev 3545) @@ -220,13 +220,13 @@ (deftransaction activate-allocation-area (area) (warn "activating ~S" area) (setf (slot-value area 'active-p) t) - (bos.m2.allocation-cache:rebuild-cache) + (bos.m2.allocation-cache::rebuild-cache) area)

(deftransaction deactivate-allocation-area (area) (warn "deactivating ~S" area) (setf (slot-value area 'active-p) nil) - (bos.m2.allocation-cache:rebuild-cache) + (bos.m2.allocation-cache::rebuild-cache) area)

;;; FIXME can be optimized