diff options
| author | ocean <ocean@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-08-31 09:24:36 +0000 |
|---|---|---|
| committer | ocean <ocean@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2004-08-31 09:24:36 +0000 |
| commit | 7d5ce5b9d3f2f92e4d36459520189d5c0615a0c4 (patch) | |
| tree | 327e9ea0446ed078d6e61174c8e607f71cb2c06b | |
| parent | fb675d9b9e955e90a86f7075d68824d63554e101 (diff) | |
| download | ruby-7d5ce5b9d3f2f92e4d36459520189d5c0615a0c4.tar.gz ruby-7d5ce5b9d3f2f92e4d36459520189d5c0615a0c4.tar.xz ruby-7d5ce5b9d3f2f92e4d36459520189d5c0615a0c4.zip | |
* ext/tk/tkutil.c (cbsubst_init): fix memory leak
* ext/tk/tkutil.c (cbsubst_get_all_subst_keys): fix SEGV
git-svn-id: http://svn.ruby-lang.org/repos/ruby/branches/ruby_1_8@6843 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rw-r--r-- | ext/tk/tkutil.c | 3 |
2 files changed, 7 insertions, 2 deletions
@@ -1,3 +1,9 @@ +Tue Aug 31 18:24:04 2004 Hirokazu Yamamoto <ocean@m2.ccsnet.ne.jp> + + * ext/tk/tkutil.c (cbsubst_init): fix memory leak + + * ext/tk/tkutil.c (cbsubst_get_all_subst_keys): fix SEGV + Tue Aug 31 16:04:22 2004 Hidetoshi NAGAI <nagai@ai.kyutech.ac.jp> * ext/tcltklib/tcltklib.c (ip_delete): when a tcltkip is deleted, diff --git a/ext/tk/tkutil.c b/ext/tk/tkutil.c index 37af36b04..b3e79430d 100644 --- a/ext/tk/tkutil.c +++ b/ext/tk/tkutil.c @@ -939,7 +939,6 @@ cbsubst_init() inf->size = 0; inf->key = ALLOC_N(char, 1); - inf->key = ALLOC_N(char, 1); inf->key[0] = '\0'; inf->type = ALLOC_N(char, 1); @@ -1028,7 +1027,7 @@ cbsubst_get_all_subst_keys(self) struct cbsubst_info, inf); len = strlen(inf->key); - buf = ALLOC_N(char, 3*len); + buf = ALLOC_N(char, 3*len + 1); ptr = buf; for(i = 0; i < len; i++) { *(ptr++) = '%'; |