facets 2.9.2 → 2.9.3

data/src/core/facets/kernel/ask.rb

@@ -1,28 +0,0 @@
-module Kernel
-
-  module_function
-
-  # Very simple convenience method to get user input
-  # via the console. A prompt will be sent to $stdout,
-  # if given, and the input taken from $stdin...
-  #
-  #   ask "Are you happy? [Yn]"
-  #
-  # On the command line one would see...
-  #
-  #   Are you happy? [Yn]
-  #
-  # Responding...
-  #
-  #   Are you happy? [Yn] Y <ENTER>
-  #
-  # The ask method would return "Y".
-
-  def ask(prompt=nil)
-    $stdout << "#{prompt}"
-    $stdout.flush
-    $stdin.gets.chomp!
-  end
-
-end
-

data/src/core/facets/kernel/assign.rb

@@ -1,76 +0,0 @@
-module Kernel
-
-  # Assign via writer using arguments, hash or associative array.
-  #
-  # Using name-value arguments:
-  #
-  #   object = Object.new
-  #
-  #   object.assign(:a, 1)
-  #   object.assign(:b, 2)
-  #
-  # Using a hash:
-  #
-  #   object.assign(:a => 1, :b => 2)
-  #
-  # Use an associative array:
-  #
-  #   object.assign([[:a, 1], [:b, 2]])
-  #
-  # These are all equivalent to:
-  #
-  #   object.a = 1 if object.respond_to?(:a=)
-  #   object.b = 2 if object.respond_to?(:b=)
-  #
-  # Using an associative array instead of hash guarantees order of assignemnt
-  # for older versions of Ruby (< 1.8.7).
-  #
-  # NOTE: This method used to allow a block which would yield on +self+.
-  # This feature has been deprecated. There are plenty of other ways to
-  # handle this, such as #tap.
-  #
-  # TODO: Should this be called #set instead? Consider Module#set in this
-  # question, and also #set_from as the alias of #assign_from.
-
-  def assign(data=nil, value=Exception) #:yield:
-    if data
-      if value==Exception
-        data.each do |(k,v)|
-          __send__("#{k}=", v) if respond_to?("#{k}=")
-        end
-      else
-        __send__("#{data}=", value) if respond_to?("#{data}=")
-      end
-    end
-    self
-  end
-
-  # Set attribute writers using like readers from another object.
-  #
-  #   class AssignExample
-  #     attr_accessor :a, :b
-  #     def initialize(a, b)
-  #        @a, @b = a, b
-  #     end
-  #   end
-  #
-  #   obj1 = AssignExample.new(1,2)
-  #   obj2 = AssignExample.new(3,4)
-  #
-  #   obj2.assign_from(obj1, :a, :b)
-  #
-  #   obj2.a  #=> 1
-  #   obj2.b  #=> 2
-  #
-  # TODO: Should this be called #set_from ?
-
-  def assign_from(obj, *fields)
-    fields.flatten.each do |k|
-      send("#{k}=", obj.__send__("#{k}"))  #if self.respond_to?("#{k}=") && obj.respond_to?("#{k}")
-    end
-  end
-
-  ## DEPRECATED: Original name for #assign_from.
-  ##alias_method :set_from, :assign_from
-end
-

data/src/core/facets/kernel/assign_from.rb

@@ -1 +0,0 @@
-require 'facets/kernel/assign'

data/src/core/facets/kernel/attr_singleton.rb

@@ -1,59 +0,0 @@
-module Kernel
-
-  # Creates singleton attr_readers.
-  #
-  #   obj = Object.new
-  #
-  #   obj.attr_singleton_reader :x, :y
-  #
-  #   attr_singleton_reader :x, :y
-  #
-  # CREDIT: Trans
-
-  def attr_singleton_reader(*args)
-    #h, a = *args.partition{|a| Hash===a}
-    (class << self ; self ; end).send( :attr_reader, *args )
-    #(class << self ; self ; end).send( :attr_reader, *h.keys )
-    #h.each { |k,v| instance_variable_set("@#{k}", v) }
-  end
-
-  # Create singleton attr_writers.
-  #
-  #   obj = Object.new
-  #
-  #   obj.attr_singleton_writer :x, :y
-  #
-  #   obj.x = 3
-  #   obj.y = 4
-  #
-  # CREDIT: Trans
-
-  def attr_singleton_writer(*args)
-    #h, a = *args.partition{|a| Hash===a}
-    (class << self ; self ; end).send( :attr_writer, *args )
-    #(class << self ; self ; end).send( :attr_writer, *h.keys )
-    #h.each { |k,v| instance_variable_set("@#{k}", v) }
-  end
-
-  # Create singleton attr_accessors.
-  #
-  #   obj = Object.new
-  #
-  #   obj.attr_singleton_accessor :x, :y
-  #
-  #   obj.x = 3
-  #   obj.y = 4
-  #   obj.x      #=> 3
-  #   obj.y      #=> 4
-  #
-  # CREDIT: Trans
-
-  def attr_singleton_accessor(*args)
-    #h, a = *args.partition{|a| Hash===a}
-    (class << self ; self ; end).send( :attr_accessor, *args )
-    #(class << self ; self ; end).send( :attr_accessor, *h.keys )
-    #h.each { |k,v| instance_variable_set("@#{k}", v) }
-  end
-
-end
-

