supplement 2.19 → 2.21

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 8f12d6981c0181c08be1fa99b15c330f37c62bffba70104e9995a928980e5976
-  data.tar.gz: 57eb53eaab47856e6d7209f1a4a236b3e4f0e4c8fd29c59f29b3ef126b0ecb1c
+  metadata.gz: 7195670e7cd62225ea949b29536edf23349f53688ad4bb85f2aae7e90497cef9
+  data.tar.gz: 61b52622f92b881337daf310681533758245f61b9939997caf018088e0f00547
 SHA512:
-  metadata.gz: 955e84edf5e769cf40dcf7cb476048cc8f3273b1cc32b1aa594b5b0992b3b2a3defcd272903fd09c47eb22cffa0a1037d9a8030657d62177ef21da13acf74c64
-  data.tar.gz: dd6313b98731e9129b63924867f880bd105b2a6f2e5879d6797dfded3fc262a78a8ee23f4c8efc0d2fb9462c926cf4effe6a7294dcd56d5001578a5e7a96a1ce
+  metadata.gz: 3fecc23c00a4981a04cd4193297ff84f768b2b37d98e471a36a86e7af062197ddbe4977f9d44c0f2f979b22dddfc4c28d889189e7c029cc0a7a4f6eb6b5b474b
+  data.tar.gz: 1e8e2585b26e5fa445d370b169a7ba73d08b42bec9399bf6b4ade2b90fc4fc0885d766a24c26705899bc176cf15d71d6b27645f3723ee1eff743bb2ce9a68016

data/LICENSE

@@ -1,7 +1,7 @@
 = supplement Ruby Gem
 
 
-Copyright (C) 2009-2020, Bertram Scharpf <software@bertram-scharpf.de>.
+Copyright (C) 2009-2024, Bertram Scharpf <software@bertram-scharpf.de>.
 All rights reserved.
 
 Redistribution and use in source and binary forms, with or without

data/README

@@ -1,4 +1,4 @@
-= supplement 2.19  --  Useful Ruby enhancements
+= supplement 2.21  --  Useful Ruby enhancements
 
 
 Some simple Ruby extensions.

data/lib/mkrf_conf

