facets 0.9.0 → 1.0.0

data/lib/mega/version.rb

@@ -1,245 +0,0 @@
-#--
-# Version
-#
-# GPL Copyright (c) 2004-2005 Thomas Sawyer <transfire at gmail.com>
-# GPL Copyright (c) 2000-2001 Minero Aoki <aamine at loveruby.net>
-#
-# This program is free software.
-# You can distribute/modify this program under the terms of
-# the GNU Lesser General Public License version 2 or later.
-#
-# ==========================================================================
-#  Revision History
-# ==========================================================================
-#  2004.09.17  trans    Adapted to Mega.
-# ==========================================================================
-#++
-
-#:title: Version
-#
-# A class for manipulating and storing conventional version numbers
-# in the form of "1.0.0", i.e. major, minor, teeny.
-#
-# == Usage
-#
-#   VERSION = Version["1.2.3"]  # same as Version.new()
-#
-#   VERSION.major               #=> 1
-#   VERSION.minor               #=> 2
-#   VERSION.teeny               #=> 3
-#
-#   VERSION.teeny += 1          #=> 4
-#
-#   VERSION > Version(1,2,3)    #=> true
-#   VERSION > Version("1.2.4")  #=> false
-#
-# == Author(s)
-#
-# * Minero Aoki (originator)
-# * Thomas Sawyer
-#
-
-class Version
-  include Comparable
-
-  VERSION_EXP = /\d+(?:[.-]\d+)*/
-
-  def self.[](*args)
-    Version.new(*args)
-  end
-
-  def initialize( arg, *nums )
-    set( arg, *nums )
-  end
-
-  def set( arg, *nums )
-    if String === arg then
-      unless m = VERSION_EXP.match( arg ) then
-        raise ArgumentError, "wrong version string format '#{arg}'"
-      end
-      @num = m[0].split('.').collect {|i| i.to_i }
-    else
-      @num = [ arg, *(nums || []) ]
-      #@num.unshift arg
-    end
-  end
-
-  def dup
-    self.class.new( *@nums )
-  end
-
-  def ==( other )
-    @num == other.to_a
-  end
-  alias_method( :eql?, :== )
-
-  def hash ; @num.hash ; end
-
-  def to_s ; @num.join '.' ; end
-  def to_a ; @num.dup ; end
-
-  def inspect
-    "\#<#{self.class} #{to_s}>"
-  end
-
-  def major       ; @num[0]     ; end
-  def major=( i ) ; @num[0] = i ; end
-
-  def minor       ; @num[1]     ; end
-  def minor=( i ) ; @num[1] = i ; end
-
-  def teeny       ; @num[2]     ; end
-  def teeny=( i ) ; @num[2] = i ; end
-
-  def weeny       ; @num[3]     ; end
-  def weeny=( i ) ; @num[3] = i ; end
-
-  def next_major!    
-    (1..last_index).each{ |i| @num[i] = 0 } if last_index > 0
-    @num[0] += 1
-  end
-
-  def next_minor!
-    (2..last_index).each{ |i| @num[i] = 0 } if last_index > 1
-    if @num[1]
-      @num[1] += 1
-    end
-  end
-
-  def next_teeny!
-    (3..last_index).each{ |i| @num[i] = 0 } if last_index > 2
-    if @num[2]
-      @num[2] += 1
-    end
-  end
-
-  def next_weeny!
-    #(4..last_index).each{ |i| @num[i] = 0 } if last_index > 3
-    if @num[3]
-      @num[3] += 1
-    end
-  end
-
-  def type
-    case last_index
-    when 0 then :major
-    when 1 then :minor
-    when 2 then :teeny
-    when 3 then :weeny
-    end
-  end
-
-  def <=>( other )
-    return false unless self.class === other
-    n = @num
-    ret = nil; other.instance_eval { ret = (n <=> @num) }
-    ret
-  end
-
-  private
-
-  def last_index
-    @num.length - 1
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-
-=begin testing
-
-require 'test/unit'
-
-class TC_Version < Test::Unit::TestCase
-
-  def setup
-    @version0 = Version["1.2"]
-    @version1 = Version["1.2.3"]
-    @version2 = Version[1,2,4]
-    @version3 = Version["10.3.5"]
-  end
-
-  def test_major
-    assert_equal( 1, @version1.major )
-    assert_equal( 1, @version2.major )
-    assert_equal( 10, @version3.major )
-  end
-
-  def test_minor
-    assert_equal( 2, @version1.minor ) 
-    assert_equal( 2, @version2.minor ) 
-    assert_equal( 3, @version3.minor ) 
-  end
-
-  def test_teeny
-    assert_equal( 3, @version1.teeny )
-    assert_equal( 4, @version2.teeny ) 
-    assert_equal( 5, @version3.teeny ) 
-  end
-
-  def test_major_eq
-    @version1.major = 2
-    assert_equal( 2, @version1.major )
-    @version2.major = 3
-    assert_equal( 3, @version2.major )
-    @version3.major = 9
-    assert_equal( 9, @version3.major )
-  end
-
-  def test_minor_eq
-    @version1.minor = 5
-    assert_equal( 5, @version1.minor ) 
-    @version2.minor = 5
-    assert_equal( 5, @version2.minor ) 
-    @version3.minor = 5
-    assert_equal( 5, @version3.minor ) 
-  end
-
-  def test_teeny_eq
-    @version1.teeny = 6
-    assert_equal( 6, @version1.teeny ) 
-    @version2.teeny = 6
-    assert_equal( 6, @version2.teeny )
-    @version3.teeny = 6
-    assert_equal( 6, @version3.teeny ) 
-  end
-
-  def test_compare
-    assert( @version1 < @version2 )
-    assert( @version2 < @version3 )
-    assert( @version3 > @version1 )
-    assert( @version3 > @version2 )
-  end
-
-  def test_equal
-    assert_equal( Version["1.2.3"], @version1 )
-  end
-
-  def test_next!
-    @version1.next_teeny!
-    assert_equal( Version[1,2,4], @version1 )
-    @version1.next_minor!
-    assert_equal( Version[1,3,0], @version1 )
-    @version1.next_major!
-    assert_equal( Version[2,0,0], @version1 )
-  end
-
-  def test_to_a
-    assert_equal( [1,2,3], @version1.to_a )
-    assert_equal( [1,2,4], @version2.to_a )
-  end
-
-  def test_to_s
-    assert_equal( "1.2.3", @version1.to_s )
-    assert_equal( "1.2.4", @version2.to_s )
-  end
-
-end
-
-=end

