[pkgsrc/trunk]: pkgsrc/archivers/ruby-bz2 Fix build problem with RUBY_VER == 21.

[taca <taca%pkgsrc.org@localhost>]

details:   https://anonhg.NetBSD.org/pkgsrc/rev/57b11990851e
branches:  trunk
changeset: 632113:57b11990851e
user:      taca <taca%pkgsrc.org@localhost>
date:      Sun Mar 16 07:24:21 2014 +0000

description:
Fix build problem with RUBY_VER == 21.

diffstat:

 archivers/ruby-bz2/distinfo            |   4 +-
 archivers/ruby-bz2/patches/patch-bz2.c |  56 ++++++++++++++++++++-------------
 2 files changed, 36 insertions(+), 24 deletions(-)

diffs (216 lines):

diff -r 278e65efa963 -r 57b11990851e archivers/ruby-bz2/distinfo
--- a/archivers/ruby-bz2/distinfo       Sun Mar 16 07:23:38 2014 +0000
+++ b/archivers/ruby-bz2/distinfo       Sun Mar 16 07:24:21 2014 +0000
@@ -1,6 +1,6 @@
-$NetBSD: distinfo,v 1.2 2011/03/08 09:27:54 obache Exp $
+$NetBSD: distinfo,v 1.3 2014/03/16 07:24:21 taca Exp $
 
 SHA1 (bz2-0.2.2.tar.gz) = d7315b5a054ff824c8022cc19b29ccbb1bd10255
 RMD160 (bz2-0.2.2.tar.gz) = af39483be363d72a34bf82eebfcf072618e75145
 Size (bz2-0.2.2.tar.gz) = 17129 bytes
-SHA1 (patch-bz2.c) = e8aaa2678f2de4ac87f4ca06a10e377474f82f28
+SHA1 (patch-bz2.c) = 5e14083bcbf334a9d17fde6a0debc71c9710290a
diff -r 278e65efa963 -r 57b11990851e archivers/ruby-bz2/patches/patch-bz2.c
--- a/archivers/ruby-bz2/patches/patch-bz2.c    Sun Mar 16 07:23:38 2014 +0000
+++ b/archivers/ruby-bz2/patches/patch-bz2.c    Sun Mar 16 07:24:21 2014 +0000
@@ -1,6 +1,6 @@
-$NetBSD: patch-bz2.c,v 1.1 2011/03/08 09:27:54 obache Exp $
+$NetBSD: patch-bz2.c,v 1.2 2014/03/16 07:24:22 taca Exp $
 
-* for ruby-1.9
+* for ruby-1.9 and later.
 
 --- bz2.c.orig 2004-12-04 14:36:59.000000000 +0000
 +++ bz2.c
@@ -46,7 +46,19 @@
        Data_Get_Struct(elem, struct bz_iv, bziv);
        if (bziv->bz2) {
            RDATA(bziv->bz2)->dfree = ruby_xfree;
-@@ -301,7 +309,8 @@ bz_io_data_finalize(ptr)
+@@ -249,7 +257,11 @@ bz_writer_close(obj)
+     Get_BZ2(obj, bzf);
+     res = bz_writer_internal_close(bzf);
+     if (!NIL_P(res) && (bzf->flags & BZ2_RB_INTERNAL)) {
++#if RUBY_API_VERSION_MAJOR >=2 && RUBY_API_VERSION_MINOR >= 1
++      rb_obj_reveal(res, rb_cString);
++#else
+       RBASIC(res)->klass = rb_cString;
++#endif
+     }
+     return res;
+ }
+@@ -301,7 +313,8 @@ bz_io_data_finalize(ptr)
            (*bziv->finalize)(ptr);
        }
        else if (TYPE(bzf->io) == T_FILE) {
@@ -56,7 +68,7 @@
            if (file->f) {
                fclose(file->f);
                file->f = 0;
-@@ -310,6 +319,16 @@ bz_io_data_finalize(ptr)
+@@ -310,6 +323,16 @@ bz_io_data_finalize(ptr)
                fclose(file->f2);
                file->f2 = 0;
            }
@@ -73,7 +85,7 @@
        }
      }
  }
-@@ -396,8 +415,8 @@ bz_str_write(obj, str)
+@@ -396,8 +419,8 @@ bz_str_write(obj, str)
      if (TYPE(str) != T_STRING) {
        rb_raise(rb_eArgError, "expected a String");
      }
@@ -84,7 +96,7 @@
      }
      return str;
  }
-@@ -436,7 +455,7 @@ bz_writer_init(argc, argv, obj)
+@@ -436,7 +459,7 @@ bz_writer_init(argc, argv, obj)
      else {
        VALUE iv;
        struct bz_iv *bziv;
@@ -93,7 +105,7 @@
  
        rb_io_taint_check(a);
        if (!rb_respond_to(a, id_write)) {
-@@ -507,8 +526,8 @@ bz_writer_write(obj, a)
+@@ -507,8 +530,8 @@ bz_writer_write(obj, a)
        bzf->buflen = BZ_RB_BLOCKSIZE;
        bzf->buf[0] = bzf->buf[bzf->buflen] = '\0';
      }
@@ -104,7 +116,7 @@
      while (bzf->bzs.avail_in) {
        bzf->bzs.next_out = bzf->buf;
        bzf->bzs.avail_out = bzf->buflen;
-@@ -523,7 +542,7 @@ bz_writer_write(obj, a)
+@@ -523,7 +546,7 @@ bz_writer_write(obj, a)
            rb_funcall(bzf->io, id_write, 1, rb_str_new(bzf->buf, n));
        }
      }
@@ -113,7 +125,7 @@
  }
  
  static VALUE
