facets 2.8.4 → 2.9.0.pre.1

data/lib/core/facets/hash/to_module.rb

@@ -1,26 +0,0 @@
-class Hash
-
-  # Convert a hash into a mixin.
-  #
-  # CREDIT: Jay Fields
-  #
-  #--
-  # TODO: Consider #to_object option.
-  #++
-
-  def to_module
-    hash = self
-    Module.new do
-      hash.each do |key, value|
-        define_method key do
-          value #.to_object
-        end
-      end
-    end
-  end
-
-  #def to_object
-  #  Object.new.extend(to_module)
-  #end
-end
-

data/lib/core/facets/kernel/__here__.rb

@@ -1,14 +0,0 @@
-module Kernel
-
-  # Outputs the file, line and current method.
-  #
-  #   caller(1).first
-  #   "/usr/lib/ruby/1.8/irb/workspace.rb:52:in `irb_binding'"
-  #
-  # CREDIT: William Mason
-  def __HERE__
-    caller(1).first
-  end
-
-end
-

data/lib/core/facets/kernel/populate.rb

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

data/lib/core/facets/kernel/require_local.rb

@@ -1,31 +0,0 @@
-require 'facets/kernel/require_relative'
-
-=begin
-module Kernel
-
-  # Require file from same dir as calling script.
-  #
-  #   require_local 'templib'
-  #
-  # CREDIT: Paul Brannan
-  #
-  def require_local(fname)
-    #fdir = File.expand_path( File.dirname( caller[0] ) )
-    fdir = File.dirname( caller[0] )
-    require( File.join( fdir, fname ) )
-  end
-
-  # Load file from same dir as calling script.
-  #
-  #   load_local 'templib'
-  #
-  # CREDIT: Paul Brannan
-  #
-  def load_local(fname, safe=nil)
-    #fdir = File.expand_path( File.dirname( caller[0] ) )
-    fdir = File.dirname( caller[0] )
-    load( File.join( fdir, fname ), safe )
-  end
-
-end
-=end

data/lib/core/facets/kernel/resc.rb

@@ -1,16 +0,0 @@
-module Kernel
-
-  # Provides a shortcut to the Regexp.escape module method.
-  #
-  #   resc("H..LO")   #=> "H\\.\\.LO"
-  #
-  #   TODO: Should this be deprecated in favor of String#to_re/to_rx ?
-  #
-  # CREDIT: Trans
-
-  def resc(str)
-    Regexp.escape(str.to_s)
-  end
-
-end
-

data/lib/core/facets/kernel/set_from.rb

@@ -1,2 +0,0 @@
-require 'facets/kernel/assign_from'
-

data/lib/core/facets/module/conflict.rb

@@ -1,62 +0,0 @@
-class Module
-
-  # Detect conflicts.
-  #
-  #   module A
-  #     def c; end
-  #   end
-  #
-  #   module B
-  #     def c; end
-  #   end
-  #
-  #   A.conflict?(B)  #=> ["c"]
-  #
-  #
-  #   TODO: All instance methods, or just public?
-  #
-  # CREDIT: Thomas Sawyer, Robert Dober
-
-  def conflict?(other)
-    common_ancestor = (ancestors & other.ancestors).first
-    c = []
-    c += (public_instance_methods(true) & other.public_instance_methods(true))
-    c += (private_instance_methods(true) & other.private_instance_methods(true))
-    c += (protected_instance_methods(true) & other.protected_instance_methods(true))
-    c -= common_ancestor.public_instance_methods(true)
-    c -= common_ancestor.private_instance_methods(true)
-    c -= common_ancestor.protected_instance_methods(true)
-    c.empty? ? false : c
-  end
-
-  #def conflict?(other)
-  #  c = instance_methods & other.instance_methods
-  #  c.empty ? false : c
-  #end
-
-  # Like #conflict?, but checks only public methods.
-  def public_conflict?(other)
-    common_ancestor = (ancestors & other.ancestors).first
-    c = public_instance_methods(true) & other.public_instance_methods(true)
-    c -= common_ancestor.public_instance_methods(true)
-    c.empty? ? false : c
-  end
-
-  # Like #conflict?, but checks only private methods.
-  def private_conflict?(other)
-    common_ancestor = (ancestors & other.ancestors).first
-    c = private_instance_methods(true) & other.private_instance_methods(true)
-    c -= common_ancestor.private_instance_methods(true)
-    c.empty? ? false : c
-  end
-
-  # Like #conflict?, but checks only protected methods.
-  def protected_conflict?(other)
-    common_ancestor = (ancestors & other.ancestors).first
-    c = protected_instance_methods(true) & other.protected_instance_methods(true)
-    c -= common_ancestor.protected_instance_methods(true)
-    c.empty? ? false : c
-  end
-
-end
-

data/lib/core/facets/module/instance_methods.rb

