Index: openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl,v diff -u -N -r1.93.2.11 -r1.93.2.12 --- openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl 14 Apr 2020 17:14:23 -0000 1.93.2.11 +++ openacs-4/packages/xotcl-core/tcl/01-debug-procs.tcl 17 Apr 2020 17:27:42 -0000 1.93.2.12 @@ -485,13 +485,13 @@ # Activate/deactivate the following line to track (unexpected) # memory size changes in the system log. # - #set ::xo::rss 0 + set ::xo::rss 0 ;# set it to one to activate it proc at_cleanup {args} { ::xo::dc profile off ::xo::broadcast receive - if {[info exists ::xo::rss]} { + if {$::xo::rss} { # # The following code works just for Linux, since it depends on # the /proc file system and the order of values in the resulting