[Sbcl-help] Re: Memory leak, or am I doing something stupid?

[<lar...@gm...>]

On Wed, 07 Sep 2005 08:53:12 +0200, Lars Rune Nøstdal wrote:

> Hi,
> 
> (dotimes (i 150)
>   (let ((thread (sb-thread:make-thread (lambda ()
>                                          (format t "Hi, I'm ~A.~%" sb-thread:*current-thread*) (finish-output)
>                                          (sleep 2)))))
>     (sleep 0.01)
>     (sb-thread:terminate-thread thread)))
> 
> 
> #|
> Running the above a couple of times, while:
> 
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 390891 44732  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 390891 44732  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 445541 47812  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 500191 50888  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 664141 58400  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 664141 58400  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 782185 64084  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 230725 37784  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 394675 45288  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 394675 45288  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> lars@blackbox ~/sbcl $ ps -C sbcl -F
> UID        PID  PPID  C    SZ   RSS PSR STIME TTY          TIME CMD
> lars     25530  4301  1 558625 61412  0 08:06 pts/3    00:00:08 /usr/bin/sbcl
> .....................
> etc.
> 
> 
> Until SBCL refuses to create more threads. Calling (gc :full t) seems to
>  fix it, and I can continue creating more threads.
> |#
> 
> 
> $ uname -a
> Linux blackbox 2.6.12-gentoo-r9 #1 Tue Aug 23 19:32:24 CEST 2005 i686 AMD Athlon(TM) XP 2600+ AuthenticAMD GNU/Linux
> 
>> (lisp-implementation-type)
> "SBCL"
> 
>> (lisp-implementation-version)
> "0.9.4"

It seems doing (gc :full t) only helps a bit; some memory is still leaking.

-- 
mvh,
Lars Rune Nøstdal
http://lars.nostdal.org/