Update of /project/mcclim/cvsroot/mcclim/Apps/Listener In directory clnet:/tmp/cvs-serv31467/Apps/Listener
Modified Files: listener.lisp Log Message: Apply Douglas Crosher's patch fixing the listener for CMUCL:
* Revert function 'dynamic-space-usage to 'dynamic-usage.
--- /project/mcclim/cvsroot/mcclim/Apps/Listener/listener.lisp 2006/03/15 22:56:54 1.23 +++ /project/mcclim/cvsroot/mcclim/Apps/Listener/listener.lisp 2006/03/22 09:14:30 1.24 @@ -78,7 +78,7 @@ #-(or allegro cmu scl) (getenv "USER") "luser")) ; sorry.. (sitename (machine-instance)) - (memusage #+(or cmu scl) (lisp::dynamic-space-usage) + (memusage #+(or cmu scl) (lisp::dynamic-usage) #+sbcl (sb-kernel:dynamic-usage) #+lispworks (getf (system:room-values) :total-allocated) #+openmcl (+ (ccl::%usedbytes) (ccl::%freebytes))