facets 1.7.46 → 1.8.0

data/work/misc/calibre/ProjectInfo.tagiterator

@@ -0,0 +1,36 @@
+--- %YAML:1.0
+
+TITLE    : &title Calibre TagIterator
+NAME     : &pkg calibre-tagiterator
+VERSION  : '1.3.0'
+DATE     : '2005-11-30'
+STATUS   : Beta/Stable
+
+CONTACT  : Thomas Sawyer
+EMAIL    : &email transfire@gmail.com
+HOMEPAGE : "http://calibre.rubyforge.org"
+
+LICENSE  : Ruby, 2005
+AUTHOR   : Nyasu
+
+SUMMARY: Iterate over tagged markup like HTML and XML.
+
+DESCRIPTION: >
+  Quickly iterate through tagged markup documents like HTML and XML.
+  TagIterator is great for quick and dirty web scrapping.
+
+DEPENDENCIES: []
+
+DISTRIBUTE: [ gem, tar.bz2, zip ]
+
+RUBYFORGE:
+  PROJECT: 'calibre'
+  USERNAME: transami
+
+PACKAGE:
+  dir: '../../dist'
+
+RDOC:
+  - dir: rdoc
+    template: jamis
+    options: ['--all', '--inline-source']

data/work/misc/calibre/ProjectInfo.timer

@@ -0,0 +1,35 @@
+--- %YAML:1.0
+
+TITLE    : &title Calibre Timer
+NAME     : &pkg calibre-timer
+VERSION  : '1.0.0'
+DATE     : '2005-11-30'
+STATUS   : Beta/Stable
+
+AUTHOR   : Thomas Sawyer
+EMAIL    : &email transfire@gmail.com
+HOMEPAGE : "http://calibre.rubyforge.org"
+
+SUMMARY: Versitile timer class which has both "alarm" and "stop-watch" modes.
+
+DESCRIPTION: >
+  Provides a strightforward means for controlling time critical 
+  execution. It can be used as a "stop watch" timer or as a 
+  "time bomb" timer. Essentially this is a merging of Paul 
+  Brannan's TimeLimit and Minero Aoki's Timer classes.
+
+DEPENDENCIES: []
+
+DISTRIBUTE: [ gem, tar.bz2, zip ]
+
+RUBYFORGE:
+  PROJECT: 'calibre'
+  USERNAME: transami
+
+PACKAGE:
+  dir: '../../dist'
+
+RDOC:
+  - dir: rdoc
+    template: jamis
+    options: ['--all', '--inline-source']

data/work/misc/calibre/ProjectInfo.tracepoint

@@ -0,0 +1,37 @@
+--- %YAML:1.0
+
+TITLE    : &title Calibre TracePoint
+NAME     : &pkg calibre-tracepoint
+VERSION  : '0.9.0'
+DATE     : '2005-10-31'
+STATUS   : Beta/Stable
+
+AUTHOR   : Thomas Sawyer
+EMAIL    : &email transfire@gmail.com
+HOMEPAGE : "http://calibre.rubyforge.org"
+
+SUMMARY: TracePoint class ecapsulates a runtime "moment".
+
+DESCRIPTION: >
+  A TracePoint is an instant of execution.
+  It is very much like a Binding, but has
+  additional information. TracePoint can be
+  useful in bolstering the capabilities of
+  execution tracing (eg. set_trace_func).
+
+DEPENDENCIES:
+  - facets
+
+DISTRIBUTE: [ gem, tar.bz2, zip ]
+
+RUBYFORGE:
+  PROJECT: 'calibre'
+  USERNAME: transami
+
+PACKAGE:
+  dir: '../../dist'
+
+RDOC:
+  - dir: rdoc
+    template: jamis
+    options: ['--all', '--inline-source']

data/work/misc/calibre/ProjectInfo.tuple

@@ -0,0 +1,36 @@
+--- %YAML:1.0
+
+TITLE    : &title Calibre Tuple
+NAME     : &pkg calibre-tuple
+VERSION  : '2.0.0'
+DATE     : '2005-11-25'
+STATUS   : Beta/Stable
+
+AUTHOR   : Thomas Sawyer
+EMAIL    : &email transfire@gmail.com
+HOMEPAGE : "http://calibre.rubyforge.org"
+
+SUMMARY: Fairly Standard implementation N-Tuple.
+
+DESCRIPTION: >
+  Tuples are very much like Arrays, but they are
+  Multiton and Comparable and are able to convert
+  formated strings like '1.0.0' into Tuples easily.
+  This is a pure Ruby implementation as a subclass
+  of Array.
+
+DEPENDENCIES: []
+
+DISTRIBUTE: [ gem, tar.bz2, zip ]
+
+RUBYFORGE:
+  PROJECT: 'calibre'
+  USERNAME: transami
+
+PACKAGE:
+  dir: '../../dist'
+
+RDOC:
+  - dir: rdoc
+    template: jamis
+    options: ['--all', '--inline-source']