data/src/core/facets/kernel/blank.rb

@@ -1,84 +0,0 @@
-module Kernel
-  # An object is blank if it's nil, empty, or a whitespace string.
-  # For example, "", "   ", nil, [], and {} are blank.
-  #
-  # This simplifies...
-  #
-  #   if !address.nil? && !address.empty?
-  #
-  # to...
-  #
-  #   if !address.blank?
-  #
-  def blank?
-    return empty? if respond_to?(:empty?)
-    !self
-  end
-
-  # An object is present if it's not blank.
-  def present?
-    !blank?
-  end
-
-  # Returns object if it's #present? otherwise returns nil.
-  # object.presence is equivalent to object.present? ? object : nil.
-  #
-  # This is handy for any representation of objects where blank is the same
-  # as not present at all.  For example, this simplifies a common check for
-  # HTTP POST/query parameters...
-  #
-  #   state   = params[:state]   if params[:state].present?
-  #   country = params[:country] if params[:country].present?
-  #   region  = state || country || 'US'
-  #
-  # becomes...
-  #
-  #   region = params[:state].presence || params[:country].presence || 'US'
-  #
-  def presence
-    self if present?
-  end
-end
-
-class NilClass
-  def blank?
-    true
-  end
-end
-
-class FalseClass
-  def blank?
-    true
-  end
-end
-
-class TrueClass
-  def blank?
-    false
-  end
-end
-
-class Array
-  alias_method :blank?, :empty?
-end
-
-class Hash
-  alias_method :blank?, :empty?
-end
-
-class String
-  # Is this string just whitespace?
-  #
-  #   "abc".blank?  #=> false
-  #   "   ".blank?  #=> true
-  def blank?
-    /\S/ !~ self
-  end
-end
-
-class Numeric
-  def blank?
-    false
-  end
-end
-

data/src/core/facets/kernel/call_stack.rb

