From: pmarin on
I am trying to implement a näive mark-and-sweep for Muddy Scheme, but
I don't know when I need to do the sweep. Is there any command for to
known how many memory is used in a Tcl program?
From: George Petasis on
στις 24/1/2010 16:36, O/H pmarin έγραψε:
> I am trying to implement a näive mark-and-sweep for Muddy Scheme, but
> I don't know when I need to do the sweep. Is there any command for to
> known how many memory is used in a Tcl program?

Under windows, I usually use twapi:

package require twapi
set bytes [lindex [twapi::get_process_info [pid] -workingset] 1]

George

From: Uwe Klein on
George Petasis wrote:
> στις 24/1/2010 16:36, O/H pmarin έγραψε:
>
>> I am trying to implement a näive mark-and-sweep for Muddy Scheme, but
>> I don't know when I need to do the sweep. Is there any command for to
>> known how many memory is used in a Tcl program?
>
>
> Under windows, I usually use twapi:
>
> package require twapi
> set bytes [lindex [twapi::get_process_info [pid] -workingset] 1]
>
> George
>
The wiki provides some help too:
http://wiki.tcl.tk/_//search?S=memory

uwe