@@ -10,42 +10,23 @@ Autorake.configure {
 
   extending_ruby
 
-  if RUBY_VERSION < "2.7" then
-    if RUBY_VERSION < "2.6" then
-      enable :dir_children
-      if RUBY_VERSION < "1.9.2" then
-        enable :array_select_bang
-        enable :file_size
-        if RUBY_VERSION < "1.9" then
-          enable :string_ord
-          enable :string_clear
-          if RUBY_VERSION < "1.8.7" then
-            enable :array_index_with_block
-            enable :kernel_tap
-            enable :string_start_with
-            enable :thread_exclusive
-          end
-        end
+  if RUBY_VERSION < "3.3" then
+    if RUBY_VERSION < "2.7" then
+      if RUBY_VERSION < "2.6" then
+        enable :dir_children
       end
+    else
+      enable :super_kwargs
     end
-  else
-    enable :super_kwargs
+    enable :old_io_functions
   end
 
-  if RUBY_VERSION < "1.9" then
-    have_header "ruby.h"
-    have_header "st.h"
-    have_header "rubyio.h"
-    have_header "re.h"
-    have_header "rubysig.h"
-  else
-    have_header "ruby/ruby.h"
-    have_header "ruby/st.h"
-    have_header "ruby/io.h"
-    have_header "ruby/re.h"
-
-    have_function "rb_thread_wait_for"
-  end
+  have_header "ruby/ruby.h"
+  have_header "ruby/st.h"
+  have_header "ruby/io.h"
+  have_header "ruby/re.h"
+
+  have_function "rb_thread_wait_for"
 
   have_function "cbrt"
 

data/lib/process.c

@@ -5,11 +5,7 @@
 
 #include "process.h"
 
-#if   HAVE_HEADER_RUBY_H
-    #include <ruby.h>
-#elif HAVE_HEADER_RUBY_RUBY_H
-    #include <ruby/ruby.h>
-#endif
+#include <ruby/ruby.h>
 
 #include <sys/time.h>
 #include <sys/resource.h>

data/lib/supplement/filesys.h

@@ -5,11 +5,7 @@
 #ifndef __SUPPLEMENT_FILESYS_H__
 #define __SUPPLEMENT_FILESYS_H__
 
-#if   HAVE_HEADER_RUBY_H
-    #include <ruby.h>
-#elif HAVE_HEADER_RUBY_RUBY_H
-    #include <ruby/ruby.h>
-#endif
+#include <ruby/ruby.h>
 
 
 extern VALUE rb_fsstat_s_alloc( VALUE);

data/lib/supplement/itimer.h

@@ -5,11 +5,7 @@
 #ifndef __SUPPLEMENT_ITIMER_H__
 #define __SUPPLEMENT_ITIMER_H__
 
-#if   HAVE_HEADER_RUBY_H
-    #include <ruby.h>
-#elif HAVE_HEADER_RUBY_RUBY_H
-    #include <ruby/ruby.h>
-#endif
+#include <ruby/ruby.h>
 
 
 extern VALUE rb_process_setitimer( int, VALUE *, VALUE);

data/lib/supplement/locked.c

@@ -4,11 +4,7 @@
 
 #include "locked.h"
 
-#if   HAVE_HEADER_RUBYIO_H
-    #include <rubyio.h>
-#elif HAVE_HEADER_RUBY_IO_H
-    #include <ruby/io.h>
-#endif
+#include <ruby/io.h>
 
 #include <sys/file.h>
 
@@ -32,9 +28,7 @@
 VALUE
 rb_locked_init( int argc, VALUE *argv, VALUE self)
 {
-#ifdef HAVE_HEADER_RUBY_H
-    OpenFile *fptr;
-#else
+#ifdef FEATURE_OLD_IO_FUNCTIONS
     rb_io_t *fptr;
 #endif
 #ifdef HAVE_FUNC_RB_THREAD_WAIT_FOR
@@ -42,19 +36,26 @@ rb_locked_init( int argc, VALUE *argv, VALUE self)
 #endif
     int op;
 
+#ifdef FEATURE_OLD_IO_FUNCTIONS
+    GetOpenFile( self, fptr);
+#endif
+
 #ifdef FEATURE_SUPER_KWARGS
     rb_call_super_kw(argc, argv, RB_PASS_CALLED_KEYWORDS);
 #else
     rb_call_super( argc, argv);
 #endif
-    GetOpenFile( self, fptr);
 
+#ifdef FEATURE_OLD_IO_FUNCTIONS
     op = fptr->mode & FMODE_WRITABLE ? LOCK_EX : LOCK_SH;
-    op |= LOCK_NB;
-#ifdef HAVE_HEADER_RUBY_H
-    while (flock( fileno( fptr->f), op) < 0) {
 #else
+    op = rb_io_mode( self) & FMODE_WRITABLE ? LOCK_EX : LOCK_SH;
+#endif
+    op |= LOCK_NB;
+#ifdef FEATURE_OLD_IO_FUNCTIONS
     while (flock( fptr->fd, op) < 0) {
+#else
+    while (flock( rb_io_descriptor( self), op) < 0) {
 #endif
         static ID id_lock_failed = 0;
 
@@ -81,10 +82,10 @@ rb_locked_init( int argc, VALUE *argv, VALUE self)
             }
             break;
         default:
-#ifdef HAVE_HEADER_RUBY_H
-            rb_sys_fail( fptr->path);
-#else
+#ifdef FEATURE_OLD_IO_FUNCTIONS
             rb_sys_fail_str( fptr->pathv);
+#else
+            rb_sys_fail_str( rb_io_path( self));
 #endif
             break;
         }
@@ -103,18 +104,7 @@ rb_locked_init( int argc, VALUE *argv, VALUE self)
 VALUE
 rb_locked_close( VALUE self)
 {
-#ifdef HAVE_HEADER_RUBY_H
-    OpenFile *fptr;
-#else
-    rb_io_t *fptr;
-#endif
-
-    GetOpenFile( self, fptr);
-#ifdef HAVE_HEADER_RUBY_H
-    flock( fileno( fptr->f), LOCK_UN);
-#else
-    flock( fptr->fd, LOCK_UN);
-#endif
+    flock( rb_io_descriptor( self), LOCK_UN);
     rb_call_super( 0, NULL);
     return Qnil;
 }

data/lib/supplement/locked.h

@@ -5,11 +5,7 @@
 #ifndef __SUPPLEMENT_FILESYS_H__
 #define __SUPPLEMENT_FILESYS_H__
 
-#if   HAVE_HEADER_RUBY_H
-    #include <ruby.h>
-#elif HAVE_HEADER_RUBY_RUBY_H
-    #include <ruby/ruby.h>
-#endif
+#include <ruby/ruby.h>
 
 VALUE rb_locked_init( int argc, VALUE *argv, VALUE self);
 VALUE rb_locked_close( VALUE self);

data/lib/supplement/socket.c

@@ -2,11 +2,7 @@
  *  supplement/socket.c  --  Socket methods
  */
 
-#if   HAVE_HEADER_RUBYIO_H
-    #include <rubyio.h>
-#elif HAVE_HEADER_RUBY_IO_H
-    #include <ruby/io.h>
-#endif
+#include <ruby/io.h>
 
 
 static ID id_accept_orig;

data/lib/supplement/socket.h

@@ -5,11 +5,7 @@
 #ifndef __SUPPLEMENT_SOCKET_H__
 #define __SUPPLEMENT_SOCKET_H__
 
-#if   HAVE_HEADER_RUBY_H
-    #include <ruby.h>
-#elif HAVE_HEADER_RUBY_RUBY_H
-    #include <ruby/ruby.h>
-#endif
+#include <ruby/ruby.h>
 
 
 extern VALUE rb_socket_accept( VALUE);

data/lib/supplement/terminal.c

@@ -4,11 +4,7 @@
 
 #include "terminal.h"
 
-#if   HAVE_HEADER_RUBYIO_H
-    #include <rubyio.h>
-#elif HAVE_HEADER_RUBY_IO_H
-    #include <ruby/io.h>
-#endif
+#include <ruby/io.h>
 
 #include <sys/ioctl.h>
 #include <termios.h>
@@ -17,10 +13,12 @@ static VALUE io_unget( VALUE);
 static VALUE io_reset( VALUE);
 
 
-#ifndef RUBY_VM
-  #define RB_SYS_FAIL( fptr)     rb_sys_fail( ((OpenFile *) fptr)->path);
+#ifdef FEATURE_OLD_IO_FUNCTIONS
+  #define RB_FAIL_PATH( io, fptr)   ((fptr)->pathv)
+  #define RB_IO_VAR(    io, fptr)   fptr
 #else
-  #define RB_SYS_FAIL( fptr)     rb_sys_fail_str( ((rb_io_t *) fptr)->pathv);
+  #define RB_FAIL_PATH( io, fptr)   rb_io_path( io)
+  #define RB_IO_VAR(    io, fptr)   io
 #endif
 
 /*
@@ -35,30 +33,28 @@ static VALUE io_reset( VALUE);
 VALUE
 rb_io_unget( int argc, VALUE *argv, VALUE io)
 {
-#ifndef RUBY_VM
-    OpenFile *fptr;
-#else
+#ifdef FEATURE_OLD_IO_FUNCTIONS
     rb_io_t *fptr;
 #endif
     int fd;
     struct termios oldtio, newtio;
     void *v[5];
 
+#ifdef FEATURE_OLD_IO_FUNCTIONS
     GetOpenFile( io, fptr);
-#ifndef RUBY_VM
-    fd = fileno( fptr->f);
-#else
     fd = fptr->fd;
+#else
+    fd = rb_io_descriptor( io);
 #endif
 
     if (tcgetattr( fd, &oldtio) < 0)
-        RB_SYS_FAIL( fptr);
+        rb_sys_fail_str( RB_FAIL_PATH( io, fptr));
     newtio = oldtio;
     newtio.c_iflag &= ~ICRNL;
     if (tcsetattr( fd, TCSANOW, &newtio) < 0)
-        RB_SYS_FAIL( fptr);
+        rb_sys_fail_str( RB_FAIL_PATH( io, fptr));
 
-    v[0] = &fd, v[1] = fptr, v[2] = &oldtio,
+    v[0] = &fd, v[1] = (void *) RB_IO_VAR( io, fptr), v[2] = &oldtio,
         v[3] = &argc, v[4] = (void *) argv;
     return rb_ensure( io_unget, (VALUE) v, io_reset, (VALUE) v);
 }
@@ -80,7 +76,7 @@ io_unget( VALUE v)
         p = RSTRING_PTR(str);
         for (i = RSTRING_LEN(str); i; --i, ++p)
             if (ioctl( *(int *) vp[0], TIOCSTI, p) < 0)
-                RB_SYS_FAIL( vp[1]);
+                rb_sys_fail_str( RB_FAIL_PATH( (VALUE) vp[1], (rb_io_t *) vp[1]));
     }
     return Qnil;
 }
@@ -91,7 +87,7 @@ io_reset( VALUE v)
     void **vp = (void **) v;
 
     if (tcsetattr( *(int *) vp[0], TCSANOW, (struct termios *) vp[2]) < 0)
-        RB_SYS_FAIL( vp[1]);
+        rb_sys_fail_str( RB_FAIL_PATH( (VALUE) vp[1], (rb_io_t *) vp[1]));
 
     return Qnil;
 }
@@ -109,24 +105,22 @@ io_reset( VALUE v)
 VALUE
 rb_io_wingeom( VALUE self)
 {
-#ifndef RUBY_VM
-    OpenFile *fptr;
-#else
+#ifdef FEATURE_OLD_IO_FUNCTIONS
     rb_io_t *fptr;
 #endif
     int fd;
     struct winsize w;
     VALUE r;
 
+#ifdef FEATURE_OLD_IO_FUNCTIONS
     GetOpenFile( self, fptr);
-#ifndef RUBY_VM
-    fd = fileno( fptr->f);
-#else
     fd = fptr->fd;
+#else
+    fd = rb_io_descriptor( self);
 #endif
 
     if (ioctl( fd, TIOCGWINSZ, &w) < 0)
-        RB_SYS_FAIL( fptr);
+        rb_sys_fail_str( RB_FAIL_PATH( self, fptr));
     r = rb_ary_new2( 4);
     rb_ary_store( r, 0, INT2NUM( w.ws_col));
     rb_ary_store( r, 1, INT2NUM( w.ws_row));

data/lib/supplement/terminal.h

@@ -5,11 +5,7 @@
 #ifndef __SUPPLEMENT_TERMINAL_H__
 #define __SUPPLEMENT_TERMINAL_H__
 
-#if   HAVE_HEADER_RUBY_H
-    #include <ruby.h>
-#elif HAVE_HEADER_RUBY_RUBY_H
-    #include <ruby/ruby.h>
-#endif
+#include <ruby/ruby.h>
 
 
 extern VALUE rb_io_unget( int, VALUE *, VALUE);

data/lib/supplement.c

@@ -6,21 +6,9 @@
 
 #include "process.h"
 
-#if   HAVE_HEADER_ST_H
-    #include <st.h>
-#elif HAVE_HEADER_RUBY_ST_H
-    #include <ruby/st.h>
-#endif
-#if   HAVE_HEADER_RUBYIO_H
-    #include <rubyio.h>
-#elif HAVE_HEADER_RUBY_IO_H
-    #include <ruby/io.h>
-#endif
-#if   HAVE_HEADER_RE_H
-    #include <re.h>
-#elif HAVE_HEADER_RUBY_RE_H
-    #include <ruby/re.h>
-#endif
+#include <ruby/st.h>
+#include <ruby/io.h>
+#include <ruby/re.h>
 
 #ifdef FEATURE_THREAD_EXCLUSIVE
 #ifdef HAVE_HEADER_RUBYSIG_H
@@ -29,13 +17,6 @@
 #endif
 
 
-#ifdef HAVE_HEADER_RUBY_H
-    /* Oh what a bug! */
-    #define R_MATCH( obj) RMATCH( obj)
-#else
-#endif
-
-
 static VALUE supplement_index_blk( VALUE);
 static VALUE supplement_index_ref( VALUE, VALUE);
 static VALUE supplement_rindex_blk( VALUE);
@@ -44,10 +25,6 @@ static VALUE supplement_rindex_ref( VALUE, VALUE);
 static VALUE supplement_index_val( VALUE, VALUE);
 static VALUE supplement_rindex_val( VALUE, VALUE);
 #endif
-#ifdef FEATURE_ARRAY_SELECT_BANG
-static VALUE supplement_reject( VALUE);
-static VALUE supplement_invert_yield( VALUE);
-#endif
 static VALUE supplement_do_unumask( VALUE);
 #ifdef FEATURE_THREAD_EXCLUSIVE
 static VALUE bsruby_set_thread_critical( VALUE);
@@ -58,9 +35,6 @@ static VALUE bsruby_set_thread_critical( VALUE);
 static ID id_delete_at;
 static ID id_cmp;
 static ID id_eqq;
-#ifdef FEATURE_ARRAY_SELECT_BANG
-static ID id_reject_bang;
-#endif
 static ID id_mkdir;
 static ID id_index;
 
@@ -189,6 +163,33 @@ rb_krn_with( VALUE obj)
 }
 
 
+/*
+ *  Document-class: Module
+ */
+
+/*
+ *  call-seq:
+ *     plain_name   -> str
+ *
+ *  The last part of a `::`-separated Module name path.
+ */
+
+VALUE
+rb_module_plain_name( VALUE cls)
+{
+    VALUE n;
+    VALUE i;
+
+    n = rb_str_dup( rb_funcall( cls, rb_intern( "name"), 0));
+    i = rb_funcall( n, rb_intern( "rindex"), 1, rb_str_new( "::", 2));
+    if (!NIL_P( i)) {
+        i = rb_funcall( i, rb_intern( "+"), 1, INT2FIX( 2));
+        rb_funcall( n, rb_intern( "slice!"), 2, INT2FIX( 0), i);
+    }
+    return n;
+}
+
+
 /*
  *  Document-class: NilClass
  */
@@ -301,11 +302,7 @@ rb_str_eat( int argc, VALUE *argv, VALUE str)
     int l;
     int r;
 
-#ifdef HAVE_HEADER_RUBY_H
-    n = l = RSTRING_LEN( str);
-#else
     n = l = rb_str_strlen( str);
-#endif
     if (rb_scan_args( argc, argv, "01", &val) == 1) {
         if (!NIL_P( val)) {
             int v = NUM2INT( val);
@@ -318,17 +315,6 @@ rb_str_eat( int argc, VALUE *argv, VALUE str)
         }
     }
     rb_str_modify( str);
-#ifdef HAVE_HEADER_RUBY_H
-    if (n > 0) {
-        r = l - n;
-        val = rb_str_new5( str, RSTRING_PTR( str), n);
-        memmove( RSTRING_PTR( str), RSTRING_PTR( str) + n, r);
-    } else {
-        r = l + n;
-        val = rb_str_new5( str, RSTRING_PTR( str) + r, -n);
-    }
-    RSTRING_LEN( str) = r;
-#else
     if (n > 0) {
         r = 0;
     } else if (n < 0) {
@@ -339,7 +325,6 @@ rb_str_eat( int argc, VALUE *argv, VALUE str)
     val = rb_str_substr( str, r, n);
     if (!NIL_P(val))
         rb_str_update( str, r, n, rb_str_new( NULL, 0));
-#endif
     return val;
 }
 
@@ -361,27 +346,17 @@ VALUE
 rb_str_cut_bang( VALUE str, VALUE len)
 {
     int l;
-#ifdef HAVE_HEADER_RUBY_H
-#else
     int n;
-#endif
 
     rb_str_modify( str);
     l = NUM2INT( len);
     if (l < 0)
         l = 0;
-#ifdef HAVE_HEADER_RUBY_H
-    if (l < RSTRING_LEN( str)) {
-        RSTRING_LEN( str) = l;
-        return str;
-    }
-#else
     n = rb_str_strlen( str);
     if (l < n) {
         rb_str_update( str, l, n - l, rb_str_new( NULL, 0));
         return str;
     }
-#endif
     return Qnil;
 }
 
@@ -449,11 +424,7 @@ rb_str_rest( int argc, VALUE *argv, VALUE str)
     beg = rb_scan_args( argc, argv, "01", &n) == 1 ? NUM2LONG( n) : 1;
     if (beg < 0)
         beg = 0;
-#ifdef HAVE_HEADER_RUBY_H
-    l = RSTRING_LEN( str);
-#else
     l = rb_str_strlen( str);
-#endif
     return rb_str_substr( str, beg, l - beg);
 }
 
@@ -474,11 +445,7 @@ rb_str_tail( int argc, VALUE *argv, VALUE str)
     long l, beg, len;
 
     len = rb_scan_args( argc, argv, "01", &n) == 1 ? NUM2LONG( n) : 1;
-#ifdef HAVE_HEADER_RUBY_H
-    l = RSTRING_LEN( str);
-#else
     l = rb_str_strlen( str);
-#endif
     beg = l - len;
     if (beg < 0)
         beg = 0, len = l;
@@ -541,11 +508,8 @@ rb_str_starts_with_p( VALUE str, VALUE oth)
     char *s, *o;
     VALUE ost;
 
-#ifdef HAVE_HEADER_RUBY_H
-#else
     if (!rb_str_comparable( str, oth))
         return Qnil;
-#endif
     ost = rb_string_value( &oth);
     i = RSTRING_LEN( ost);
     if (i > RSTRING_LEN( str))
@@ -556,11 +520,7 @@ rb_str_starts_with_p( VALUE str, VALUE oth)
         if (*s != *o)
             return Qnil;
     }
