facets 2.1.3 → 2.2.0

data/lib/more/facets/lazy.rb

@@ -71,7 +71,7 @@ module Lazy
   class Promise
 
     alias __class__ class #:nodoc:
-    instance_methods.each { |m| undef_method m unless m =~ /^__/ }
+    instance_methods.each { |m| undef_method m unless m =~ /^(__|object_|instance_)/ }
 
     def initialize( &computation ) #:nodoc:
       @computation = computation
@@ -213,7 +213,7 @@ module Kernel
   # that promise during the computation, lest the computation diverge.
   #
   def promise( &computation ) #:yields: result
-    Lazy::Promise.new &computation
+    Lazy::Promise.new(&computation)
   end
 
   # Forces the result of a promise to be computed (if necessary) and returns
@@ -239,7 +239,7 @@ module Kernel
   # Use wisely.
   #
   def future( &computation ) #:yields: result
-    Lazy::Future.new &computation
+    Lazy::Future.new(&computation)
   end
 
 end

data/lib/more/facets/namespace.rb

@@ -12,11 +12,6 @@
 #   - Thomas Sawyer
 #   - Pit Captain
 #
-# TODO:
-#
-#   - May need to cahnge name, to avoid conflict with Rake's method by the same name.
-#   - Maybe can become part of core once name is changed.
-#
 # COPYRIGHT:
 #
 #   Copyright (c) 2006 Thomas Sawyer, Pit Captain
@@ -31,15 +26,34 @@
 #   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.
-
+#
+# TODO:
+#
+#   - May need to cahnge name, to avoid conflict with Rake's method by the same name.
+#   - Maybe can become part of core once name is changed.
 
 require 'facets/functor'
 require 'facets/module/name' # for Module#basename
 
-
-#
 class Module
 
+  # Include a module via a specified namespace.
+  #
+  #   module T
+  #     def t ; "HERE" ; end
+  #   end
+  #
+  #   class X
+  #     include_as :test => T
+  #     def t ; test.t ; end
+  #   end
+  #
+  #   X.new.t  #=> "HERE"
+  #
+  def include_as(h)
+    h.each{ |name, mod| method_space(name, mod) }
+  end
+
   # Define a simple method namespace.
   #
   #   class A
@@ -54,7 +68,7 @@ class Module
   #   a.inside.x #=> 10
   #   a.x  # no method error
 
-  def method_space( name, mod=nil, &blk )
+  def method_space(name, mod=nil, &blk)
 
     # If block is given then create a module, otherwise
     # get the name of the module.
@@ -97,65 +111,3 @@ class Module
   end
 
 end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TestNamespace1 < Test::Unit::TestCase
-
-    module M
-      def x; "x"; end
-    end
-
-    class C
-      namespace M
-    end
-
-    def test_01
-      c = C.new
-      assert_equal('x', c.m.x)
-    end
-
-    def test_02
-      c = C.new
-      assert_raises(NoMethodError){ c.x }
-    end
-
-  end
-
-  class TestNamespace2 < Test::Unit::TestCase
-
-    class B
-      def x; 1; end
-    end
-
-    class C < B
-      def x; super; end
-      namespace :m do
-        def x; "x"; end
-      end
-    end
-
-    def test_01
-      c = C.new
-      assert_equal('x', c.m.x)
-    end
-
-    def test_02
-      c = C.new
-      assert_equal(1, c.x)
-    end
-
-  end
-
-=end
-

data/lib/more/facets/rbsystem.rb

@@ -1,20 +1,18 @@
-# TITLE:
+# = TITLE:
 #
 #   System
 #
-# SUMMARY:
+# = SYNOPSIS:
 #
 #   The System module provides Platform and Ruby system information.
 #   The module should also be able to stand in for rbconfig.
 #   It is intended for use as a service module although it
 #   can be mixed-in too.
 #
-# COPYRIGHT:
+# = COPYING:
 #
 #   Copyright (c) 2005 Thomas Sawyer, Minero Aoki
 #
