facets 1.1.0 → 1.2.0

data/lib/facet/nilclass/to_f.rb

@@ -1,32 +1 @@
-
-class NilClass
-
-  # Returns zero float, similar to #to_i.
-  #
-  #  nil.to_f   #=> 0.0
-  #
-  def to_f; 0.0; end
-
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCNilClass < Test::Unit::TestCase
-
-    def test_to_f
-      assert_equal( 0.0, nil.to_f )
-    end
-
-  end
-
-=end
+require 'facets/core/nilclass/to_f.rb'

data/lib/facet/nilclass/to_h.rb

@@ -1,33 +1 @@
-
-class NilClass
-
-  # Allows <tt>nil</tt> to create an empty hash,
-  # similar to #to_a and #to_s.
-  #
-  #  nil.to_h    #=> {}
-  #
-  def to_h; {}; end
-
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCNilClass < Test::Unit::TestCase
-
-    def test_to_h
-      assert_equal( {}, nil.to_h )
-    end
-
-  end
-
-=end
+require 'facets/core/nilclass/to_h.rb'

data/lib/facet/nilcomparable.rb

@@ -0,0 +1 @@
+require 'facets/more/nilcomparable.rb'

data/lib/facet/nullclass.rb

@@ -0,0 +1 @@
+require 'facets/more/nullclass.rb'

data/lib/facet/numeric.rb

@@ -1,5 +1 @@
-require 'facet/numeric/ceil_multiple'
-require 'facet/numeric/distance'
-require 'facet/numeric/pred'
-require 'facet/numeric/succ'
-require 'facet/numeric/to_b'
+require 'facets/core/numeric.rb'

data/lib/facet/numeric/ceil_multiple.rb

@@ -1,40 +1 @@
-#--
-# Credit goes to George Moschovitis
-#++
-
-class Numeric
-
-  # Returns the multiple ceil of a number.
-  def ceil_multiple(multiple)
-    # gmosx: to_f is needed!
-    # gmosx: IS THERE a more optimized way to do this?
-    return ((self.to_f/multiple).ceil*multiple)
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCNumeric < Test::Unit::TestCase
-
-    def test_ceil_multiple
-      assert_equal( 12.3, 12.3.ceil_multiple(0.1) )
-      assert_equal( 12.4, 12.31.ceil_multiple(0.1) )
-      assert_equal( 13, 12.3.ceil_multiple(1) )
-      assert_equal( 13, 12.31.ceil_multiple(1) )
-      assert_equal( 20, 12.3.ceil_multiple(10) )
-      assert_equal( 20, 12.31.ceil_multiple(10) )
-    end
-
-  end
-
-=end
+require 'facets/core/numeric/ceil_multiple.rb'

data/lib/facet/numeric/pred.rb

@@ -1,2 +1 @@
-# stub
-require 'facet/numeric/succ'
+require 'facets/core/numeric/pred.rb'

data/lib/facet/numeric/succ.rb

@@ -1,69 +1 @@
-
-class Numeric
-
-  # Allows #succ to take _n_ increments.
-  #
-  #   3.succ(2)  #=> 5
-  #
-  def succ(n=nil)
-    n ||= 1
-    self + n
-  end
-
-  # Provides #pred as the opposite of #succ.
-  #
-  #   3.pred(2)  #=> 1
-  #
-  def pred(n=nil)
-    n ||= 1
-    self - n
-  end
-
-end
-
-
-class Integer
-
-  # This is needed to allow Integer to look back to
-  # its Numeric ancestor for the new definition of #succ.
-  #if instance_methods(false).include?( :succ )
-    remove_method( :succ )
-  #end
-
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCNumeric < Test::Unit::TestCase
-
-    def test_pred
-      assert_equal(  3,  4.pred )
-      assert_equal( -3, -2.pred )
-      assert_equal(  2,  4.pred(2) )
-      assert_equal( -4, -2.pred(2) )
-      assert_equal(  6,  4.pred(-2) )
-      assert_equal(  0, -2.pred(-2) )
-    end
-
-    def test_succ
-      assert_equal(  5,  4.succ )
-      assert_equal( -1, -2.succ )
-      assert_equal(  6,  4.succ(2) )
-      assert_equal(  0, -2.succ(2) )
-      assert_equal(  2,  4.succ(-2) )
-      assert_equal( -4, -2.succ(-2) )
-    end
-
-  end
-
-=end
+require 'facets/core/numeric/succ.rb'

data/lib/facet/numeric/to_b.rb

@@ -1,38 +1 @@
-
-class Numeric
-
-  # Provides a boolean interpretation of self.
-  # If self == 0 then false else true.
-  #
-  #   0.to_b    #=> false
-  #   1.to_b    #=> true
-  #   2.3.to_b  #=> true
-  #
-  def to_b
-    self == 0 ? false : true
-  end
-
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCNumeric < Test::Unit::TestCase
-
-    def test_to_b
-      assert_equal( false, 0.to_b )
-      assert_equal( true, 1.to_b )
-    end
-
-  end
-
-=end
+require 'facets/core/numeric/to_b.rb'

