backports 3.0.3 → 3.1.0

data/lib/backports/1.9.1/hash/assoc.rb

@@ -0,0 +1,12 @@
+unless Hash.method_defined? :assoc
+  class Hash
+    def assoc(key)
+      val = fetch(key) do
+        return find do |k, v|
+          [k, v] if k == key
+        end
+      end
+      [key, val]
+    end
+  end
+end

data/lib/backports/1.9.1/hash/default_proc.rb

@@ -0,0 +1,14 @@
+unless Hash.method_defined? :default_proc=
+  require 'backports/tools'
+
+  class Hash
+    def default_proc=(proc)
+      if proc == nil # nil accepted in Ruby 2.0
+        self.default = nil
+        self
+      else
+        replace(Hash.new(&Backports.coerce_to(proc, Proc, :to_proc)).merge!(self))
+      end
+    end
+  end
+end

data/lib/backports/1.9.1/hash/rassoc.rb

@@ -0,0 +1,9 @@
+unless Hash.method_defined? :rassoc
+  class Hash
+    def rassoc(value)
+      k = key(value)
+      v = fetch(k){return nil}
+      [k, fetch(k)] if k || v == value
+    end
+  end
+end

data/lib/backports/1.9.1/hash/try_convert.rb

@@ -0,0 +1,7 @@
+unless Hash.respond_to? :try_convert
+  require 'backports/tools'
+
+  def Hash.try_convert(x)
+    Backports.try_convert(x, Hash, :to_hash)
+  end
+end

data/lib/backports/1.9.1/integer.rb

@@ -1,22 +1,3 @@
-class Integer
-  Backports.alias_method self, :magnitude, :abs
+require 'backports/tools'
 
-  if instance_method(:round).arity.zero?
-    def round_with_digits(ndigits=0)
-      ndigits = Backports::coerce_to_int(ndigits)
-      case
-      when ndigits.zero?
-        self
-      when ndigits > 0
-        Float(self)
-      else
-        pow = 10 ** (-ndigits)
-        remain = self % pow
-        comp = self < 0 ? :<= : :<
-        remain -= pow unless remain.send(comp, pow / 2)
-        self - remain
-      end
-    end
-    Backports.alias_method_chain self, :round, :digits
-  end
-end
+Backports.require_relative_dir

data/lib/backports/1.9.1/integer/magnitude.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.alias_method Integer, :magnitude, :abs

data/lib/backports/1.9.1/integer/round.rb

@@ -0,0 +1,24 @@
+if Integer.instance_method(:round).arity.zero?
+  require 'backports/tools'
+
+  class Integer
+    def round_with_digits(ndigits=0)
+      ndigits = Backports::coerce_to_int(ndigits)
+      case
+      when ndigits.zero?
+        self
+      when ndigits > 0
+        raise RangeError if ndigits >= 1<<31
+        Float(self)
+      else
+        pow = 10 ** (-ndigits)
+        return 0 if pow.is_a?(Float) # when ndigits hugely negative
+        remain = self % pow
+        comp = self < 0 ? :<= : :<
+        remain -= pow unless remain.send(comp, pow / 2)
+        self - remain
+      end
+    end
+    Backports.alias_method_chain self, :round, :digits
+  end
+end

data/lib/backports/1.9.1/io.rb

@@ -1,34 +1,3 @@
-class IO
-  class << self
-    def binread(file, *arg)
-      raise ArgumentError, "wrong number of arguments (#{1+arg.size} for 1..3)" unless arg.size < 3
-      File.open(Backports.convert_to_path(file),"rb") do |f|
-        f.read(*arg)
-      end
-    end unless method_defined? :binread
+require 'backports/tools'
 
