facets 2.2.1 → 2.3.0

data/CHANGES

@@ -1,5 +1,11 @@
 = Facets Change History
 
+== 2.3.0 /
+
+* Reorganized library into four groups: core, more, class and mixin.
+* Added tracepoint.rb back to the library.
+* Fixed multiglob_r bug, so it will NOT follow symlinks.
+
 == 2.2.1 / 2007-12-22
 
 * Got rid of methods subdir. All method redirects are in core/.

data/NOTES

@@ -1,4 +1,17 @@
-Facets 2.2.1 has been released.
+Facets 2.3.0 has been released.
+
+Facets 2.3 makes some nice internal reorganization, rather
+then just the split between core/ and more/, we have added
+class/ and mixin/. This helps a great deal in working
+with the library. If does not effect the end-user in anyway
+however --even so we felt it enough to warrent a minor
+version bump rather than just a tiny.
+
+Amoung other changes with this release, cloneable.rb is
+now a true deep dup/clone mixin; tracepoint.rb returns
+to the library; and ...
+
+As of 2.2.1:
 
 This release get rid of the underlying methods subdir.
 All method redirects are now in core, to ensure

data/Rakefile

@@ -0,0 +1,26 @@
+# Facets Rakefile
+
+
+task :default => [:test]
+
+
+desc "Download docs package."
+
+task :rdoc do
+  system 'task/rdoc'
+end
+
+
+desc "Run unit tests (default)."
+
+task :test do
+  system 'task/test'
+end
+
+
+desc "Local site_ruby install."
+
+task :install do
+  system 'task/install'
+end
+

data/demo/bench/general/bench_calls.rb

@@ -0,0 +1,74 @@
+=begin
+
+Some speed comparisions between ways to call a method.
+
+=end
+
+require 'benchmark'
+
+$n = 50000
+
+# standard array
+
+def callme ; 1 ; end
+
+$m = self.class.instance_method(:callme)
+
+
+def call_normal
+  $n.times do
+    callme
+  end
+end
+
+def call_by_send_symbol
+  $n.times do
+    send(:callme)
+  end
+end
+
+def call_by_send_string
+  $n.times do
+    send("callme")
+  end
+end
+
+def call_by_eval
+  $n.times do
+    eval "callme"
+  end
+end
+
+def call_by_instance_eval
+  $n.times do
+    instance_eval { callme }
+  end
+end
+
+def call_by_bind
+  $n.times do
+    $m.bind(self).call
+  end
+end
+
+def call_inst_eval_send
+  $n.times do
+    $m.instance_eval { send(:callme) }
+  end
+end
+
+### --- bench ---
+
+puts "\nCURRENT"
+Benchmark.bm(15) do |b|
+  b.report("normal          :") { call_normal }
+  b.report("send_symbol     :") { call_by_send_symbol }
+  b.report("send_string     :") { call_by_send_string }
+  b.report("bind            :") { call_by_bind }
+  b.report("instance_eval   :") { call_by_instance_eval }
+  b.report("by_eval         :") { call_by_eval }
+  b.report("inst_eval_send  :") { call_inst_eval_send }
+end
+
+
+

data/demo/bench/general/bench_includes.rb

@@ -0,0 +1,25 @@
+
+$n = 100
+
+puts "Generating #{$n} cascading modules..."
+
+$m = []
+(1..$n).each { |i|
+  $m[i] = Module.new
+  $m[i].class_eval {
+    define_method( "_#{i}" ) { puts "Called method in module #{i}." }
+    include $m[i-1] if $m[i-1]
+  }
+}
+
+class ManyIncludes
+  include $m[$n]
+end
+
+mm = ManyIncludes.new
+mn = "_#{$n/2}"
+
+t0 = Time.now
+mm.send(mn)
+t1 = Time.now
+puts "Time to call a single method among #{$n} modules: #{(t1 - t0).to_f} seconds."

data/demo/bench/general/bench_methods.rb

@@ -0,0 +1,17 @@
+
+class ManyMethods
+
+  puts "Generating methods..."
+
+  (0..100000).each do |i|
+    define_method( "_#{i}" ) { puts "Called method #{i}." }
+  end
+
+end
+
+mm = ManyMethods.new
+
+n1 = Time.now
+mm._50000
+n2 = Time.now
+puts "Time to call a single method among 100000: #{(n2 - n1).to_f} seconds."

data/demo/bench/general/bench_pathname.rb

@@ -0,0 +1,24 @@
+
+  require 'benchmark'
+  #require 'pathname'
+  require 'mega/pathname'
+
+  $f1 = "a/b/c"
+  $f2 = "d/e/f"
+
+  $p1 = Pathname.new($f1)
+  $p2 = Pathname.new($f2)
+
+  def file_join
+    File.join( $f1 , $f2 )
+  end
+
+  def path_join
+    $p1 + $p2
+  end
+
+  n = 50000
+  Benchmark.bm(7) do |x|
+    x.report("path-join") { n.times do ; path_join ; end }
+    x.report("file-join") { n.times do ; file_join ; end }
+  end

data/demo/bench/general/bench_range.rb