data/work/misc/calibre/ProjectInfo.uniheritable

@@ -0,0 +1,34 @@
+--- %YAML:1.0
+
+TITLE    : &title Calibre Uninheritable
+NAME     : &pkg calibre-uninheritable
+VERSION  : '1.0.0'
+DATE     : '2005-11-26'
+STATUS   : Beta/Stable
+
+AUTHOR   : Austin Ziegler
+CONTACT  : Thomas Sawyer
+EMAIL    : &email transfire@gmail.com
+HOMEPAGE : "http://calibre.rubyforge.org"
+
+SUMMARY: Uninheritable classes throws error if subclassed.
+
+DESCRIPTION: >
+  Uniheritable is a very simple module which can be included
+  into a class to cause it to be uniheritable.
+
+DEPENDENCIES: []
+
+DISTRIBUTE: [ gem, tar.bz2, zip ]
+
+RUBYFORGE:
+  PROJECT: 'calibre'
+  USERNAME: transami
+
+PACKAGE:
+  dir: '../../dist'
+
+RDOC:
+  - dir: rdoc
+    template: jamis
+    options: ['--all', '--inline-source']

data/work/misc/calibre/ProjectInfo.units

@@ -0,0 +1,34 @@
+--- %YAML:1.0
+
+TITLE    : &title Calibre Units
+NAME     : &pkg calibre-units
+VERSION  : '1.0.0'
+DATE     : '2005-11-26'
+STATUS   : Beta/Stable
+
+AUTHOR   : Peter Vanbroekhoven
+EMAIL    : &email transfire@gmail.com
+HOMEPAGE : "http://calibre.rubyforge.org"
+
+SUMMARY: Complete Units System
+
+DESCRIPTION: >
+  Units is an comprehensive units system providing
+  both SI units and web-updated currency units via
+  a very easy to use method-based interface.
+
+DEPENDENCIES: []
+
+DISTRIBUTE: [ gem, tar.bz2, zip ]
+
+RUBYFORGE:
+  PROJECT: 'calibre'
+  USERNAME: transami
+
+PACKAGE:
+  dir: '../../dist'
+
+RDOC:
+  - dir: rdoc
+    template: jamis
+    options: ['--all', '--inline-source']

data/work/misc/calibre/ProjectInfo.yamlstruct

@@ -0,0 +1,34 @@
+--- %YAML:1.0
+
+TITLE    : &title Calibre YAMLStruct
+NAME     : &pkg calibre-yamlstruct
+VERSION  : '0.3.0'
+DATE     : '2005-12-02'
+STATUS   : Beta
+
+AUTHOR   : Thomas Sawyer
+EMAIL    : &email transfire@gmail.com
+HOMEPAGE : "http://calibre.rubyforge.org"
+
+SUMMARY: Like OpenStruct but the object is instantiated from a YAML document.
+
+DESCRIPTION: >
+  YAMLStruct is like OpenStruct but the object is instantiated
+  from a YAML document, which it in essence proxies. Currently
+  this limited to documents which are maps.
+
+DEPENDENCIES: []
+
+DISTRIBUTE: [ gem, tar.bz2, zip ]
+
+RUBYFORGE:
+  PROJECT: 'calibre'
+  USERNAME: transami
+
+PACKAGE:
+  dir: '../../dist'
+
+RDOC:
+  - dir: rdoc
+    template: jamis
+    options: ['--all', '--inline-source']

data/work/more/annotation-rw.rb