-#ifdef HAVE_HEADER_RUBY_H
-    return INT2FIX( RSTRING_LEN( ost));
-#else
     return INT2FIX( rb_str_strlen( ost));
-#endif
 }
 
 
@@ -584,11 +544,8 @@ rb_str_ends_with_p( VALUE str, VALUE oth)
     char *s, *o;
     VALUE ost;
 
-#ifdef HAVE_HEADER_RUBY_H
-#else
     if (!rb_str_comparable( str, oth))
         return Qnil;
-#endif
     ost = rb_string_value( &oth);
     i = RSTRING_LEN( ost);
     if (i > RSTRING_LEN( str))
@@ -598,11 +555,7 @@ rb_str_ends_with_p( VALUE str, VALUE oth)
     for (; i; i--)
         if (*--s != *--o)
             return Qnil;
-#ifdef HAVE_HEADER_RUBY_H
-    return INT2FIX( RSTRING_LEN( str) - RSTRING_LEN( ost));
-#else
     return INT2FIX( rb_str_strlen( str) - rb_str_strlen( ost));
-#endif
 }
 
 #ifdef FEATURE_STRING_ORD
@@ -650,21 +603,13 @@ rb_str_axe( int argc, VALUE *argv, VALUE str)
     if (newlen < 0)
         return Qnil;
 