@@ -0,0 +1,64 @@
+
+require 'benchmark'
+
+# member?
+
+$n = 50000
+
+def range_nan
+  $n.times { ('a'..'k').member?('f') }
+  $n.times { ('a'..'k').member?('r') }
+end
+
+def range_small
+  $n.times { (0..6).member?(3) }
+  $n.times { (0..6).member?(7) }
+end
+
+def range_med
+  $n.times { (0..1000).member?(500) }
+  $n.times { (0..1000).member?(1001) }
+end
+
+# index
+
+$a = [ 'x' ] * 100
+$m = 500000
+
+def range_index
+  i = 1
+  $m.times { $a[1..i]; i += 1 }
+end
+
+def length_index
+  i = 1
+  $m.times { $a[1,i]; i += 1 }
+end
+
+### --- bench ---
+
+puts "\nINDEXING"
+Benchmark.bm(15) do |b|
+  b.report("range_index:") { range_index }
+  b.report("length_index:") { length_index }
+end
+
+puts "\n\nNew vs. Old\n"
+
+puts "\nCURRENT"
+Benchmark.bm(15) do |b|
+  b.report("range_nan:") { range_nan }
+  b.report("range_samll:") { range_small }
+  b.report("range_med:") { range_med }
+end
+
+puts "\nNEW"
+require 'trix-dev/range/range'
+Benchmark.bm(15) do |b|
+  b.report("range_nan:") { range_nan }
+  b.report("range_samll:") { range_small }
+  b.report("range_med:") { range_med }
+end
+
+puts
+

data/demo/bench/general/bench_return.rb

@@ -0,0 +1,56 @@
+
+  require 'benchmark'
+
+  class Ret
+    def initialize(a,b,c,d,e)
+      @a = a
+      @b = b
+      @c = c
+      @d = d
+      @e = e
+    end
+  end
+
+  @preobj = Object.new
+  def @preobj.assign(a,b,c,d,e)
+    @a = a
+    @b = b
+    @c = c
+    @d = d
+    @e = e
+  end
+  
+  def return_list
+    return 1, 2, 3, 4, 5
+  end
+
+  def return_array
+    return [1, 2, 3, 4, 5]
+  end
+
+  def return_hash
+    return { 1 => 1, 2 => 2, 3 => 3, 4 => 4, 5 => 5 }
+  end
+
+  def return_object
+    return Ret.new(1, 2, 3, 4, 5)
+  end
+
+  def return_preobj
+    return @preobj.assign(1, 2, 3, 4, 5)
+  end
+
+  def return_globals
+    $a = 1; $b = 2; $c = 3; $d = 4; $e = 5
+  end
+
+  n = 50000
+  Benchmark.bm(7) do |x|
+    x.report("global") { n.times do ; return_globals ; end }
+    x.report("preobj") { n.times do ; return_preobj ; end }
+    x.report("object") { n.times do ; return_object ; end }
+    x.report("array:") { n.times do ; return_array ; end }
+    x.report("hash:")  { n.times do ; return_hash ; end }
+    x.report("list:")  { n.times do ; return_list ; end }
+  end
+

data/demo/bench/general/bench_yeild.rb

@@ -0,0 +1,75 @@
+=begin
+
+Some speed comparisions between yield vs. block.
+
+=end
+
+require 'benchmark'
+
+$n = 10000
+$b = proc { 1 }
+
+# standard array
+
+def with_yield
+  yield
+end
+
+def with_block( &yld )
+  yld.call
+end
+
+def with_bracket( &yld )
+  yld[]
+end
+
+# bench calls
+
+def call_with_yield
+  $n.times do
+    with_yield { 1 } 
+  end
+end
+
+def call_with_yield_on_proc
+  $n.times do
+    with_yield &$b
+  end
+end
+
+def call_with_block
+  $n.times do
+    with_block { 1 }
+  end
+end
+
+def call_with_block_on_proc
+  $n.times do
+    with_block &$b
+  end
+end
+
+def call_with_bracket
+  $n.times do
+    with_bracket { 1 }
+  end
+end
+
+def call_with_bracket_on_proc
+  $n.times do
+    with_bracket &$b
+  end
+end
+
+### --- bench ---
+
+puts "\nYield vs. Block"
+Benchmark.bm(15) do |b|
+  b.report("block           :") { call_with_block }
+  b.report("block a proc    :") { call_with_block_on_proc }
+  b.report("bracket         :") { call_with_bracket }
+  b.report("bracket a proc  :") { call_with_bracket_on_proc }
+  b.report("yield           :") { call_with_yield }
+  b.report("yield a proc    :") { call_with_yield_on_proc }
+end
+

data/lib/{more → class}/facets/buildingblock.rb

@@ -217,47 +217,3 @@ end
   end
 =end
 
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-
-=begin test
-  require 'test/unit'
-
-  class TestBuildingBlock < Test::Unit::TestCase
-
-    module M
-      extend self
-      def m(n,*m) ; "#{n}{#{m}}"; end
-      def t(n) ; "#{n}"; end
-    end
-
-    def test_01
-      build = BuildingBlock.new(M, :m)
-
-      build.html do
-        head do
-          title "Test"
-        end
-
-        body do
-          i "Hello"
-          build! :not
-          t "Test"
-          t "Hey"
-        end
-      end
-
-      r = "html{head{title{Test}}body{i{Hello}not{}TestHey}}"
-
-      assert_equal( r, build.to_s )
-    end
-
-  end
-
-=end