-    def try_convert(obj)
-      Backports.try_convert(obj, IO, :to_io)
-    end unless method_defined? :try_convert
-
-    begin
-      File.open(__FILE__) { |f| IO.open(f.fileno, :mode => 'r').close }
-    rescue StandardError
-      def open_with_options_hash(*args)
-        if args.size > 2 || args[1].is_a?(Hash)
-          fd, mode, options = (args << Backports::Undefined)
-          args = [fd, Backports.combine_mode_and_option(mode, options)]
-        end
-        if block_given?
-          open_without_options_hash(*args){|f| yield f}
-        else
-          open_without_options_hash(*args)
-        end
-      end
-
-      Backports.alias_method_chain self, :open, :options_hash
-    end
-  end
-
-  Backports.alias_method self, :ungetbyte, :ungetc
-end
+Backports.require_relative_dir

data/lib/backports/1.9.1/io/binread.rb

@@ -0,0 +1,10 @@
+unless IO.respond_to? :binread
+  require 'backports/tools'
+
+  def IO.binread(file, *arg)
+    raise ArgumentError, "wrong number of arguments (#{1+arg.size} for 1..3)" unless arg.size < 3
+    File.open(Backports.convert_to_path(file),"rb") do |f|
+      f.read(*arg)
+    end
+  end
+end

data/lib/backports/1.9.1/io/open.rb

@@ -0,0 +1,21 @@
+begin
+  File.open(__FILE__) { |f| IO.open(f.fileno, :mode => 'r').close }
+rescue TypeError
+  require 'backports/tools'
+
+  class << IO
+    def open_with_options_hash(*args)
+      if args.size > 2 || args[1].respond_to?(:to_hash)
+        fd, mode, options = (args << Backports::Undefined)
+        args = [fd, Backports.combine_mode_and_option(mode, options)]
+      end
+      if block_given?
+        open_without_options_hash(*args){|f| yield f}
+      else
+        open_without_options_hash(*args)
+      end
+    end
+
+    Backports.alias_method_chain self, :open, :options_hash
+  end
+end

data/lib/backports/1.9.1/io/try_convert.rb

@@ -0,0 +1,7 @@
+unless IO.respond_to? :try_convert
+  require 'backports/tools'
+
+  def IO.try_convert(obj)
+    Backports.try_convert(obj, IO, :to_io)
+  end
+end

data/lib/backports/1.9.1/io/ungetbyte.rb

@@ -0,0 +1,3 @@
+require 'backports/tools'
+
+Backports.alias_method IO, :ungetbyte, :ungetc

data/lib/backports/1.9.1/kernel.rb

@@ -1,40 +1,3 @@
-module Kernel
-  alias_method :__callee__, :__method__  unless (__callee__ || true rescue false)
+require 'backports/tools'
 
-  # Standard in ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Object.html]
-  def define_singleton_method(*args, &block)
-    class << self
-      self
-    end.send(:define_method, *args, &block)
-  end unless method_defined? :define_singleton_method
-
-  # Standard in ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Object.html]
-  def require_relative(relative_feature)
-    file = caller.first.split(/:\d/,2).first
-    if /\A\((.*)\)/ =~ file # eval, etc.
-      raise LoadError, "require_relative is called in #{$1}"
-    end
-    require File.expand_path(relative_feature, File.dirname(file))
-  end unless private_method_defined? :require_relative
-  private :require_relative
-
-  # Standard in ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Object.html]
-  def public_method(meth)
-    if respond_to?(meth) && !protected_methods.include?(meth.to_s)
-      method(meth)
-    else
-      raise NameError, "undefined method `#{meth}' for class `#{self.class}'"
-    end
-  end unless method_defined? :public_method
-
-  # Standard in ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Object.html]
-  def public_send(method, *args, &block)
-    if respond_to?(method) && !protected_methods.include?(method.to_s)
-      send(method, *args, &block)
-    else
-      :foo.generate_a_no_method_error_in_preparation_for_method_missing rescue nil
-      # otherwise a NameError might be raised when we call method_missing ourselves
-      method_missing(method.to_sym, *args, &block)
-    end
-  end unless method_defined? :public_send
-end
+Backports.require_relative_dir

