[mcclim-cvs] CVS mcclim/Apps/Listener
afuchs
afuchs at common-lisp.net
Wed Mar 22 09:14:31 UTC 2006
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))
More information about the Mcclim-cvs
mailing list