diff options
author | ttate <ttate@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-08-05 01:24:13 +0000 |
---|---|---|
committer | ttate <ttate@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2002-08-05 01:24:13 +0000 |
commit | 9dab5bc3b0404fe183f13c0b1c3351eab1bf257a (patch) | |
tree | 73092f18b2864c6668d7d5e65dae6f52aeb6105c /ext/dl/ptr.c | |
parent | 45a08a4296b57df13190cb9065ee44974f44c7ce (diff) | |
download | ruby-9dab5bc3b0404fe183f13c0b1c3351eab1bf257a.tar.gz |
Multiple call of the initialize.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2687 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'ext/dl/ptr.c')
-rw-r--r-- | ext/dl/ptr.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/ext/dl/ptr.c b/ext/dl/ptr.c index 1a31861c8f..149f33e4e5 100644 --- a/ext/dl/ptr.c +++ b/ext/dl/ptr.c @@ -202,6 +202,10 @@ rb_dlptr_initialize(int argc, VALUE argv[], VALUE self) if( p ){ Data_Get_Struct(self, struct ptr_data, data); + if( data->ptr && data->free ){ + /* Free previous memory. Use of inappropriate initialize may cause SEGV. */ + (*(data->free))(data->ptr); + } data->ptr = p; data->size = s; data->free = f; |