merged r20021 and r20022 from trunk into ruby_1_9_1.

* pack.c (pack_pack): set encoding from packing string and UTF-8 for
      "U".  [ruby-core:19590]

    * test/ruby/test_array.rb (test_pack): use utf-8.

    * test/ruby/test_pack.rb (test_pack_U): ditto.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_9_1@20042 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
yugui 2008-10-29 16:27:00 +00:00
parent 2e42037f3d
commit d23702f1f1
4 changed files with 15 additions and 4 deletions

6
pack.c
View file

@ -10,6 +10,7 @@
**********************************************************************/
#include "ruby/ruby.h"
#include "ruby/encoding.h"
#include <sys/types.h>
#include <ctype.h>
#include <errno.h>
@ -443,6 +444,7 @@ pack_pack(VALUE ary, VALUE fmt)
char type;
long items, len, idx, plen;
const char *ptr;
rb_encoding *enc;
#ifdef NATINT_PACK
int natint; /* native integer */
#endif
@ -517,6 +519,8 @@ pack_pack(VALUE ary, VALUE fmt)
ptr = RSTRING_PTR(from);
plen = RSTRING_LEN(from);
OBJ_INFECT(res, from);
enc = rb_enc_compatible(res, from);
rb_enc_associate(res, enc);
}
if (p[-1] == '*')
@ -865,6 +869,8 @@ pack_pack(VALUE ary, VALUE fmt)
break;
case 'U': /* Unicode character */
enc = rb_enc_compatible(res, rb_enc_from_encoding(rb_utf8_encoding()));
rb_enc_associate(res, enc);
while (len-- > 0) {
SIGNED_VALUE l;
char buf[8];