-#ifdef HAVE_HEADER_RUBY_H
-    oldlen = RSTRING_LEN( str);
-#else
     oldlen = rb_str_strlen( str);
-#endif
     if (newlen < oldlen) {
         VALUE ell;
         long e;
 
         ell = rb_str_new2( "...");
-#ifdef HAVE_HEADER_RUBY_H
-        e = RSTRING_LEN( ell);
-#else
         e = rb_str_strlen( ell);
-#endif
         if (newlen > e) {
             ret = rb_str_substr( str, 0, newlen - e);
             rb_str_append( ret, ell);
@@ -1124,42 +1069,6 @@ supplement_rindex_val( VALUE ary, VALUE val)
 
 #endif
 
-#ifdef FEATURE_ARRAY_SELECT_BANG
-
-/*
- *  Document-method: select!
- *
- *  call-seq:
- *     select! { |x| ... }   -> ary
- *
- *  Remove all items for that the block returns +nil+ or +false+.
- *
- */
-
-VALUE
-rb_ary_select_bang( VALUE self)
-{
-    return rb_iterate( &supplement_reject, self,
-                                &supplement_invert_yield, Qnil);
-}
-
-VALUE
-supplement_reject( VALUE obj)
-{
-    if (!id_reject_bang)
-        id_reject_bang = rb_intern( "reject!");
-    return rb_funcall( obj, id_reject_bang, 0);
-}
-
-VALUE
-supplement_invert_yield( VALUE elem)
-{
-    return NIL_P( rb_yield( elem)) ? Qtrue : Qfalse;
-}
-
-#endif
-
-
 
 /*
  *  Document-class: Hash
@@ -1187,51 +1096,11 @@ rb_hash_notempty_p( VALUE hash)
  *  Document-class: File
  */
 
-
-#ifdef FEATURE_FILE_SIZE
-
 /*
  *  call-seq:
- *     size   -> integer
- *
- *  Returns <code>file</code>'s size. A shortcut for
- *  <code>file.stat.size</code>. This constitutes consistency with
- *  <code>StringIO</code>.
- *
- *     file.size     #=> 16384
- */
-
-VALUE
-rb_file_size( VALUE obj)
-{
-#ifdef HAVE_HEADER_RUBY_H
-    OpenFile *fptr;
-#else
-    rb_io_t *fptr;
-#endif
-    struct stat st;
-
-    GetOpenFile( obj, fptr);
-#ifdef HAVE_HEADER_RUBY_H
-    if (fstat( fileno( fptr->f), &st) == -1) {
-        rb_sys_fail( fptr->path);
-    }
-#else
-    if (fstat( fptr->fd, &st) == -1) {
-        rb_sys_fail_str( fptr->pathv);
-    }
-#endif
-    return INT2FIX( st.st_size);
-}
-
-#endif
-
-
-/*
- *  call-seq:
- *     umask()             -> int
- *     umask( int)         -> int
- *     umask( int) { ... } -> obj
+ *     File.umask()             -> int
+ *     File.umask( int)         -> int
+ *     File.umask( int) { ... } -> obj
  *
  *  Returns the current umask value for this process.  If the optional
  *  argument is given, set the umask to that value and return the
@@ -1283,7 +1152,7 @@ supplement_do_unumask( VALUE v)
 
 /*
  *  call-seq:
- *     current()   -> dir
+ *     Dir.current()   -> dir
  *
  *  Current directory as a Dir object.
  *
@@ -1299,7 +1168,7 @@ rb_dir_s_current( VALUE dir)
 
 /*
  *  call-seq:
- *     mkdir!( path, modes = nil)   -> str or nil
+ *     Dir.mkdir!( path, modes = nil)   -> str or nil
  *
  *  Make a directory and all subdirectories if needed.
  *
@@ -1548,6 +1417,8 @@ void Init_supplement( void)
     rb_define_method( rb_mKernel, "tap!", rb_krn_tap_bang, 0);
     rb_define_method( rb_mKernel, "with", rb_krn_with, 0);
 
+    rb_define_method( rb_cModule, "plain_name", rb_module_plain_name, 0);
+
     rb_define_method( rb_cNilClass, "notempty?", rb_nil_notempty_p, 0);
     rb_define_method( rb_cNilClass, "nonzero?", rb_nil_notempty_p, 0);
     rb_define_method( rb_cNilClass, "each_line", rb_nil_each_line, 0);
@@ -1591,15 +1462,9 @@ void Init_supplement( void)
     rb_define_method( rb_cArray, "index", rb_ary_index, -1);
     rb_define_method( rb_cArray, "rindex", rb_ary_rindex, -1);
 #endif
-#ifdef FEATURE_ARRAY_SELECT_BANG
-    rb_define_method( rb_cArray, "select!", rb_ary_select_bang, 0);
-#endif
 
     rb_define_method( rb_cHash, "notempty?", rb_hash_notempty_p, 0);
 
-#ifdef FEATURE_FILE_SIZE
-    rb_define_method( rb_cFile, "size", rb_file_size, 0);
-#endif
     rb_define_singleton_method( rb_cFile, "umask", rb_file_s_umask, -1);
 
     rb_define_singleton_method( rb_cDir, "current", rb_dir_s_current, 0);
@@ -1628,9 +1493,6 @@ void Init_supplement( void)
     id_delete_at   = rb_intern( "delete_at");
     id_cmp         = rb_intern( "<=>");
     id_eqq         = 0;
-#ifdef FEATURE_ARRAY_SELECT_BANG
-    id_reject_bang = 0;
-#endif
     id_mkdir       = 0;
     id_index       = 0;
 

data/lib/supplement.h

@@ -6,11 +6,7 @@
 #ifndef __SUPPELEMENT_H__
 #define __SUPPELEMENT_H__
 
-#if   HAVE_HEADER_RUBY_H
-    #include <ruby.h>
-#elif HAVE_HEADER_RUBY_RUBY_H
-    #include <ruby/ruby.h>
-#endif
+#include <ruby/ruby.h>
 
 
 extern VALUE rb_obj_new_string( VALUE);
@@ -21,6 +17,8 @@ extern VALUE rb_krn_tap( VALUE);
 extern VALUE rb_krn_tap_bang( VALUE);
 extern VALUE rb_krn_with( VALUE);
 
+extern VALUE rb_module_plain_name( VALUE);
+
 extern VALUE rb_nil_notempty_p( VALUE);
 extern VALUE rb_nil_each_line( VALUE);
 
@@ -60,15 +58,9 @@ extern VALUE rb_ary_rpick( int, VALUE *, VALUE);
 extern VALUE rb_ary_index( int, VALUE *, VALUE);
 extern VALUE rb_ary_rindex( int, VALUE *, VALUE);
 #endif
-#ifdef FEATURE_ARRAY_SELECT_BANG
-extern VALUE rb_ary_select_bang( VALUE);
-#endif
 
 extern VALUE rb_hash_notempty_p( VALUE);
 
-#ifdef FEATURE_FILE_SIZE
-extern VALUE rb_file_size( VALUE);
-#endif
 extern VALUE rb_file_s_umask( int, VALUE *, VALUE);
 extern VALUE rb_dir_s_current( VALUE);
 extern VALUE rb_dir_s_mkdir_bang( int, VALUE *, VALUE);

metadata

@@ -1,29 +1,43 @@
 --- !ruby/object:Gem::Specification
 name: supplement
 version: !ruby/object:Gem::Version
-  version: '2.19'
+  version: '2.21'
 platform: ruby
 authors:
 - Bertram Scharpf
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2024-03-04 00:00:00.000000000 Z
+date: 2024-09-01 00:00:00.000000000 Z
 dependencies:
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '13.0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '13.0'
 - !ruby/object:Gem::Dependency
   name: autorake
   requirement: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '2'
+        version: '2.18'
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     requirements:
     - - "~>"
       - !ruby/object:Gem::Version
-        version: '2'
+        version: '2.18'
 description: 'Simple methods that didn''t manage to become part of standard Ruby.
 
   '
@@ -73,7 +87,7 @@ required_ruby_version: !ruby/object:Gem::Requirement
   requirements:
   - - ">="
     - !ruby/object:Gem::Version
-      version: '0'
+      version: 2.0.0
 required_rubygems_version: !ruby/object:Gem::Requirement
   requirements:
   - - ">="