data/lib/backports/1.9.1/kernel/__callee__.rb

@@ -0,0 +1,7 @@
+unless (__callee__ || true rescue false)
+  require 'backports/1.8.7/kernel/__method__'
+
+  module Kernel
+    alias_method :__callee__, :__method__
+  end
+end

data/lib/backports/1.9.1/kernel/define_singleton_method.rb

@@ -0,0 +1,9 @@
+unless Kernel.method_defined? :define_singleton_method
+  module Kernel
+    def define_singleton_method(*args, &block)
+      class << self
+        self
+      end.send(:define_method, *args, &block)
+    end
+  end
+end

data/lib/backports/1.9.1/kernel/public_method.rb

@@ -0,0 +1,11 @@
+unless Kernel.method_defined? :public_method
+  module Kernel
+    def public_method(meth)
+      if respond_to?(meth) && !protected_methods.include?(meth.to_s)
+        method(meth)
+      else
+        raise NameError, "undefined method `#{meth}' for class `#{self.class}'"
+      end
+    end
+  end
+end

data/lib/backports/1.9.1/kernel/public_send.rb

@@ -0,0 +1,13 @@
+unless Kernel.method_defined? :public_send
+  module Kernel
+    def public_send(method, *args, &block)
+      if respond_to?(method) && !protected_methods.include?(method.to_s)
+        send(method, *args, &block)
+      else
+        :foo.generate_a_no_method_error_in_preparation_for_method_missing rescue nil
+        # otherwise a NameError might be raised when we call method_missing ourselves
+        method_missing(method.to_sym, *args, &block)
+      end
+    end
+  end
+end

data/lib/backports/1.9.1/kernel/require_relative.rb

@@ -0,0 +1,14 @@
+unless Kernel.private_method_defined? :require_relative
+  require 'backports/tools'
+
+  module Kernel
+    def require_relative(relative_feature)
+      file = caller.first.split(/:\d/,2).first
+      if /\A\((.*)\)/ =~ file # eval, etc.
+        raise LoadError, "require_relative is called in #{$1}"
+      end
+      require File.expand_path(Backports.convert_path(relative_feature), File.dirname(file))
+    end
+    private :require_relative
+  end
+end

data/lib/backports/1.9.1/math.rb

@@ -1,25 +1,3 @@
-module Math
-  unless (log(2, 2) rescue false)
-    # Standard in Ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Math.html]
-    class << self
-      def log_with_optional_base(numeric, base = Backports::Undefined)
-        if base.equal?(Backports::Undefined)
-          # Math.log(n) in 1.9.1 no longer accepts string arguments as it
-          # did on 1.8.x, but we won't risk redefining existing behavior
-          # when called with just one argument.
-          log_without_optional_base(numeric)
-        else
-          # Math.log(n, b) in 1.9.1 does not accept string arguments:
-          raise TypeError, "can't convert String into Float" if numeric.is_a?(String) || base.is_a?(String)
-          log_without_optional_base(numeric) / log_without_optional_base(base)
-        end
-      end
-      Backports.alias_method_chain self, :log, :optional_base
+require 'backports/tools'
 
-      # Standard in Ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Math.html]
-      def log2(numeric)
-        log(numeric, 2)
-      end unless method_defined? :log2
-    end
-  end
-end
+Backports.require_relative_dir

data/lib/backports/1.9.1/math/log.rb

