backports 3.0.3 → 3.1.0

data/lib/backports/1.8.7/enumerator/rewind.rb

@@ -0,0 +1,13 @@
+unless Object.const_defined? :Enumerator
+  require 'enumerator'
+  unless Enumerable::Enumerator.method_defined? :rewind
+    class Enumerable::Enumerator
+      def rewind
+        require 'generator'
+        @generator ||= ::Generator.new(self)
+        @generator.rewind
+        self
+      end
+    end
+  end
+end

data/lib/backports/1.8.7/enumerator/with_index.rb

@@ -0,0 +1,14 @@
+unless Object.const_defined? :Enumerator
+  require 'enumerator'
+  unless Enumerable::Enumerator.method_defined? :with_index
+    class Enumerable::Enumerator
+      def with_index(offset = 0)
+        return to_enum(:with_index, offset) unless block_given?
+        each do |*args|
+          yield args.size == 1 ? args[0] : args, offset
+          offset += 1
+        end
+      end
+    end
+  end
+end

data/lib/backports/1.8.7/env.rb

@@ -1,3 +1,3 @@
-class << ENV
-  Backports.make_block_optional self, :delete_if, :each, :each_key, :each_pair, :each_value, :reject!, :select, :test_on => ENV
-end
+require 'backports/tools'
+
+Backports.require_relative_dir

data/lib/backports/1.8.7/env/delete_if.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional ENV, :delete_if, :test_on => ENV

data/lib/backports/1.8.7/env/each.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional ENV, :each, :test_on => ENV

data/lib/backports/1.8.7/env/each_key.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional ENV, :each_key, :test_on => ENV

data/lib/backports/1.8.7/env/each_pair.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional ENV, :each_pair, :test_on => ENV

data/lib/backports/1.8.7/env/each_value.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional ENV, :each_value, :test_on => ENV

data/lib/backports/1.8.7/env/reject.rb

@@ -0,0 +1,4 @@
+require 'backports/tools'
+
+Backports.make_block_optional ENV, :reject, :test_on => ENV
+Backports.make_block_optional ENV, :reject!, :test_on => ENV

data/lib/backports/1.8.7/env/select.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional ENV, :select, :test_on => ENV

data/lib/backports/1.8.7/fixnum.rb

@@ -1,11 +1,3 @@
-class Fixnum
-  # Standard in ruby 1.8.7+. See official documentation[http://ruby-doc.org/core-1.9/classes/Fixnum.html]
-  def div(n)
-    (self / n).to_i
-  end unless method_defined? :div
+require 'backports/tools'
 
-  # Standard in ruby 1.8.7+. See official documentation[http://ruby-doc.org/core-1.9/classes/Fixnum.html]
-  def fdiv(n)
-    to_f / n
-  end unless method_defined? :fdiv
-end
+Backports.require_relative_dir

data/lib/backports/1.8.7/fixnum/div.rb

@@ -0,0 +1,7 @@
+unless Fixnum.method_defined? :div
+  class Fixnum
+    def div(n)
+      (self / n).to_i
+    end
+  end
+end

data/lib/backports/1.8.7/fixnum/fdiv.rb

@@ -0,0 +1,7 @@
+unless Fixnum.method_defined? :fdiv
+  class Fixnum
+    def fdiv(n)
+      to_f / n
+    end
+  end
+end

data/lib/backports/1.8.7/float.rb

@@ -1,4 +1,3 @@
-class Fixnum
-  # Standard in ruby 1.8.7+. See official documentation[http://ruby-doc.org/core-1.9/classes/Fixnum.html]
-  Backports.alias_method self, :fdiv, :/
-end
+require 'backports/tools'
+
+Backports.require_relative_dir

data/lib/backports/1.8.7/float/fdiv.rb

@@ -0,0 +1,3 @@
+unless Float.method_defined? :fdiv
+  Float.send :alias_method, :fdiv, :/
+end

data/lib/backports/1.8.7/gc.rb

@@ -1,11 +1,3 @@
-module GC
-  class << self
-    def stress
-      false
-    end unless method_defined? :stress
+require 'backports/tools'
 
-    def stress=(flag)
-      raise NotImplementedError
-    end unless method_defined? :stress=
-  end
-end
+Backports.require_relative_dir

data/lib/backports/1.8.7/gc/stress.rb

@@ -0,0 +1,9 @@
+unless GC.respond_to? :stress
+  def GC.stress
+    false
+  end
+
+  def GC.stress=(flag)
+    raise NotImplementedError
+  end
+end

data/lib/backports/1.8.7/hash.rb