-# LICENSE:
-#
 #   Ruby License
 #
 #   This module is free software. You may use, modify, and/or redistribute this
@@ -24,12 +22,12 @@
 #   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
 #   FOR A PARTICULAR PURPOSE.
 #
-# HISTORY:
+# = HISTORY:
 #
 #   Adapted from RubyParams module by Minero Aoki
 #   Copyright (c) 1999-2002 Minero Aoki <aamine@loveruby.net>
 #
-# AUTHORS:
+# = AUTHORS:
 #
 #   - Thomas Sawyer
 #   - Minero Aoki
@@ -52,7 +50,7 @@ require 'rbconfig'
 
 module System
 
-  extend self
+  extend self  # or module_function ?
 
   # Execution Environment -------------------------------------
 
@@ -190,4 +188,40 @@ module System
   def loaded_features; $" ; end
   alias_method :required, :loaded_features
 
+  # platform -----------------------------------------------------
+
+  def current_platform
+    arch = Config::CONFIG['arch']
+    #cpu, os = arch.split '-', 2
+    return match_platform(arch)
+  end
+
+  #
+
+  def match_platform(arch)
+    cpu, os = arch.split '-', 2
+    cpu, os = nil, cpu if os.nil? # java
+
+    cpu = case cpu
+          when /i\d86/ then 'x86'
+          else cpu
+          end
+
+    os  = case os
+          when /cygwin/ then            [ 'cygwin',  nil ]
+          when /darwin(\d+)?/ then      [ 'darwin',  $1  ]
+          when /freebsd(\d+)/ then      [ 'freebsd', $1  ]
+          when /^java$/ then            [ 'java',    nil ]
+          when /^java([\d.]*)/ then     [ 'java',    $1  ]
+          when /linux/ then             [ 'linux',   $1  ]
+          when /mingw32/ then           [ 'mingw32', nil ]
+          when /mswin32/ then           [ 'mswin32', nil ]
+          when /openbsd(\d+\.\d+)/ then [ 'openbsd', $1  ]
+          when /solaris(\d+\.\d+)/ then [ 'solaris', $1  ]
+          else                          [ 'unknown', nil ]
+          end
+
+    [cpu, os].flatten.compact.join("-")
+  end
+
 end

data/lib/more/facets/stylize.rb

@@ -193,9 +193,12 @@ class Integer
         "#{self}th"
       else
         case (self % 10)
-        when 1: "#{self}st"
-        when 2: "#{self}nd"
-        when 3: "#{self}rd"
+        when 1
+          "#{self}st"
+        when 2
+          "#{self}nd"
+        when 3
+          "#{self}rd"
         else
           "#{self}th"
         end

data/lib/more/facets/thread.rb

@@ -0,0 +1,55 @@
+# TITLE:
+#    Thread Extensions
+#
+# SUMMARY:
+#   Thread extensions, in particular for Enumerable --send
+#   a message to each member via a thread and collect the results.
+#
+# AUTHORS:
+#   - Sean O'Halpin
+#
+# TODOs:
+#   - Better names for these methods ?
+#
+# COPYRIGHT:
+#   Copyright (c) 2006 Sean O'Halpin
+#
+# LICENSE:
+#   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.
+
+require 'thread'
+require 'facets/enumerable/collect'  # for map_send
+
+#
+module Enumerable
+
+  # Like Enumerable#map but each iteration is processed via
+  # a separate thread.
+  #
+  # CREDIT Sean O'Halpin
+
+  def threaded_map #:yield:
+    map{|e| Thread.new(e){|t| yield t}}.map_send(:value)
+  end
+
+  # Like Enumerable#map_send but each iteration is processed via
+  # a separate thread.
+  #
+  # CREDIT Sean O'Halpin
+
+  def threaded_map_send(meth, *args) #:yield:
+    if block_given?
+      map{|e| Thread.new(e){|t| yield t.send(meth, *args)}}.map_send(:value)
+    else
+      map{|e| Thread.new(e){|t| t.send(meth, *args)}}.map_send(:value)
+    end
+  end
+
+end

