[ruby-dev:15071] Re: rb_eval_string

なかだです。

At Fri, 9 Nov 2001 02:02:58 +0900,
OJ <[e-mail]> wrote:
> >バージョンとプラットフォームを教えてください。
> 
> 1.7、mswin32 です。

CVS最新ということでよろしいでしょうか。

> >rb_gc()を呼んでもメモリ使用量は減りませんか。
> 
> 減りますが、元には戻りません。
> 実行するのが "a = 0" ではなく "a" とか "0" などだと大丈夫な感じです。

rb_eval_string()とrb_gc()を繰り返せば、最初ある程度増えてもその
後ほぼ一定範囲内に収まらないでしょうか。rubyのGCはcompactionを
するわけではないので、メモリが虫喰い状態になって使用されていな
い領域が残ることがあります。これはmalloc()でも同じことですが。

少なくとも以下の方法では、メモリ使用量が増え続けるという症状は
確認できませんでした。ruby 1.7.2 (2001-11-08) [i686-linux]です。


$ cat eval_string.c
#include "ruby.h"

#define EVAL_STRING(name, expr) \
static VALUE name(VALUE self, VALUE num) \
{					 \
    int i, n = FIX2INT(num);		 \
					 \
    for (i = 0; i < n; i++) {		 \
	rb_eval_string(#expr);		 \
    }					 \
    return Qnil;			 \
}

EVAL_STRING(eval_string1, a = 0);
EVAL_STRING(eval_string2, a);
EVAL_STRING(eval_string3, 0);

void
Init_eval_string(void)
{
    rb_define_global_function("eval_string1", eval_string1, 1);
    rb_define_global_function("eval_string2", eval_string2, 1);
    rb_define_global_function("eval_string3", eval_string3, 1);
}

$ cat test.rb
require 'eval_string'

def statm
  open("/proc/self/statm"){|f|f.read(1024)}
end

puts "before: "+statm

a = 0
[:eval_string1, :eval_string2, :eval_string3].each do |m|
  puts m
  100.times {|i|
    send(m, 10000)
    GC.start
    printf "%2d: %s", i, statm
  }
end

-- 
--- 僕の前にBugはない。
--- 僕の後ろにBugはできる。
    中田 伸悦