@@ -1,42 +1,3 @@
-class Hash
-  # New Ruby 1.8.7+ constructor -- not documented, see redmine # 1385
-  # <tt>Hash[[[:foo, :bar],[:hello, "world"]]] ==> {:foo => :bar, :hello => "world"}</tt>
-  unless (Hash[[[:test, :test]]] rescue false)
-    class << self
-      alias_method :constructor_without_key_value_pair_form, :[]
-      def [](*args)
-        return constructor_without_key_value_pair_form(*args) unless args.length == 1 && args.first.is_a?(Array)
-        h = {}
-        args.first.each do |arr|
-          next unless arr == Backports.is_array?(arr)
-          next unless (1..2).include? arr.size
-          h[arr.at(0)] = arr.at(1)
-        end
-        h
-      end
-    end
-  end
+require 'backports/tools'
 
-  # Ruby 1.8.6 doesn't define a Hash specific hash method
-  def hash
-    h = 0
-    each do |key, value|
-      h ^= key.hash ^ value.hash
-    end
-    h
-  end unless {}.hash == {}.hash
-
-  # Ruby 1.8.6 doesn't define a Hash specific eql? method.
-  def eql?(other)
-    other.is_a?(Hash) &&
-      size == other.size &&
-      all? do |key, value|
-        other.fetch(key){return false}.eql?(value)
-      end
-  end unless {}.eql?({})
-
-  Backports.make_block_optional self, :delete_if, :each, :each_key, :each_pair, :each_value, :reject, :reject!, :select, :test_on => {:hello => "world!"}
-
-  # Standard in Ruby 1.8.7+. See official documentation[http://ruby-doc.org/core-1.9/classes/Hash.html]
-  Backports.alias_method self, :key, :index
-end
+Backports.require_relative_dir

data/lib/backports/1.8.7/hash/constructor.rb

@@ -0,0 +1,25 @@
+unless (Hash[[[:test, :test]]] rescue false)
+  require 'backports/tools'
+
+  class << Hash
+    alias_method :constructor_without_key_value_pair_form, :[]
+    def [](*args)
+      if args.length == 1
+        arg = args.first
+        if (h = Backports.try_convert(arg, Hash, :to_hash))
+          return allocate.replace(h)
+        end
+        if (kvps = Backports.is_array?(arg))
+          h = {}
+          kvps.each do |elem|
+            next unless arr = Backports.is_array?(elem)
+            next unless (1..2).include? arr.size
+            h[arr.at(0)] = arr.at(1)
+          end
+          return h
+        end
+      end
+      constructor_without_key_value_pair_form(*args)
+    end
+  end
+end

data/lib/backports/1.8.7/hash/delete_if.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Hash, :delete_if, :test_on => {:hello => "world!"}

data/lib/backports/1.8.7/hash/each.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Hash, :each, :test_on => {:hello => "world!"}

data/lib/backports/1.8.7/hash/each_key.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Hash, :each_key, :test_on => {:hello => "world!"}

data/lib/backports/1.8.7/hash/each_pair.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Hash, :each_pair, :test_on => {:hello => "world!"}

data/lib/backports/1.8.7/hash/each_value.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Hash, :each_value, :test_on => {:hello => "world!"}

data/lib/backports/1.8.7/hash/eql.rb

@@ -0,0 +1 @@
+require 'backports/1.8.7/hash/hash'

data/lib/backports/1.8.7/hash/hash.rb

@@ -0,0 +1,17 @@
+class Hash
+  def hash
+    h = 0
+    each do |key, value|
+      h ^= key.hash ^ value.hash
+    end
+    h
+  end unless {}.hash == {}.hash
+
+  def eql?(other)
+    other.is_a?(Hash) &&
+      size == other.size &&
+      all? do |key, value|
+        value.eql?(other.fetch(key){return false})
+      end
+  end unless {}.eql?({})
+end

data/lib/backports/1.8.7/hash/key.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.alias_method Hash, :key, :index

data/lib/backports/1.8.7/hash/reject.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Hash, :reject, :reject!, :test_on => {:hello => "world!"}

data/lib/backports/1.8.7/hash/select.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Hash, :select, :test_on => {:hello => "world!"}

data/lib/backports/1.8.7/integer.rb

@@ -1,24 +1,3 @@
-class Integer
-  Backports.make_block_optional self, :downto, :upto, :test_on => 42, :arg => 42
-  Backports.make_block_optional self, :times, :test_on => 42
+require 'backports/tools'
 