@@ -0,0 +1,22 @@
+unless (Math.log(2, 2) rescue false)
+    # Standard in Ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Math.html]
+  class << Math
+    require 'backports/tools'
+
+    def log_with_optional_base(numeric, base = Backports::Undefined)
+      if base.equal?(Backports::Undefined)
+        # Math.log(n) in 1.9.1 no longer accepts string arguments as it
+        # did on 1.8.x, but we won't risk redefining existing behavior
+        # when called with just one argument.
+        log_without_optional_base(numeric)
+      else
+        # Math.log(n, b) in 1.9.1 does not accept string arguments:
+        raise TypeError, "can't convert String into Float" if numeric.is_a?(String) || base.is_a?(String)
+        log_without_optional_base(numeric) / log_without_optional_base(base)
+      end
+    end
+    Backports.alias_method_chain self, :log, :optional_base
+
+    # Standard in Ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Math.html]
+  end
+end

data/lib/backports/1.9.1/math/log2.rb

@@ -0,0 +1,5 @@
+unless Math.respond_to? :log2
+  def Math.log2(numeric)
+    log(numeric) / log(2)
+  end
+end

data/lib/backports/1.9.1/numeric.rb

@@ -1,9 +1,3 @@
-class Numeric
-  if instance_method(:round).arity.zero?
-    def round_with_digits(ndigits=0)
-      ndigits = Backports::coerce_to_int(ndigits)
-      ndigits.zero? ? round_without_digits : Float(self).round(ndigits)
-    end
-    Backports.alias_method_chain self, :round, :digits
-  end
-end
+require 'backports/tools'
+
+Backports.require_relative_dir

data/lib/backports/1.9.1/numeric/round.rb

@@ -0,0 +1,11 @@
+if Numeric.instance_method(:round).arity.zero?
+  require 'backports/tools'
+
+  class Numeric
+    def round_with_digits(ndigits=0)
+      ndigits = Backports::coerce_to_int(ndigits)
+      ndigits.zero? ? round_without_digits : Float(self).round(ndigits)
+    end
+    Backports.alias_method_chain self, :round, :digits
+  end
+end

data/lib/backports/1.9.1/proc.rb

@@ -1,54 +1,3 @@
-unless Proc.method_defined? :lambda?
-  class Proc
-    # Standard in Ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Proc.html]
-    def lambda?
-      !!@is_lambda
-    end
-  end
+require 'backports/tools'
 
-  class Method
-    def to_proc_with_lambda_tracking
-      proc = to_proc_without_lambda_tracking
-      proc.instance_variable_set :@is_lambda, true
-      proc
-    end
-    Backports.alias_method_chain self, :to_proc, :lambda_tracking
-  end
-
-  module Kernel
-    def lambda_with_lambda_tracking(&block)
-      Backports.track_lambda block, lambda_without_lambda_tracking(&block), true
-    end
-
-    def proc_with_lambda_tracking(&block)
-      Backports.track_lambda block, proc_without_lambda_tracking(&block)
-    end
-
-    Backports.alias_method_chain self, :lambda, :lambda_tracking
-    Backports.alias_method_chain self, :proc, :lambda_tracking
-  end
-end
-
-class Proc
-  # Standard in Ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Proc.html]
-  def curry(argc = nil)
-    min_argc = arity < 0 ? -arity - 1 : arity
-    argc ||= min_argc
-    if lambda? and arity < 0 ? argc < min_argc : argc != arity
-      raise ArgumentError, "wrong number of arguments (#{argc} for #{min_argc})"
-    end
-    creator = lambda? ? :lambda : :proc
-    block = send(creator) do |*args|
-      if args.count >= argc
-        call(*args)
-      else
-        send(creator) do |*more_args|
-          args += more_args
-          block.call(*args)
-        end
-      end
-    end
-  end unless method_defined? :curry
-
-  alias_method :===, :call unless Proc.new{true} === 42
-end
+Backports.require_relative_dir

data/lib/backports/1.9.1/proc/case_compare.rb

@@ -0,0 +1,6 @@
+unless Proc.new{true} === 42
+  class Proc
+    # Standard in Ruby 1.9. See official documentation[http://ruby-doc.org/core-1.9/classes/Proc.html]
+    alias_method :===, :call
+  end
+end