diff options
| -rw-r--r-- | ChangeLog | 5 | ||||
| -rw-r--r-- | ext/win32ole/win32ole.c | 4 |
2 files changed, 7 insertions, 2 deletions
@@ -1,3 +1,8 @@ +Fri May 20 21:17:13 2016 Nobuyoshi Nakada <nobu@ruby-lang.org> + + * ext/win32ole/win32ole.c (fole_missing): make substring or dup to + share the content if possible. + Fri May 20 19:48:48 2016 Nobuyoshi Nakada <nobu@ruby-lang.org> * internal.h (NEW_PARTIAL_MEMO_FOR): shrink buffer array not to diff --git a/ext/win32ole/win32ole.c b/ext/win32ole/win32ole.c index 31ed28ad44..4dcd22e6f0 100644 --- a/ext/win32ole/win32ole.c +++ b/ext/win32ole/win32ole.c @@ -3303,12 +3303,12 @@ fole_missing(int argc, VALUE *argv, VALUE self) n = RSTRING_LEN(mid); if(mname[n-1] == '=') { rb_check_arity(argc, 2, 2); - argv[0] = rb_enc_str_new(mname, (n-1), cWIN32OLE_enc); + argv[0] = rb_enc_associate(rb_str_subseq(mid, 0, n-1), cWIN32OLE_enc); return ole_propertyput(self, argv[0], argv[1]); } else { - argv[0] = rb_enc_str_new(mname, n, cWIN32OLE_enc); + argv[0] = rb_enc_associate(rb_str_dup(mid), cWIN32OLE_enc); return ole_invoke(argc, argv, self, DISPATCH_METHOD|DISPATCH_PROPERTYGET, FALSE); } } |