facets 3.1.0 → 3.2.0

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

@@ -1,13 +0,0 @@
-class String
-
-  # Returns an array of characters.
-  #
-  #   "abc".characters.to_a  #=> ["a","b","c"]
-  #
-  # TODO: Probably should make this an enumerator. With #scan?
-  def characters
-    split(//)
-  end
-
-end
-

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

@@ -1,22 +0,0 @@
-class String
-
-  alias_method :_crypt, :crypt
-
-  # Common Unix cryptography method.
-  # This adds a default salt to the built-in crypt method.
-  #
-  # NOTE: This method is not a common core extension and is not
-  # loaded automatically when using <code>require 'facets'</code>.
-  #
-  # @uncommon
-  #   require 'facets/string/crypt'
-  #
-  def crypt(salt=nil)
-    salt ||= (
-      (rand(26) + (rand(2) == 0 ? 65 : 97) ).chr +
-      (rand(26) + (rand(2) == 0 ? 65 : 97) ).chr
-    )
-    _crypt(salt)
-  end
-
-end

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

@@ -1,23 +0,0 @@
-class Symbol
-
-  unless method_defined?(:succ)  # 1.9+ TODO: is this right?
-
-    # Successor method for symobol. This simply converts
-    # the symbol to a string uses String#succ and then
-    # converts it back to a symbol.
-    #
-    #   :a.succ  #=> :b
-    #
-    # TODO: Make this work more like a simple character dial?
-
-    def succ(n=1)
-      s = self.to_s
-      n.times do
-        s = s.succ
-      end
-      s.to_sym
-    end
-
-  end
-
-end

data/lib/core/facets.yml

@@ -1,80 +0,0 @@
----
-revision: 2013
-type: ruby
-sources:
-- Indexfile
-- Gemfile
-authors:
-- name: Thomas Sawyer
-  email: transfire@gmail.com
-organizations:
-- name: Rubyworks
-requirements:
-- groups:
-  - test
-  version: ">= 0"
-  name: lemon
-- groups:
-  - test
-  version: ">= 0"
-  name: qed
-- groups:
-  - test
-  version: ">= 0"
-  name: rubytest-cli
-- groups:
-  - test
-  version: ">= 0"
-  name: rake
-- groups:
-  - test
-  version: ">= 0"
-  name: simplecov
-- groups:
-  - guard
-  version: ">= 0"
-  name: guard
-conflicts: []
-alternatives: []
-resources:
-- type: home
-  uri: http://rubyworks.github.com/facets
-  label: Homepage
-- type: code
-  uri: http://github.com/rubyworks/facets
-  label: Source Code
-- type: docs
-  uri: http://rubyworks.github.com/facets/learn.html
-  label: Documentation
-- type: wiki
-  uri: http://wiki.github.com/rubyworks/facets
-  label: User Guide
-- type: talk
-  uri: http://groups.google.com/group/facets-universal
-repositories:
-- name: upstream
-  scm: git
-  uri: git@github.com:rubyworks/facets.git
-categories: []
-copyrights:
-- holder: Rubyworks
-  year: '2004'
-  license: BSD-2-Clause
-customs: []
-paths:
-  load:
-  - lib/core
-  - lib/standard
-name: facets
-title: Ruby Facets
-version: 3.1.0
-summary: The orginal well curated collection of extension methods for Ruby.
-slogan: ALL YOUR BASE ARE BELONG TO RUBY!
-description: Facets is the premier collection of extension methods for the Ruby programming
-  language. Facets extensions are unique by virtue of thier atomicity. They are stored
-  in individual files allowing for highly granular control of requirements. In addition,
-  Facets includes a few additional classes and mixins suitable to wide variety of
-  applications.
-scm_uri: https://github.com/rubyworks/facets/tree/master
-created: '2004-12-16'
-date: '2016-05-09'

data/lib/standard/facets/basicobject.rb

@@ -1,75 +0,0 @@
-# Facets' BasicObject is an implementation of Jim Weirich's BlankSlate.
-#
-# BlankSlate
-# Copyright 2004 by Jim Weirich (jim@weirichhouse.org).
-# All rights reserved.
-#
-# Since Ruby 1.9 has a BasicObject class this will of course be
-# deprecated as 1.9 goes mainstream.
-
-unless defined? BasicObject  # in case it already exists!
-
-  # BasicObject provides an abstract base class with no predefined
-  # methods (except for <tt>\_\_send__</tt> and <tt>\_\_id__</tt>).
-  # BlankSlate is useful as a base class when writing classes that
-  # depend upon <tt>method_missing</tt> (e.g. dynamic proxies).
-  class BasicObject
-    class << self
-      # Hide the method named +name+ in the BlankSlate class.  Don't
-      # hide +instance_eval+ or any method beginning with "__".
-      #
-      # According to 1.9.1 it should have only these methods:
-      #
-      # * #__send__
-      # * #instance_eval
-      # * #instance_exec
-      # * #equal?
-      # * #==
-      # * #!
-      # * #!=
-      # * respond_to?
-      #
-      # Seems to me it should have #__id__ too.
-      def hide(name)
-        undef_method name if
-          instance_methods.include?(name.to_s) and
-          name !~ /^(__|respond_to\?|instance_eval$|instance_exec$|equal\?$|\=\=$)/
-      end
-    end
-    instance_methods.each{ |m| hide(m) }
-  end
-
-  # Since Ruby is very dynamic, methods added to the ancestors of
-  # BlankSlate <em>after BlankSlate is defined</em> will show up in the
-  # list of available BlankSlate methods.  We handle this by defining a
-  # hook in the Object and Kernel classes that will hide any defined
-  module Kernel #:nodoc:
-    class << self
-      alias_method :facets_basic_object_method_added, :method_added
-
-      # Detect method additions to Kernel and remove them in the
-      # BlankSlate class.
-      def method_added(name)
-        facets_basic_object_method_added(name)
-        return if self != Kernel
-        BasicObject.hide(name)
-      end
-    end
-  end
-
-  class Object #:nodoc:
-    class << self
-      alias_method :facets_basic_object_method_added, :method_added
-
-      # Detect method additions to Object and remove them in the
-      # BlankSlate class.
-      def method_added(name)
-        facets_basic_object_method_added(name)
-        return if self != Object
-        BasicObject.hide(name)
-      end
-    end
-  end
-
-end
-

data/lib/standard/facets/digest/base64digest.rb

@@ -1,45 +0,0 @@
-require 'digest'
-
-module Digest
-
-  module Instance
-
-    # For Ruby < 1.9.2
-   
-    unless instance_methods.include? :base64digest
-
-      # From Ruby 1.9.2 source
-      def base64digest(str = nil)
-        [str ? digest(str) : digest].pack('m0')
-      end
-
-    end
-
-    unless instance_methods.include? :base64digest!
-
-      # From Ruby 1.9.2 source
-      def base64digest!
-        [digest!].pack('m0')
-      end
-
-    end
-
-  end
-
-  class Class
-
-    # For Ruby < 1.9.2   
-
-    unless methods.include? :base64digest
-
-      # From Ruby 1.9.2 source
-      def self.base64digest(str, *args)
-        [self.digest(str, *args)].pack('m0') 
-      end
-
-    end
-
-  end
-
-end
-

data/lib/standard/facets/ostruct/each.rb

@@ -1,11 +0,0 @@
-require 'ostruct'
-
-class OpenStruct
-
-  # Iterate over key-value pairs.
-  #
-  def each(&blk)
-    @table.each(&blk)
-  end
-
-end

data/lib/standard/facets/ostruct/merge.rb

@@ -1,21 +0,0 @@
-require 'ostruct'
-
-class OpenStruct
-
-  # Insert/update hash data on the fly.
-  #
-  #   o = OpenStruct.new
-  #   o.merge!(:a => 2)
-  #   o.a  #=> 2
-  #
-  def merge!(other)
-    raise TypeError, "can't modify frozen #{self.class}", caller(1) if self.frozen?
-    ##other = other.to_hash #to_h?
-    for k,v in other
-      @table[k.to_sym] = v
-    end
-    self
-  end
-
-end
-

data/lib/standard/facets/ostruct/op_fetch.rb

@@ -1,29 +0,0 @@
-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
-
-  # 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

data/lib/standard/facets/ostruct/op_store.rb

@@ -1 +0,0 @@
-require 'facets/ostruct/op_fetch'

data/lib/standard/facets/ostruct/to_h.rb

@@ -1,10 +0,0 @@
-require 'ostruct'
-
-class OpenStruct
-
-  #
-  def to_h
-    @table.dup
-  end
-
-end

data/test/core/array/test_arrange.rb

@@ -1,37 +0,0 @@
-require 'facets/array/arrange'
-
-test_case Array do
-
-	method :rangify do
-		test 'Array of consecutive integers should return an array made up of a single range.' do
-			[1,2,3,4,5].rangify.assert == [1..5]
-		end
-		
-		test 'Array of non-consecutive integers should return the original array.' do
-			[1,3,5,7].rangify.assert == [1,3,5,7]
-		end
-
-		test 'Array of ranges should return the correct ranges.' do
-			arr = [40..45, 1..3, 4..10, 20..30, 24..28, 42..50, 1..6, 1..3, 1..1]
-			arr.rangify.assert == [1..10, 20..30, 40..50]
-		end
-		
-		test 'Array of ranges and integers should return the correct ranges.' do
-			arr = [99, 100, 1..3, 101, 4..5, 103, 10..19, 99, 20..20, 31, 32..33, 98, 97]
-			arr.rangify.assert == [1..5, 10..20, 31..33, 97..101, 103]
-		end	
-
-		test 'Array of non-consecutive integers should return the correct ranges.' do
-			[1,2,3,6,7,8,10,15].rangify.assert == [1..3, 6..8, 10, 15] 
-		end
-	
-		test 'Element order should not affect the result.' do
-			[8, 1, 15, 2, 6, 3, 7, 10].rangify.assert == [1..3, 6..8, 10, 15] 
-		end
-		
-		test 'Duplicate elements should not affect the result.' do
-			[8, 1, 15, 2, 6, 3, 7, 10, 8, 15, 2, 3, 1, 2].rangify.assert == [1..3, 6..8, 10, 15] 
-		end
-	end
-
-end

data/test/core/array/test_average.rb

@@ -1,16 +0,0 @@
-require 'facets/array/average'
-
-test_case Array do
-  method :average do
-    test 'Empty array returns nil' do
-      [].average.assert == nil
-    end
-
-    test 'Calculate average of array of numerical values' do
-      [1, 2, 3].average.assert == 2
-      [96, 35, 72, 30, 75, 33, 68, 13, 49, 71].average.assert == 54.2
-      [36, -67, -17, 85, -46, -64, -23, -13, 89, -47].average.assert == -6.7
-      [60.7829, 31.2622, 20.626, 78.8907, 61.5328].average.assert == 50.61892
-    end
-  end
-end

data/test/core/array/test_before.rb

@@ -1,48 +0,0 @@
-covers 'facets/array/before'
-
-test_case Array do
-
-  method :before do
-
-    setup do
-      @sequence = ['a', 'b', 'c']
-    end
-
-    test "returns the previous element" do
-      @sequence.before('b').assert == 'a'
-      @sequence.before('c').assert == 'b'
-    end
-
-    test "loops around from back to front" do
-      @sequence.before('a').assert == 'c'
-    end
-
-    test "non-member elements return nil" do
-      @sequence.before('d').assert == nil
-    end
-
-  end
-
-  method :after do
-
-    setup do
-      @sequence = ['a', 'b', 'c']
-    end
-
-    test "returns the following element" do
-      @sequence.after('a').assert == 'b'
-      @sequence.after('b').assert == 'c'
-    end
-
-    test "loops around from back to front" do
-      @sequence.after('c').assert == 'a'
-    end
-
-    test "non-member elements return nil" do
-      @sequence.after('d').assert == nil
-    end
-
-  end
-
-end
-

data/test/core/array/test_collapse.rb

@@ -1,23 +0,0 @@
-covers 'facets/array/collapse'
-
-test_case Array do
-
-  method :collapse do
-
-    test do
-      [1, nil, [1, 2], nil, [[3]]].collapse.assert == [1, 1, 2, 3]
-    end
-
-  end
-
-  method :collapse! do
-
-    test do
-      a = [1, nil, [1, 2], nil, [[3]]]
-      a.collapse!
-      a.assert == [1, 1, 2, 3]
-
-    end
-  end
-end
-

data/test/core/array/test_commonality.rb

@@ -1,35 +0,0 @@
-covers 'facets/array/commonality'
-
-test_case Array do
-
-  method :commonality do
-
-    test do
-      a = [1,2,2,3,3,3]
-      e = { 2 => [2,2], 3 => [3,3,3] }
-      r = a.commonality
-      r.assert == e
-    end
-
-    test "with block" do
-      a = [1,2,2,3,3,3]
-      e = {false=>[1, 2, 2], true=>[3, 3, 3]}
-      r = a.commonality{ |x| x > 2 }
-      r.assert == e
-    end
-
-  end
-
-  method :collisions do
-
-    test "alias for commonality" do
-      a = [1,2,2,3,3,3]
-      e = { 2 => [2,2], 3 => [3,3,3] }
-      r = a.collisions
-      r.assert == e
-    end
-
-  end
-
-end
-

data/test/core/array/test_conjoin.rb

@@ -1,50 +0,0 @@
-covers 'facets/array/conjoin'
-
-test_case Array do
-
-  method :conjoin do
-
-    setup "any array" do
-      @a = [1,2,3,4]
-    end
-
-    test "like join but spaced" do
-      @a.conjoin.assert == "1 2 3 4"
-    end
-
-    test "comma+space and 'and' on tail" do
-      @a.conjoin(', ', ' and ').assert = "1, 2, 3 and 4"
-    end
-
-    test "comma+space and 'or' on tail using :last option" do
-      @a.conjoin(', ', :last => ' or ').assert == "1, 2, 3 or 4"
-    end
-
-    test "semicolon+space and ampersand on tail using index" do
-      @a.conjoin('; ', -1 => ' & ').assert == "1; 2; 3 & 4"
-    end
-
-    test "with block to determine separator" do
-      r = @a.conjoin{ |i, a, b| i % 2 == 0 ? '.' : '-' }
-      r.assert == "1.2-3.4"
-    end
-
-    test "very esoteric transformation" do
-      r = @a.conjoin{ |i, x, y| "<#{i} #{x} #{y}>" }
-      r.assert == "1<0 1 2>2<1 2 3>3<2 3 4>4"
-    end
-
-    test "with :space option" do
-      r = @a.conjoin(',', '&', :space=>2)
-      r.assert == "1  ,  2  ,  3  &  4"
-    end
-
-    test ":spacer option can set an alternate spacing string" do
-      r = @a.conjoin('|', '>', :space=>2, :spacer=>'-')
-      r.assert == "1--|--2--|--3-->--4"
-    end
-
-  end
-
-end
-

data/test/core/array/test_contains.rb

@@ -1,14 +0,0 @@
-covers 'facets/array/contains'
-
-test_case Array do
-
-  method :contains? do
-
-    test do
-      [1,2,3,4].assert.contains?(2)
-      [1,2,3,4].refute.contains?(9)
-    end
-
-  end
-
-end

data/test/core/array/test_delete.rb

@@ -1,42 +0,0 @@
-covers 'facets/array/delete'
-
-test_case Array do
-
-  method :delete_unless do
-
-    test do
-      a = [1,2,3]
-      a.delete_unless{ |e| e == 2 }
-      a.assert == [2]
-    end
-
-  end
-
-  method :delete_values do
-
-    test do
-      a = [1,2,3,4]
-      a.delete_values(1,2).assert == [1,2]
-      a.assert == [3,4]
-    end
-
-  end
-
-  method :delete_values_at do
-
-    test do
-      a = [1,2,3,4]
-      a.delete_values_at(1,2).assert == [2,3]
-      a.assert == [1,4]
-    end
-
-    test do
-      a = [1,2,3,4]
-      a.delete_values_at(0..2).assert == [1,2,3]
-      a.assert == [4]
-    end
-
-  end
-
-end
-

data/test/core/array/test_delete_unless.rb

@@ -1,17 +0,0 @@
-covers 'facets/array/delete_unless'
-
-test_case Array do
-
-  method :delete_unless do
-
-    test 'with an explicit block' do
-      [1,2,3].delete_unless{ |x| x < 2 }.assert == [1]
-    end
-
-    test 'with an implicit block' do
-      [1,2,3].delete_unless(&:even?).assert == [2]
-    end
-
-  end
-
-end

data/test/core/array/test_delete_values.rb

@@ -1,31 +0,0 @@
-covers 'facets/array/delete_values'
-
-test_case Array do
-
-  method :delete_values do
-
-    test do
-      a = [1,2,3,4]
-      a.delete_values(1,2).assert == [1,2]
-      a.assert                    == [3,4]
-    end
-
-  end
-
-  method :delete_values_at do
-
-    test do
-      a = [1,2,3,4]
-      a.delete_values_at(1,2).assert == [2,3]
-      a.assert                       == [1,4]
-    end
-
-    test do
-      a = [1,2,3,4]
-      a.delete_values_at(0..2).assert == [1,2,3]
-      a.assert                        == [4]
-    end
-
-  end
-
-end

data/test/core/array/test_divide.rb

@@ -1,24 +0,0 @@
-covers 'facets/array/divide'
-
-test_case Array do
-
-  method :divide do
-
-    test do
-      r = ['a1','b1','a2','b2'].divide(/^a/)
-      r.assert == [['a1','b1'],['a2','b2']]
-    end
-
-    test do
-      r = ['a1','b1','a2','b2'].divide(/^b/)
-      r.assert == [['a1'],['b1', 'a2'],['b2']]
-    end
-
-    test do
-      r = ['a1','b1','a2','b2'].divide(/c/)
-      r.assert = [['a1','b1','a2','b2']]
-    end
-
-  end
-
-end