data/meta/MANIFEST

@@ -32,11 +32,13 @@ lib/core/facets/array/rotate.rb
 lib/core/facets/array/select.rb
 lib/core/facets/array/splice.rb
 lib/core/facets/array/stackable.rb
-lib/core/facets/array/unzip.rb
 lib/core/facets/array.rb
 lib/core/facets/binding
 lib/core/facets/binding/cflow.rb
+lib/core/facets/binding/defined.rb
 lib/core/facets/binding/eval.rb
+lib/core/facets/binding/here.rb
+lib/core/facets/binding/self.rb
 lib/core/facets/binding/vars.rb
 lib/core/facets/binding.rb
 lib/core/facets/boolean.rb
@@ -48,9 +50,6 @@ lib/core/facets/comparable
 lib/core/facets/comparable/bound.rb
 lib/core/facets/comparable/cmp.rb
 lib/core/facets/comparable.rb
-lib/core/facets/continuation
-lib/core/facets/continuation/create.rb
-lib/core/facets/continuation.rb
 lib/core/facets/conversion.rb
 lib/core/facets/dir
 lib/core/facets/dir/multiglob.rb
@@ -58,12 +57,14 @@ lib/core/facets/dir/traverse.rb
 lib/core/facets/dir.rb
 lib/core/facets/enumerable
 lib/core/facets/enumerable/cartesian.rb
-lib/core/facets/enumerable/collate.rb
 lib/core/facets/enumerable/collect.rb
 lib/core/facets/enumerable/combination.rb
 lib/core/facets/enumerable/count.rb
+lib/core/facets/enumerable/each.rb
+lib/core/facets/enumerable/mash.rb
 lib/core/facets/enumerable/permutation.rb
 lib/core/facets/enumerable/probability.rb
+lib/core/facets/enumerable/split.rb
 lib/core/facets/enumerable.rb
 lib/core/facets/exception
 lib/core/facets/exception/detail.rb
@@ -94,6 +95,7 @@ lib/core/facets/hash/new.rb
 lib/core/facets/hash/op.rb
 lib/core/facets/hash/rekey.rb
 lib/core/facets/hash/select.rb
+lib/core/facets/hash/slice.rb
 lib/core/facets/hash/traverse.rb
 lib/core/facets/hash/update.rb
 lib/core/facets/hash/weave.rb
@@ -119,8 +121,8 @@ lib/core/facets/kernel/op_esc.rb
 lib/core/facets/kernel/populate.rb
 lib/core/facets/kernel/report.rb
 lib/core/facets/kernel/require.rb
-lib/core/facets/kernel/require_esc.rb
 lib/core/facets/kernel/respond.rb
+lib/core/facets/kernel/returning.rb
 lib/core/facets/kernel/silence.rb
 lib/core/facets/kernel/super.rb
 lib/core/facets/kernel/tap.rb
@@ -174,6 +176,7 @@ lib/core/facets/string/indexable.rb
 lib/core/facets/string/interpolate.rb
 lib/core/facets/string/natcmp.rb
 lib/core/facets/string/nchar.rb
+lib/core/facets/string/op.rb
 lib/core/facets/string/partitions.rb
 lib/core/facets/string/range.rb
 lib/core/facets/string/regesc.rb
@@ -193,6 +196,7 @@ lib/core/facets/symbol.rb
 lib/core/facets/time
 lib/core/facets/time/change.rb
 lib/core/facets/time/elapse.rb
+lib/core/facets/time/stamp.rb
 lib/core/facets/time.rb
 lib/core/facets/unboundmethod
 lib/core/facets/unboundmethod/arguments.rb