-@@ -614,7 +633,7 @@ bz_reader_init(argc, argv, obj)
+@@ -614,7 +637,7 @@ bz_reader_init(argc, argv, obj)
      }
      if (rb_respond_to(a, id_read)) {
        if (TYPE(a) == T_FILE) {
@@ -122,7 +134,7 @@
  
            GetOpenFile(a, fptr);
            rb_io_check_readable(fptr);
-@@ -691,14 +710,14 @@ bz_next_available(bzf, in)
+@@ -691,14 +714,14 @@ bz_next_available(bzf, in)
      }
      if (!bzf->bzs.avail_in) {
        bzf->in = rb_funcall(bzf->io, id_read, 1, INT2FIX(1024));
@@ -140,7 +152,7 @@
      }
      if ((bzf->buflen - in) < (BZ_RB_BLOCKSIZE / 2)) {
        bzf->buf = REALLOC_N(bzf->buf, char, bzf->buflen+BZ_RB_BLOCKSIZE+1);
-@@ -780,7 +799,7 @@ bz_read_until(bzf, str, len, td1)
+@@ -780,7 +803,7 @@ bz_read_until(bzf, str, len, td1)
            if (nex) {
                res = rb_str_cat(res, bzf->buf, nex);
            }
@@ -149,7 +161,7 @@
                return res;
            }
            return Qnil;
-@@ -845,8 +864,8 @@ bz_reader_read(argc, argv, obj)
+@@ -845,8 +868,8 @@ bz_reader_read(argc, argv, obj)
      }
      while (1) {
        total = bzf->bzs.avail_out;
@@ -160,7 +172,7 @@
            res = rb_str_cat(res, bzf->bzs.next_out, n);
            bzf->bzs.next_out += n;
            bzf->bzs.avail_out -= n;
-@@ -868,10 +887,10 @@ bz_getc(obj)
+@@ -868,10 +891,10 @@ bz_getc(obj)
  {
      VALUE length = INT2FIX(1);
      VALUE res = bz_reader_read(1, &length, obj);
@@ -173,7 +185,7 @@
  }
  
  static VALUE
-@@ -911,15 +930,15 @@ bz_reader_ungets(obj, a)
+@@ -911,15 +934,15 @@ bz_reader_ungets(obj, a)
      if (!bzf->buf) {
        bz_raise(BZ_SEQUENCE_ERROR);
      }
@@ -196,7 +208,7 @@
        bzf->buf[bzf->buflen] = '\0';
        bzf->bzs.next_out = bzf->buf;
        bzf->bzs.avail_out = bzf->buflen;
-@@ -966,8 +985,8 @@ bz_reader_gets_internal(argc, argv, obj,
+@@ -966,8 +989,8 @@ bz_reader_gets_internal(argc, argv, obj,
      if (NIL_P(rs)) {
        return bz_reader_read(1, &rs, obj);
      }
@@ -207,7 +219,7 @@
        return bz_reader_gets(obj);
      }
  
-@@ -977,7 +996,7 @@ bz_reader_gets_internal(argc, argv, obj,
+@@ -977,7 +1000,7 @@ bz_reader_gets_internal(argc, argv, obj,
        rspara = 1;
      }
      else {
@@ -216,7 +228,7 @@
        rspara = 0;
      }
  
-@@ -1024,13 +1043,13 @@ bz_reader_set_unused(obj, a)
+@@ -1024,13 +1047,13 @@ bz_reader_set_unused(obj, a)
      Check_Type(a, T_STRING);
      Get_BZ2(obj, bzf);
      if (!bzf->in) {
@@ -234,7 +246,7 @@
      return Qnil;
  }
  
-@@ -1042,10 +1061,10 @@ bz_reader_getc(obj)
+@@ -1042,10 +1065,10 @@ bz_reader_getc(obj)
      VALUE len = INT2FIX(1);
  
      str = bz_reader_read(1, &len, obj);
@@ -247,7 +259,7 @@
  }
  
  static void
-@@ -1319,7 +1338,7 @@ bz_reader_s_foreach(argc, argv, obj)
+@@ -1319,7 +1342,7 @@ bz_reader_s_foreach(argc, argv, obj)
        rb_raise(rb_eArgError, "call out of a block");
      }
      rb_scan_args(argc, argv, "11", &fname, &sep);
@@ -256,7 +268,7 @@
      arg.argc = argc - 1;
      arg.sep = sep;
      arg.obj = rb_funcall2(rb_mKernel, id_open, 1, &fname);
-@@ -1357,7 +1376,7 @@ bz_reader_s_readlines(argc, argv, obj)
+@@ -1357,7 +1380,7 @@ bz_reader_s_readlines(argc, argv, obj)
      struct bz_file *bzf;
  
      rb_scan_args(argc, argv, "11", &fname, &sep);
@@ -265,7 +277,7 @@
      arg.argc = argc - 1;
      arg.sep = sep;
      arg.obj = rb_funcall2(rb_mKernel, id_open, 1, &fname);
-@@ -1411,7 +1430,7 @@ bz_str_read(argc, argv, obj)
+@@ -1411,7 +1434,7 @@ bz_str_read(argc, argv, obj)
      Data_Get_Struct(obj, struct bz_str, bzs);
      rb_scan_args(argc, argv, "01", &len);
      if (NIL_P(len)) {
@@ -274,7 +286,7 @@
      }
      else {
        count = NUM2INT(len);
-@@ -1422,13 +1441,13 @@ bz_str_read(argc, argv, obj)
+@@ -1422,13 +1445,13 @@ bz_str_read(argc, argv, obj)
      if (!count || bzs->pos == -1) {
        return Qnil;
      }