@@ -0,0 +1,217 @@
+require 'facets/core/hash/to_h'
+require 'facets/more/openobject'
+require 'facets/more/rwdelegator'
+
+
+# # Read from one object and write to another.
+#
+# class RWDelegator
+#
+#   def initialize( write, &read )
+#     @read = read
+#     @write = write
+#
+#     read_class = @read.call.object_class
+#
+#     unless read_class.method_defined?(:eq_with_rwdelegator?)
+#       read_class.class_eval %{
+#         def eq_with_rwdelegator?( other )
+#           if RWDelegator === other
+#             other == self
+#           else
+#             eq_without_rwdelegator?(other)
+#           end
+#         end
+#         alias_method :eq_without_rwdelegator?, :==
+#         alias_method :==, :eq_with_rwdelegator?
+#       }
+#     end
+#   end
+#
+#   def inspect
+#     "#<#{object_class} #{@read.call.inspect}>"
+#   end
+#
+#   def ==( other )
+#     @read.call == other
+#   end
+#
+#   def method_missing( meth, *args, &blk )
+#     read = @read.call
+#     ditto = read.dup
+#     result = ditto.send( meth, *args, &blk )
+#     if ditto != read
+#       result = @write.send( meth, *args, &blk )
+#     end
+#     result
+#   end
+#
+# end
+
+
+#
+
+class Annotations
+
+  def initialize( base )
+    @base, @ann = base, {}
+  end
+
+  def [](name)
+    @ann[name] ||= Annotation.new(@base, name)
+  end
+
+  def []=(name, note)
+    raise ArgumentError unless Annotation === note
+    @ann[name] = note
+  end
+
+  def ==(other) @ann == other.to_h end
+
+  def key?(name) @ann.key?(name) end
+
+  def to_h() @ann end
+
+  def update( other )
+    @ann.update( other.to_h )
+    self
+  end
+  private :update
+
+  def lookup(name)
+    self[name].heritage
+  end
+
+  def inheritance
+    anns = Annotations.new(@base)
+    @ann.each_key do |name|
+      anns[name] = lookup(name)
+    end
+    return anns
+  end
+
+  def annotated_base() @base end
+
+  def method_missing( name, *args, &blk )
+    if key?(name)
+      lookup(name)
+    else
+      super
+    end
+  end
+
+end
+
+#
+
+class Annotation < OpenObject
+
+  def initialize( base, name )
+    @base = base
+    @name = name
+    super()
+  end
+
+  def annotation_name
+    @name
+  end
+
+  def heritage
+    a = Annotation.new( @base, @name )
+    @base.ancestors.reverse_each do |anc|
+      a.send(:update, anc.annotations[@name] )
+    end
+    a
+  end
+
+  def method_missing( sym, *args, &blk )
+    type = sym.to_s[-1,1]
+    key = sym.to_s.gsub(/[=!?]$/, '').to_sym
+
+    if type == '='
+      super( sym, *args, &blk )
+    else
+      write = super( sym, *args, &blk )
+      write = heritage[sym] unless write
+      read = lambda { heritage[sym] }
+      RWDelegator.new( write, &read )
+    end
+  end
+
+end
+
+#
+
+class Module
+
+  def annotations
+    @annotations ||= Annotations.new( self )
+  end
+
+  def ann( name=nil, *options )
+    return annotations unless name
+    note = annotations[name]
+    unless options.empty?
+      note.send(:update,*options)
+    end
+    return note
+  end
+
+end
+
+
+#=begin test
+
+  require 'test/unit'
+
+  class TC_Annotation < Test::Unit::TestCase
+
+    class X
+      ann :foo, :doc => "hello"
+      ann :foo, :bar => []
+    end
+
+    class Y < X
+      ann :foo, :class => String, :doc => "bye"
+    end
+
+    def test_001
+      assert_equal( "hello", X.ann(:foo).doc )
+      assert_equal( "hello", X.ann.lookup(:foo).doc )
+    end
+
+    def test_002
+      assert_equal( X.ann.lookup(:foo), X.ann.foo )
+      #assert_equal( X.ann.lookup(:foo), X.ann!(:foo) )
+    end
+
+    def test_003
+      X.ann(:foo).bar << "1"
+      assert_equal( ["1"], X.ann.foo.bar )
+    end
+
+    def test_004
+      assert_equal( "bye", Y.ann(:foo).doc )
+      assert_equal( "bye", Y.ann.lookup(:foo).doc )
+    end
+
+    def test_005
+      #assert_equal( nil, Y.ann(:foo).bar )
+      assert_equal( ["1"], Y.ann.lookup(:foo).bar )
+    end
+
+    def test_006
+      Y.ann(:foo).doc = "cap"
+      assert_equal( "cap", Y.ann(:foo).doc  )
+      assert_equal( "cap", Y.ann.lookup(:foo).doc )
+    end
+
+    def test_007
+      Y.ann(:foo).bar << "2"
+      assert_equal( ["1", "2"], Y.ann(:foo).bar )
+      assert_equal( ["1", "2"], Y.ann.lookup(:foo).bar )
+    end
+
+  end
+
+#=end