@@ -1,38 +0,0 @@
-class Module
-
-  # List all instance methods, equivalent to
-  #
-  #   public_instance_methods +
-  #   protected_instance_methods +
-  #   private_instance_methods
-  #
-  # TODO: Better name for #all_instance_methods?
-  #
-  # CREDIT: Trans
-
-  def all_instance_methods(include_super=true)
-    public_instance_methods(include_super) +
-    protected_instance_methods(include_super) +
-    private_instance_methods(include_super)
-  end
-
-  # Query whether a public instance method is defined for the module.
-  #
-  # CREDIT: Gavin Sinclair, Noah Gibbs
-
-  def instance_method_defined?(meth)
-    instance_methods(true).find{ |m| m == meth.to_s }
-  end
-
-  # Query whether a normal (singleton) method is defined for the module.
-  #
-  # CREDIT: Gavin Sinclair, Noah Gibbs
-
-  def singleton_method_defined?(meth)
-    singleton_methods(true).find{ |m| m == meth.to_s }
-  end
-
-  alias_method :module_method_defined?, :singleton_method_defined?
-
-end
-

data/lib/core/facets/module/modspace.rb

@@ -1,22 +0,0 @@
-class Module
-
-  # Returns the module's container module.
-  #
-  #   module Example
-  #     class Demo
-  #     end
-  #   end
-  #
-  #   Example::Demo.modspace   #=> Example
-  #
-  # See also Module#basename.
-  #
-  # CREDIT: Trans
-
-  def modspace
-    space = name[ 0...(name.rindex( '::' ) || 0)]
-    space.empty? ? Object : eval(space)
-  end
-
-end
-

data/lib/core/facets/module/module_require.rb

@@ -1 +0,0 @@
-require 'facets/module/module_load'

data/lib/core/facets/module/nesting.rb

@@ -1,18 +0,0 @@
-class Module
-
-  # Show a modules nesting in module namespaces.
-  #
-  #   A::B::C.nesting  #=> [ A, A::B ]
-  #
-  # CREDIT: Trans
-
-  def nesting
-    n = []
-    name.split(/::/).inject(self) do |mod, name|
-      c = mod.const_get(name) ; n << c ; c
-    end
-    return n
-  end
-
-end
-

data/lib/core/facets/stackable.rb

@@ -1,86 +0,0 @@
-# = Stackable
-#
-# Stackable mixin provides #pop, #push, #pull, etc.
-# It depends on #slice, #splice and #insert.
-#
-# == Authors
-#
-# * Thomas Sawyer
-#
-# == Copyright
-#
-# Copyright (c) 2007 Thomas Sawyer
-#
-# Ruby License
-#
-# This module is free software. You may use, modify, and/or redistribute this
-# software under the same terms as Ruby.
-#
-# This program is distributed in the hope that it will be useful, but WITHOUT
-# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
-# FOR A PARTICULAR PURPOSE.
-
-
-# = Stackable
-#
-# Stackable mixin provides #pop, #push, #pull, etc.
-# It depends on #slice, #splice and #insert.
-#
-module Stackable
-
-  # Pop item off stack.
-  #
-  #   a = [1, 2, 3]
-  #   a.pop           #=> 3
-  #   a               #=> [1, 2]
-
-  def pop
-    splice(-1)
-  end
-
-  # Push item onto the stack.
-  #
-  #   a = [1, 2]
-  #   a.push(3)       #=> [1, 2, 3]
-
-  def push(x)
-    insert(-1,x)
-  end
-
-  # Pull item off the stack.
-  #
-  #   a = [1, 2, 3]
-  #   a.pull          #=> 1
-  #   a               #=> [2, 3]
-
-  def pull
-    slice(0)
-  end
-
-  alias_method :shift, :pull
-
-  # Poke item onto the stack.
-  #
-  #   a = [2, 3]
-  #   a.poke(1)       #=> [1, 2, 3]
-  #
-  #   TODO: Better name (besides unshift)?
-
-  def poke(x)
-    insert(0,x)
-  end
-
-  alias_method :unshift, :poke
-
-  # Peek at the top of the stack.
-  #
-  #   a = [1, 2, 3]
-  #   a.peek          #=> 3
-  #   a               #=> [1, 2, 3]
-
-  def peek
-    slice(-1)
-  end
-
-end
-

data/lib/core/facets/string/chars.rb