data/lib/facet/one.rb

@@ -0,0 +1 @@
+require 'facets/more/one.rb'

data/lib/facet/openobject.rb

@@ -0,0 +1 @@
+require 'facets/more/openobject.rb'

data/lib/facet/orderedhash.rb

@@ -0,0 +1 @@
+require 'facets/more/orderedhash.rb'

data/lib/facet/ormsupport.rb

@@ -0,0 +1 @@
+require 'facets/more/ormsupport.rb'

data/lib/facet/ostruct.rb

@@ -0,0 +1 @@
+require 'facets/core/ostruct.rb'

data/lib/facet/ostruct/__merge__.rb

@@ -1,52 +1 @@
-
-require 'ostruct'
-require 'facet/ostruct/__update__'
-
-class OpenStruct
-
-  # Merge hash data creating a new OpenStruct object.
-  #
-  #   o = OpenStruct.new
-  #   o.ostruct_merge { :a => 2 }
-  #   o.a  #=> 2
-  #
-  def __merge__( other )
-    o = dup
-    o.__update__( other )
-    o
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TC_OpenStruct < Test::Unit::TestCase
-
-    def test_merge_1
-      o = OpenStruct.new( { :a => 1 } )
-      h = { :b => 2 }
-      q = o.__merge__( h )
-      assert_equal( 1, q.a )
-      assert_equal( 2, q.b )
-    end
-
-    def test_merge_2
-      o1 = OpenStruct.new( { :a => 1 } )
-      o2 = OpenStruct.new( { :b => 2 } )
-      q = o1.__merge__( o2 )
-      assert_equal( 1, q.a )
-      assert_equal( 2, q.b )
-    end
-
-  end
-
-=end
+require 'facets/core/ostruct/__merge__.rb'

data/lib/facet/ostruct/__table__.rb

@@ -1,17 +1 @@
-
-class OpenStruct
-  # Provides public access to the inner table.
-  def __table__
-    @table
-  end
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# TODO
-
+require 'facets/core/ostruct/__table__.rb'

data/lib/facet/ostruct/__update__.rb

@@ -1,45 +1 @@
-
-require 'ostruct'
-require 'facet/hash/to_h'
-require 'facet/ostruct/to_h'
-
-class OpenStruct
-
-  # Insert/update hash data on the fly.
-  #
-  #   o = OpenStruct.new
-  #   o.ostruct_update { :a => 2 }
-  #   o.a  #=> 2
-  #
-  def __update__( other )
-    hash = other.to_h
-    for k,v in hash
-      @table[k.to_sym] = v
-    end
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCOpenStruct < Test::Unit::TestCase
-
-    def test_update
-      o = OpenStruct.new( { :a => 1 } )
-      h = { :b => 2 }
-      assert_nothing_raised { o.__update__( h ) }
-      assert_equal( 2, o.b )
-    end
-
-  end
-
-=end
+require 'facets/core/ostruct/__update__.rb'

data/lib/facet/ostruct/op_fetch.rb

@@ -1,40 +1 @@
-
-require 'ostruct'
-
-class OpenStruct
-
-  # Access a value in the OpenStruct by key, like a Hash.
-  # This increases OpenStruct's "duckiness".
-  #
-  #   o = OpenStruct.new
-  #   o.t = 4
-  #   o['t']  #=> 4 
-  #
-  def [](key)
-    key = key.to_sym unless key.is_a?(Symbol)
-    @table[key]
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCOpenStruct < Test::Unit::TestCase
-
-    def test_op_fetch
-      o = OpenStruct.new( { :a => 1 } )
-      assert_equal( 1, o[:a] )
-    end
-
-  end
-
-=end
+require 'facets/core/ostruct/op_fetch.rb'

data/lib/facet/ostruct/op_store.rb

@@ -1,42 +1 @@
-
-require 'ostruct'
-
-class OpenStruct
-
-  # Set a value in the OpenStruct by key, like a Hash.
-  #
-  #   o = OpenStruct.new
-  #   o['t'] = 4
-  #   o.t  #=> 4 
-  #
-  def []=(key,val)
-    raise TypeError, "can't modify frozen #{self.class}", caller(1) if self.frozen?
-    key = key.to_sym unless key.is_a?(Symbol)
-    @table[key]=val
-  end
-
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCOpenStruct < Test::Unit::TestCase
-
-    def test_op_store
-      o = OpenStruct.new( { :a => 1 } )
-      assert_nothing_raised { o[:b] = 2 }
-      assert_equal( 2, o.b )
-    end
-
-  end
-
-=end
+require 'facets/core/ostruct/op_store.rb'