-  # Standard in ruby 1.8.7+. See official documentation[http://ruby-doc.org/core-1.9/classes/Fixnum.html]
-  def even?
-    self[0].zero?
-  end unless method_defined? :even?
-
-  # Standard in ruby 1.8.7+. See official documentation[http://ruby-doc.org/core-1.9/classes/Fixnum.html]
-  def odd?
-    !even?
-  end unless method_defined? :odd?
-
-  # Standard in ruby 1.8.7+. See official documentation[http://ruby-doc.org/core-1.9/classes/Fixnum.html]
-  def ord
-    self
-  end unless method_defined? :ord
-
-  # Standard in ruby 1.8.7+. See official documentation[http://ruby-doc.org/core-1.9/classes/Fixnum.html]
-  def pred
-    self - 1
-  end unless method_defined? :pred
-end
+Backports.require_relative_dir

data/lib/backports/1.8.7/integer/downto.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Integer, :downto, :test_on => 42, :arg => 42

data/lib/backports/1.8.7/integer/even.rb

@@ -0,0 +1,7 @@
+unless Integer.method_defined? :even?
+  class Integer
+    def even?
+      self[0].zero?
+    end
+  end
+end

data/lib/backports/1.8.7/integer/odd.rb

@@ -0,0 +1,7 @@
+unless Integer.method_defined? :odd?
+  class Integer
+    def odd?
+      !self[0].zero?
+    end
+  end
+end

data/lib/backports/1.8.7/integer/ord.rb

@@ -0,0 +1,7 @@
+unless Integer.method_defined? :ord
+  class Integer
+    def ord
+      self
+    end
+  end
+end

data/lib/backports/1.8.7/integer/pred.rb

@@ -0,0 +1,7 @@
+unless Integer.method_defined? :pred
+  class Integer
+    def pred
+      self - 1
+    end
+  end
+end

data/lib/backports/1.8.7/integer/times.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Integer, :times, :test_on => 42

data/lib/backports/1.8.7/integer/upto.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional Integer, :upto, :test_on => 42, :arg => 42

data/lib/backports/1.8.7/io.rb

@@ -1,43 +1,3 @@
-class IO
-  if RUBY_VERSION < '1.8.7'
-    Backports.make_block_optional self, :each, :each_line, :each_byte, :force => true
-    class << self
-      Backports.make_block_optional self, :foreach, :force => true
-    end
-  end
+require 'backports/tools'
 
-  def each_char
-    return to_enum(:each_char) unless block_given?
-    if $KCODE == "UTF-8"
-      lookup = 7.downto(4)
-      while c = read(1) do
-        n = c[0]
-        leftmost_zero_bit = lookup.find{|i| n[i].zero? }
-        case leftmost_zero_bit
-        when 7 # ASCII
-          yield c
-        when 6 # UTF 8 complementary characters
-          next # Encoding error, ignore
-        else
-          more = read(6-leftmost_zero_bit)
-          break unless more
-          yield c+more
-        end
-      end
-    else
-      while s = read(1)
-        yield s
-      end
-    end
-
-    self
-  end unless method_defined? :each_char
-
-  Backports.alias_method self, :bytes, :each_byte
-  Backports.alias_method self, :chars, :each_char
-  Backports.alias_method self, :lines, :each_line
-
-  Backports.alias_method self, :getbyte, :getc 
-  Backports.alias_method self, :readbyte, :readchar
-end
-  
+Backports.require_relative_dir

data/lib/backports/1.8.7/io/bytes.rb

@@ -0,0 +1 @@
+require 'backports/1.8.7/io/each_byte'

data/lib/backports/1.8.7/io/chars.rb

@@ -0,0 +1 @@
+require 'backports/1.8.7/io/each_char'

data/lib/backports/1.8.7/io/each.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.make_block_optional IO, :each, :force => true if RUBY_VERSION < '1.8.7'

data/lib/backports/1.8.7/io/each_byte.rb

@@ -0,0 +1,6 @@
+require 'backports/tools'
+
+if RUBY_VERSION < '1.8.7'
+  Backports.make_block_optional IO, :each_byte, :force => true
+  IO.send :alias_method, :bytes, :each_byte
+end

data/lib/backports/1.8.7/io/each_char.rb

@@ -0,0 +1,34 @@
+unless IO.method_defined? :each_char
+  require 'enumerator'
+
+  class IO
+    def each_char
+      return to_enum(:each_char) unless block_given?
+      if $KCODE == "UTF-8"
+        lookup = 7.downto(4)
+        while c = read(1) do
+          n = c[0]
+          leftmost_zero_bit = lookup.find{|i| n[i].zero? }
+          case leftmost_zero_bit
+          when 7 # ASCII
+            yield c
+          when 6 # UTF 8 complementary characters
+            next # Encoding error, ignore
+          else
+            more = read(6-leftmost_zero_bit)
+            break unless more
+            yield c+more
+          end
+        end
+      else
+        while s = read(1)
+          yield s
+        end
+      end
+
+      self
+    end
+
+    alias_method :chars, :each_char
+  end
+end