@@ -1,56 +0,0 @@
-module Kernel
-
-  alias_method :pp_callstack, :caller
-  alias_method :pp_call_stack, :caller
-
-  # Parse a caller string and break it into its components,
-  # returning an array composed of:
-  #
-  # * file (String)
-  # * lineno (Integer)
-  # * method (Symbol)
-  #
-  # For example, from irb
-  #
-  #   call_stack(1)
-  #
-  # _produces_ ...
-  #
-  #   [["(irb)", 2, :irb_binding],
-  #    ["/usr/lib/ruby/1.8/irb/workspace.rb", 52, :irb_binding],
-  #    ["/usr/lib/ruby/1.8/irb/workspace.rb", 52, nil]]
-  #
-  # Note: If the user decides to redefine caller() to output data
-  # in a different format, _prior_ to requiring this, then the
-  # results will be indeterminate.
-  #
-  # CREDIT: Trans
-
-  def call_stack(level = 1)
-    call_str_array = pp_call_stack(level)
-    stack = []
-    call_str_array.each{ |call_str|
-      file, lineno, method = call_str.split(':')
-      if method =~ /in `(.*)'/ then
-        method = $1.intern()
-      end
-      stack << [file, lineno.to_i, method]
-    }
-    stack
-  end
-
-  alias_method :callstack, :call_stack
-
-end
-
-
-class Binding
-
-  # Returns the call stack, in array format.
-  def call_stack(level=1)
-    eval( "callstack( #{level} )" )
-  end
-
-  alias_method :callstack, :call_stack
-end
-

data/src/core/facets/kernel/callstack.rb

@@ -1 +0,0 @@
-require 'facets/kernel/call_stack'

data/src/core/facets/kernel/case.rb

@@ -1,8 +0,0 @@
-module Kernel
-
-  def case?(*matchers)
-    matchers.all?{ |m| m === self }
-  end unless method_defined?(:case?)
-
-end
-

data/src/core/facets/kernel/complete.rb

@@ -1,26 +0,0 @@
-module Kernel
-
-  # Repeat loop until it yeilds false or nil.
-  #
-  #   a = [3, 2, 1]
-  #   b = []
-  #
-  #   complete do
-  #     x = a.pop
-  #     b << x
-  #     x
-  #   end
-  #
-  #   b  #=> [1, 2, 3, nil]
-  #
-  # Be "aware" when using this method, it easy to accidently
-  # induce infinite loops.
-  #
-  # CREDIT: Trans
-
-  def complete
-    loop { break unless yield }
-  end
-
-end
-

data/src/core/facets/kernel/constant.rb

@@ -1,20 +0,0 @@
-module Kernel
-
-  # This is similar to +Module#const_get+ but is accessible at all levels,
-  # and, unlike +const_get+, can handle module hierarchy.
-  #
-  #   constant("Fixnum")                  # => Fixnum
-  #   constant(:Fixnum)                   # => Fixnum
-  #
-  #   constant("Process::Sys")            # => Process::Sys
-  #   constant("Regexp::MULTILINE")       # => 4
-  #
-  # CREDIT: Trans
-
-  def constant(const)
-    const = const.to_s.dup
-    base = const.sub!(/^::/, '') ? Object : ( self.kind_of?(Module) ? self : self.class )
-    const.split(/::/).inject(base){ |mod, name| mod.const_get(name) }
-  end
-
-end

data/src/core/facets/kernel/d.rb

@@ -1,27 +0,0 @@
-module Kernel
-
-  # Like #p but gives file and line number...
-  #
-  #   d("hi")
-  #
-  # produces ...
-  #
-  #   "hi" (/home/dave/projects/foo.rb, 38)
-  #
-  def d(*x)
-    puts "#{x.inspect} #{caller[0]}"
-    return *x
-  end
-  
-  #--
-  # Old definition ...
-  #
-  #   def d(*x)
-  #     puts "#{__FILE__}, #{__LINE__}"
-  #     x.each{ |e| puts e.inspect } #p(*x)
-  #     x.size > 1 ? x : x.last #x.last
-  #   end
-  #++
-
-end
-

data/src/core/facets/kernel/deep_clone.rb

@@ -1 +0,0 @@
-require 'facets/kernel/deep_copy'

data/src/core/facets/kernel/deep_copy.rb

@@ -1,38 +0,0 @@
-module Kernel
-
-  # Anything that can be marshaled can be copied in totality.
-  #
-  #   "ABC".deep_copy  #=> "ABC"
-  #
-  # NOTE: Not sure why we wouldn't just call this #copy, but
-  # the term +deep_copy+ seems to be the common practive.
-  def deep_copy
-    Marshal::load(Marshal::dump(self))
-  end
-
-  #
-  def deep_clone(cache={})
-    return cache[self] if cache.key?(self) #@deep_cloning_obj if @deep_cloning
-    copy = clone
-    cache[self] = copy #@deep_cloning_obj = clone
-    copy.instance_variables.each do |var|
-      val = instance_variable_get(var)
-      begin
-        #@deep_cloning = true
-        val = val.deep_clone(cache)
-      rescue TypeError
-        next
-      ensure
-        #@deep_cloning = false
-      end
-      copy.instance_variable_set(var, val)
-      #@deep_cloning_obj.instance_variable_set(var, val)
-    end
-    #deep_cloning_obj = @deep_cloning_obj
-    #@deep_cloning_obj = nil
-    #deep_cloning_obj
-    copy
-  end
-
-end
-

data/src/core/facets/kernel/disable_warnings.rb

@@ -1,26 +0,0 @@
-module Kernel
-
-  #
-  # CREDIT: Trans
-
-  def disable_warnings #:yield:
-    verbose, $VERBOSE = $VERBOSE, nil
-    yield
-  ensure
-    $VERBOSE = verbose
-  end
-
-  # DEPRECATE: Use #disable_warnings instead.
-  alias_method :silence_warnings, :disable_warnings
-
-  #
-  # CREDIT: Trans
-
-  def enable_warnings #:yield:
-    verbose, $VERBOSE = $VERBOSE, true
-    yield
-  ensure
-    $VERBOSE = verbose
-  end
-
-end