data/lib/mega/yamlstruct.rb

@@ -1,16 +0,0 @@
-
-require 'yaml'
-
-class YAMLStruct
-
-  def initialize( stream )
-    @yaml = YAML::load( stream )
-  end
-
-  def method_missing( sym, *args, &blk )
-    if @yaml.key?( sym )
-      @yaml[ sym ]
-    end
-  end
-
-end

data/lib/nano/all.rb

@@ -1,18 +0,0 @@
-require 'rbconfig'
-
-require 'nano/file/self/read_list'
-
-confdir = Config::CONFIG['sysconfdir']
-sitedir = Config::CONFIG['sitelibdir']
-
-noauto = File.join( confdir, 'facets', 'noauto.yml' )
-noauto = File.read_list( noauto )
-noauto = noauto.collect{ |r| r.chomp('.rb') + '.rb' }
-
-all = []
-Dir.chdir( File.join( Config::CONFIG['sitelibdir'], 'facet' ) ) do
-  all = Dir.glob( '*/*.rb' ) + Dir.glob( '*/*/*.rb' )
-end
-
-all = all - noauto
-all.each { |f| require File.join( 'facet', f ) }

data/lib/nano/array.rb

@@ -1,33 +0,0 @@
-require 'nano/array/at_rand'
-require 'nano/array/body'
-require 'nano/array/delete_unless'
-require 'nano/array/delete_values'
-require 'nano/array/delete_values_at'
-require 'nano/array/each_with_key'
-require 'nano/array/first'
-require 'nano/array/foot'
-require 'nano/array/head'
-require 'nano/array/last'
-require 'nano/array/last_index'
-require 'nano/array/merge'
-require 'nano/array/mid'
-require 'nano/array/middle'
-require 'nano/array/op_fetch'
-require 'nano/array/op_store'
-require 'nano/array/pick'
-require 'nano/array/pos'
-require 'nano/array/pull'
-require 'nano/array/rand_index'
-require 'nano/array/rand_subset'
-require 'nano/array/range'
-require 'nano/array/rotate'
-require 'nano/array/select'
-require 'nano/array/shuffle'
-require 'nano/array/slap'
-require 'nano/array/store'
-require 'nano/array/tail'
-require 'nano/array/thru'
-require 'nano/array/to_b'
-require 'nano/array/to_h'
-require 'nano/array/to_hash'
-require 'nano/array/unzip'