@@ -262,6 +266,7 @@ lib/methods/facets/enumerable
 lib/methods/facets/enumerable/cart.rb
 lib/methods/facets/enumerable/cartesian_product.rb
 lib/methods/facets/enumerable/cluster_by.rb
+lib/methods/facets/enumerable/collate.rb
 lib/methods/facets/enumerable/collect_if.rb
 lib/methods/facets/enumerable/collect_with_index.rb
 lib/methods/facets/enumerable/combinations.rb
@@ -285,10 +290,13 @@ lib/methods/facets/enumerable/frequency.rb
 lib/methods/facets/enumerable/graph.rb
 lib/methods/facets/enumerable/group_by.rb
 lib/methods/facets/enumerable/ideal_entropy.rb
+lib/methods/facets/enumerable/inject.rb
 lib/methods/facets/enumerable/injecting.rb
 lib/methods/facets/enumerable/map_if.rb
+lib/methods/facets/enumerable/map_send.rb
 lib/methods/facets/enumerable/map_with_index.rb
 lib/methods/facets/enumerable/mode.rb
+lib/methods/facets/enumerable/modulate.rb
 lib/methods/facets/enumerable/none.rb
 lib/methods/facets/enumerable/nonuniq.rb
 lib/methods/facets/enumerable/occur.rb
@@ -333,11 +341,13 @@ lib/methods/facets/hash/delete_values_at.rb
 lib/methods/facets/hash/diff.rb
 lib/methods/facets/hash/each_with_index.rb
 lib/methods/facets/hash/each_with_key.rb
+lib/methods/facets/hash/except.rb
 lib/methods/facets/hash/graph.rb
 lib/methods/facets/hash/has_only_keys.rb
 lib/methods/facets/hash/join.rb
 lib/methods/facets/hash/keys_to_s.rb
 lib/methods/facets/hash/keys_to_sym.rb
+lib/methods/facets/hash/mash.rb
 lib/methods/facets/hash/normalize_keys.rb
 lib/methods/facets/hash/op_and.rb
 lib/methods/facets/hash/op_div.rb
@@ -384,6 +394,7 @@ lib/methods/facets/integer/times_map.rb
 lib/methods/facets/io
 lib/methods/facets/io/writelines.rb
 lib/methods/facets/kernel
+lib/methods/facets/kernel/Bit.rb
 lib/methods/facets/kernel/__DIR__.rb
 lib/methods/facets/kernel/__assign__.rb
 lib/methods/facets/kernel/__callee__.rb
@@ -429,6 +440,7 @@ lib/methods/facets/kernel/meta_def.rb
 lib/methods/facets/kernel/meta_eval.rb
 lib/methods/facets/kernel/metaclass.rb
 lib/methods/facets/kernel/method.rb
+lib/methods/facets/kernel/non_nil.rb
 lib/methods/facets/kernel/not_nil.rb
 lib/methods/facets/kernel/object_class.rb
 lib/methods/facets/kernel/object_clone.rb
@@ -442,6 +454,7 @@ lib/methods/facets/kernel/qua_class.rb
 lib/methods/facets/kernel/require_all.rb
 lib/methods/facets/kernel/require_local.rb
 lib/methods/facets/kernel/resc.rb
+lib/methods/facets/kernel/respond_with_value.rb
 lib/methods/facets/kernel/returning.rb
 lib/methods/facets/kernel/send_as.rb
 lib/methods/facets/kernel/set_from.rb
@@ -489,6 +502,7 @@ lib/methods/facets/module/basename.rb
 lib/methods/facets/module/by_name.rb
 lib/methods/facets/module/can.rb
 lib/methods/facets/module/class.rb
+lib/methods/facets/module/class_def.rb
 lib/methods/facets/module/clone_removing.rb
 lib/methods/facets/module/clone_renaming.rb
 lib/methods/facets/module/clone_using.rb
@@ -564,6 +578,7 @@ lib/methods/facets/string/align_right.rb
 lib/methods/facets/string/at.rb
 lib/methods/facets/string/brief.rb
 lib/methods/facets/string/bytes.rb