@@ -1,20 +0,0 @@
-class String
-
-  # Some other library is defining this method but it is
-  # returning an Enumerator, not an array. Therefore we're
-  # overriding it regardless of it's inclusion in 1.9.
-  #
-  unless defined?(::ActiveSupport) # 1.9 & ActiveSupport
-
-    # Returns an array of characters.
-    #
-    #   "abc".chars  #=> ["a","b","c"]
-    #
-    def chars
-      split(//)
-    end
-
-  end
-
-end
-

data/lib/core/facets/symbol/re_s.rb

@@ -1,18 +0,0 @@
-require 'facets/functor'
-
-class Symbol
-
-  # Convert symbol to string, apply string method
-  # and convert back to symbol via a fluent
-  # interface.
-  #
-  #   :HELLO.re_s.downcase
-  #
-  def re_s
-    @re_s ||= Functor.new do |op, *a|
-      to_s.send(op, *a).to_sym
-    end
-  end
-
-end
-

data/lib/core/facets/time/advance.rb

@@ -1,18 +0,0 @@
-class Time
-
-  # Uses Date to provide precise Time calculations for years, months, and days.
-  # The +options+ parameter takes a hash with any of these keys: <tt>:years</tt>,
-  # <tt>:months</tt>, <tt>:weeks</tt>, <tt>:days</tt>, <tt>:hours</tt>,
-  # <tt>:minutes</tt>, <tt>:seconds</tt>.
-  #
-  # CREDIT: ActiveSupport Team
-
-  def advance(options)
-    d = to_date.advance(options)
-    time_advanced_by_date = change(:year => d.year, :month => d.month, :day => d.day)
-    seconds_to_advance = (options[:seconds] || 0) + (options[:minutes] || 0) * 60 + (options[:hours] || 0) * 3600
-    seconds_to_advance == 0 ? time_advanced_by_date : time_advanced_by_date.since(seconds_to_advance)
-  end
-
-end
-

data/lib/core/facets/time/round.rb

@@ -1,17 +0,0 @@
-require 'facets/time/trunc'
-
-class Time
-
-  # Round time at the nearest range (in seconds).
-  #
-  #   t = Time.now
-  #   =>
-  #   t.round(60*60) # 1 hour
-  #   =>
-  #  
-  def round(amount)
-    (self+amount/2.0).trunc(amount)
-  end
-
-end
-

data/lib/more/facets/ansicode.rb

@@ -1,306 +0,0 @@
-# = ANSICode
-#
-# Module which makes it very easy to use ANSI codes.
-# These are especially nice for beautifying shell output.
-#
-#   include ANSICode
-#
-#   p red, "Hello", blue, "World"
-#   => "\e[31mHello\e[34mWorld"
-#
-#   p red { "Hello" } + blue { "World" }
-#   => "\e[31mHello\e[0m\e[34mWorld\e[0m"
-#
-# == Supported ANSI Comands
-#
-# The following is a list of supported codes.
-#
-#     save
-#     restore
-#     clear_screen
-#     cls             # synonym for :clear_screen
-#     clear_line
-#     clr             # synonym for :clear_line
-#     move
-#     up
-#     down
-#     left
-#     right
-#     display
-#
-#     clear
-#     reset           # synonym for :clear
-#     bold
-#     dark
-#     italic          # not widely implemented
-#     underline
-#     underscore      # synonym for :underline
-#     blink
-#     rapid_blink     # not widely implemented
-#     negative        # no reverse because of String#reverse
-#     concealed
-#     strikethrough   # not widely implemented
-#
-#     black
-#     red
-#     green
-#     yellow
-#     blue
-#     magenta
-#     cyan
-#     white
-#
-#     on_black
-#     on_red
-#     on_green
-#     on_yellow
-#     on_blue
-#     on_magenta
-#     on_cyan
-#     on_white
-#
-# == Authors
-#
-# * Florian Frank
-# * Thomas Sawyer
-#
-# == Speical Thanks
-#
-# Special thanks to Florian Frank. ANSICode is a partial adaptation
-# of ANSIColor, Copyright (c) 2002 Florian Frank, LGPL.
-#
-# == Todo
-#
-# * Need to add rest of ANSI codes. Include modes?
-# * Re-evaluate how color/yielding methods are defined.
-# * Maybe up, down, right, left should have yielding methods too?
-#
-# == Copying
-#
-# Copyright (c) 2004 Florian Frank, Thomas Sawyer
-
-
-# = ANSICode
-#
-# Module which makes it very easy to use ANSI codes.
-# These are esspecially nice for beautifying shell output.
-#
-#   include ANSICode
-#
-#   p red, "Hello", blue, "World"
-#   => "\e[31mHello\e[34mWorld"
-#
-#   p red { "Hello" } + blue { "World" }
-#   => "\e[31mHello\e[0m\e[34mWorld\e[0m"
-#
-# == Supported ANSI Comands
-#
-# The following is a list of supported codes.
-#
-#     save
-#     restore
-#     clear_screen
-#     cls             # synonym for :clear_screen
-#     clear_line
-#     clr             # synonym for :clear_line
-#     move
-#     up
-#     down
-#     left
-#     right
-#     display
-#
-#     clear
-#     reset           # synonym for :clear
-#     bold
-#     dark
-#     italic          # not widely implemented
-#     underline
-#     underscore      # synonym for :underline
-#     blink
-#     rapid_blink     # not widely implemented
-#     negative        # no reverse because of String#reverse
-#     concealed
-#     strikethrough   # not widely implemented
-#
-#     black
-#     red
-#     green
-#     yellow
-#     blue
-#     magenta
-#     cyan
-#     white
-#
-#     on_black
-#     on_red
-#     on_green
-#     on_yellow
-#     on_blue
-#     on_magenta
-#     on_cyan
-#     on_white
-#
-module ANSICode
-
-  extend self
-
-  # Save current cursor positon.
-
-  def save
-    "\e[s"
-  end
-
-  # Restore saved cursor positon.
-
-  def restore
-    "\e[u"
-  end
-
-  # Clear the screen and move cursor to home.
-
-  def clear_screen
-    "\e[2J"
-  end
-  alias_method :cls, :clear_screen
-
-  # Clear to the end of the current line.
-
-  def clear_line
-    "\e[K"
-  end
-  alias_method :clr, :clear_line
-
-  #--
-  #def position
-  #  "\e[#;#R"
-  #end
-  #++
-
-  # Move curose to line and column.
-
-  def move( line, column=0 )
-    "\e[#{line.to_i};#{column.to_i}H"
-  end
-
-  # Move cursor up a specificed number of spaces.
-
-  def up( spaces=1 )
-    "\e[#{spaces.to_i}A"
-  end
-
-  # Move cursor down a specificed number of spaces.
-
-  def down( spaces=1 )
-    "\e[#{spaces.to_i}B"
-  end
-
-  # Move cursor left a specificed number of spaces.
-
-  def left( spaces=1 )
-    "\e[#{spaces.to_i}D"
-  end
-
-  # Move cursor right a specificed number of spaces.
-
-  def right( spaces=1 )
-    "\e[#{spaces.to_i}C"
-  end
-
-  # Like +move+ but returns to original positon
-  # after yielding block or adding string argument.
-
-  def display( line, column=0, string=nil ) #:yield:
-    result = "\e[s"
-    result << "\e[#{line.to_i};#{column.to_i}H"
-    if block_given?
-      result << yield
-      result << "\e[u"
-    elsif string
-      result << string
-      result << "\e[u"
-    elsif respond_to?(:to_str)
-      result << self
-      result << "\e[u"
-    end
-    return result
-  end
-
-  # Define color codes.
-
-  def self.define_ansicolor_method(name,code)
-    class_eval <<-HERE
-      def #{name.to_s}(string = nil)
-          result = "\e[#{code}m"
-          if block_given?
-              result << yield
-              result << "\e[0m"
-          elsif string
-              result << string
-              result << "\e[0m"
-          elsif respond_to?(:to_str)
-              result << self
-              result << "\e[0m"
-          end
-          return result
-      end
-    HERE
-  end
-
-  @@colors = [
-    [ :clear        ,   0 ],
-    [ :reset        ,   0 ],     # synonym for :clear
-    [ :bold         ,   1 ],
-    [ :dark         ,   2 ],
-    [ :italic       ,   3 ],     # not widely implemented
-    [ :underline    ,   4 ],
-    [ :underscore   ,   4 ],     # synonym for :underline
-    [ :blink        ,   5 ],
-    [ :rapid_blink  ,   6 ],     # not widely implemented
-    [ :negative     ,   7 ],     # no reverse because of String#reverse
-    [ :concealed    ,   8 ],
-    [ :strikethrough,   9 ],     # not widely implemented
-    [ :black        ,  30 ],
-    [ :red          ,  31 ],
-    [ :green        ,  32 ],
-    [ :yellow       ,  33 ],
-    [ :blue         ,  34 ],
-    [ :magenta      ,  35 ],
-    [ :cyan         ,  36 ],
-    [ :white        ,  37 ],
-    [ :on_black     ,  40 ],
-    [ :on_red       ,  41 ],
-    [ :on_green     ,  42 ],
-    [ :on_yellow    ,  43 ],
-    [ :on_blue      ,  44 ],
-    [ :on_magenta   ,  45 ],
-    [ :on_cyan      ,  46 ],
-    [ :on_white     ,  47 ],
-  ]
-
-  @@colors.each do |c, v|
-    define_ansicolor_method(c, v)
-  end
-
-  ColoredRegexp = /\e\[([34][0-7]|[0-9])m/
-
-  def uncolored(string = nil)
-    if block_given?
-      yield.gsub(ColoredRegexp, '')
-    elsif string
-      string.gsub(ColoredRegexp, '')
-    elsif respond_to?(:to_str)
-      gsub(ColoredRegexp, '')
-    else
-      ''
-    end
-  end
-
-  module_function
-
-  def colors
-    @@colors.map { |c| c[0] }
-  end
-
-end
-