data/lib/nano/array/at_rand.rb

@@ -1,52 +0,0 @@
-class Array
-
-  # Return a random element of the array.
-  #
-  #   [1, 2, 3, 4].at_rand           #=> 2
-  #   [1, 2, 3, 4].at_rand           #=> 4
-  #
-  def at_rand
-    self.at( rand( size ) )
-  end
-
-  # Same as #at_rand, but acts in place removing a
-  # random element from the array.
-  #
-  #   a = [1,2,3,4]
-  #   a.at_rand!       #=> 2
-  #   a                #=> [1,3,4]
-  #
-  def at_rand!
-    return delete_at( Kernel.rand( size ) )
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCArray < Test::Unit::TestCase
-
-    def test_at_rand
-      a = [1,2,3,4,5]
-      20.times{ assert_nothing_raised{ a.at_rand } }
-      20.times{ assert( a.include?( a.at_rand ) ) }
-    end
-
-    def test_at_rand!
-      a = ['a','b','c']
-      assert_equal( 1, a.at_rand!.length )
-      assert_equal( 2, a.length )
-    end
-
-  end
-
-=end

data/lib/nano/array/body.rb

@@ -1,35 +0,0 @@
-
-class Array
-
-  # Returns an array of the first element upto,
-  # but not including, the last element.
-  #
-  #   [1,2,3].bulk  #=> [1,2]
-  #
-  def body
-    slice(0,length-1)
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCArray < Test::Unit::TestCase
-
-    def test_body
-      a = [1,2,3,4,5]
-      assert_equal( [1,2,3,4], a.body )
-    end
-
-  end
-
-=end

data/lib/nano/array/delete_unless.rb

@@ -1,35 +0,0 @@
-#--
-# Daniel Schierbeck
-#++
-
-class Array
-
-  def delete_unless (&block)
-    delete_if { |element| not block.call(element) }
-  end
-
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TC_DELETE_UNLESS < Test::Unit::TestCase
-
-    def test_delete_unless
-      a = [1,2,3]
-      a.delete_unless{ |e| e == 2 }
-      assert_equal( [2], a )
-    end
-
-  end
-
-=end

data/lib/nano/array/delete_values.rb

@@ -1,38 +0,0 @@
-class Array
-
-  # Delete multiple values from array.
-  #
-  #   a = [1,2,3,4]
-  #   a.delete_values(1,2)   #=> [1,2]
-  #   a                      #=> [3,4]
-  #
-  def delete_values(*values)
-    d = []
-    values.each{ |v| d << delete(v) }
-    d
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCArray < Test::Unit::TestCase
-
-    def test_delete_values
-      a = [1,2,3,4]
-      assert_equal( [1,2], a.delete_values(1,2) )
-      assert_equal( [3,4], a )
-    end
-
-  end
-
-=end