+lib/methods/facets/string/camelcase.rb
 lib/methods/facets/string/capitalized.rb
 lib/methods/facets/string/chars.rb
 lib/methods/facets/string/cleave.rb
@@ -588,6 +603,7 @@ lib/methods/facets/string/lines.rb
 lib/methods/facets/string/lowercase.rb
 lib/methods/facets/string/margin.rb
 lib/methods/facets/string/mscan.rb
+lib/methods/facets/string/op_minus.rb
 lib/methods/facets/string/outdent.rb
 lib/methods/facets/string/peek.rb
 lib/methods/facets/string/poke.rb
@@ -600,6 +616,7 @@ lib/methods/facets/string/range_of_line.rb
 lib/methods/facets/string/rewrite.rb
 lib/methods/facets/string/shatter.rb
 lib/methods/facets/string/shift.rb
+lib/methods/facets/string/snakecase.rb
 lib/methods/facets/string/sprintf.rb
 lib/methods/facets/string/starts_with.rb
 lib/methods/facets/string/store.rb
@@ -662,6 +679,7 @@ lib/more/facets/cloneable.rb
 lib/more/facets/command.rb
 lib/more/facets/compare_on.rb
 lib/more/facets/console.rb
+lib/more/facets/continuation.rb
 lib/more/facets/coroutine.rb
 lib/more/facets/crypt.rb
 lib/more/facets/curry.rb
@@ -671,6 +689,7 @@ lib/more/facets/date.rb
 lib/more/facets/dependency.rb
 lib/more/facets/dictionary.rb
 lib/more/facets/downloader.rb
+lib/more/facets/duration.rb
 lib/more/facets/elementor.rb
 lib/more/facets/enumerablepass.rb
 lib/more/facets/eventhook.rb
@@ -695,7 +714,6 @@ lib/more/facets/linkedlist.rb
 lib/more/facets/logger.rb
 lib/more/facets/lrucache.rb
 lib/more/facets/main.rb
-lib/more/facets/mapsend.rb
 lib/more/facets/memoize.rb
 lib/more/facets/minitar.rb
 lib/more/facets/multipliers.rb
@@ -713,7 +731,6 @@ lib/more/facets/paramix.rb
 lib/more/facets/pathlist.rb
 lib/more/facets/pathname.rb
 lib/more/facets/pool.rb
-lib/more/facets/pp_s.rb
 lib/more/facets/pqueue.rb
 lib/more/facets/prepend.rb
 lib/more/facets/progressbar.rb
@@ -735,6 +752,7 @@ lib/more/facets/snapshot.rb
 lib/more/facets/stylize.rb
 lib/more/facets/syncarray.rb
 lib/more/facets/synchash.rb
+lib/more/facets/thread.rb
 lib/more/facets/timer.rb
 lib/more/facets/times.rb
 lib/more/facets/tuple.rb
@@ -747,11 +765,10 @@ lib/more/facets/yaml.rb
 lib/more/facets/ziputils.rb
 log
 log/changelog.txt
-log/history.rd
-log/todo.rd
 meta
 meta/MANIFEST
 meta/ROLLRC
+meta/config.yaml
 meta/google_ad.html
 meta/icli.yaml
 meta/project.yaml
@@ -760,7 +777,10 @@ task/changes
 task/clean
 task/clobber
 task/clobber/package
-task/config.yaml
+task/clobber/rdoc
+task/doc
+task/doc/quickopts
+task/doc/zip
 task/groups
 task/install
 task/log
@@ -769,8 +789,6 @@ task/prepare
 task/publish
 task/rdoc
 task/release
-task/special
-task/special/quickopts
 task/stats
 task/svn
 task/svn/changelog
@@ -796,7 +814,10 @@ test/unit/array/test_select.rb
 test/unit/array/test_stackable.rb
 test/unit/binding
 test/unit/binding/test_cflow.rb
+test/unit/binding/test_defined.rb
 test/unit/binding/test_eval.rb
+test/unit/binding/test_here.rb
+test/unit/binding/test_self.rb
 test/unit/binding/test_vars.rb
 test/unit/class
 test/unit/class/test_descendents.rb
@@ -805,18 +826,26 @@ test/unit/comparable
 test/unit/comparable/test_bound.rb
 test/unit/comparable/test_cmp.rb
 test/unit/continuation
-test/unit/continuation/test_create.rb
+test/unit/dir
+test/unit/dir/test_traverse.rb
 test/unit/enumerable
 test/unit/enumerable/test_cartesian.rb
-test/unit/enumerable/test_collate.rb
 test/unit/enumerable/test_collect.rb
 test/unit/enumerable/test_combination.rb
 test/unit/enumerable/test_count.rb
+test/unit/enumerable/test_each.rb
+test/unit/enumerable/test_mash.rb
 test/unit/enumerable/test_permutation.rb
 test/unit/enumerable/test_probability.rb
+test/unit/enumerable/test_split.rb
+test/unit/exception
+test/unit/exception/test_detail.rb
 test/unit/file
+test/unit/file/test_read.rb
 test/unit/file/test_topath.rb
 test/unit/file/test_write.rb
+test/unit/filetest
+test/unit/filetest/test_root.rb
 test/unit/hash
 test/unit/hash/test_at.rb
 test/unit/hash/test_delete.rb
@@ -847,7 +876,7 @@ test/unit/kernel/test_metaid.rb
 test/unit/kernel/test_object.rb
 test/unit/kernel/test_populate.rb
 test/unit/kernel/test_report.rb
-test/unit/kernel/test_require_esc.rb
+test/unit/kernel/test_returning.rb
 test/unit/kernel/test_silence.rb
 test/unit/kernel/test_super.rb
 test/unit/kernel/test_tap.rb
@@ -886,6 +915,7 @@ test/unit/string/test_indexable.rb
 test/unit/string/test_interpolate.rb
 test/unit/string/test_natcmp.rb
 test/unit/string/test_nchar.rb
+test/unit/string/test_op.rb
 test/unit/string/test_partitions.rb
 test/unit/string/test_range.rb
 test/unit/string/test_regesc.rb
@@ -918,6 +948,7 @@ test/unit/test_bytes.rb
 test/unit/test_class_extension.rb
 test/unit/test_classmethods.rb
 test/unit/test_compare_on.rb
+test/unit/test_continuation.rb
 test/unit/test_conversion.rb
 test/unit/test_coroutine.rb
 test/unit/test_crypt.rb
@@ -939,7 +970,6 @@ test/unit/test_interval.rb
 test/unit/test_let.rb
 test/unit/test_linkedlist.rb
 test/unit/test_lrucache.rb
-test/unit/test_mapsend.rb
 test/unit/test_memoize.rb
 test/unit/test_multipliers.rb
 test/unit/test_multiton.rb
@@ -949,7 +979,6 @@ test/unit/test_openobject.rb
 test/unit/test_ostruct.rb
 test/unit/test_overload.rb
 test/unit/test_paramix.rb
-test/unit/test_pp_s.rb
 test/unit/test_prototype.rb
 test/unit/test_random.rb
 test/unit/test_recorder.rb
@@ -957,6 +986,7 @@ test/unit/test_snapshot.rb
 test/unit/test_stylize.rb
 test/unit/test_syncarray.rb
 test/unit/test_synchash.rb
+test/unit/test_thread.rb
 test/unit/test_timer.rb
 test/unit/test_times.rb
 test/unit/test_tuple.rb
@@ -965,3 +995,4 @@ test/unit/test_uninheritable.rb
 test/unit/time
 test/unit/time/test_change.rb
 test/unit/time/test_elapse.rb
+test/unit/time/test_stamp.rb