anise 0.1.1 → 0.2.0

data/lib/anise/attributes.rb

@@ -1,122 +0,0 @@
-require 'facets/inheritor' # remove dependency?
-
-module Anise
-  require 'anise/annotations'
-
-  module Annotatable
-
-    # = Annotated Attributes
-    #
-    # This framework modifies the major attr_* methods to allow easy addition of annotations.
-    # It modifies the built in attribute methods (attr, attr_reader, attr_writer and attr_accessor),
-    # to allow annotations to added to them directly rather than requireing a separate
-    # #ann statement.
-    #
-    #   class X
-    #     attr :a, :valid => lambda{ |x| x.is_a?(Integer) }
-    #   end
-    #
-    # See annotation.rb for more information.
-    #
-    # NOTE This library was designed to be backward compatible with the standard versions of the
-    # same methods.
-    #
-    module Attributes
-
-      def self.append_features(base)
-        base.extend self
-        base.module_eval do
-          inheritor :instance_attributes, [], :|
-
-          annotatable_attribute_method(:attr_reader)
-          annotatable_attribute_method(:attr_writer)
-          annotatable_attribute_method(:attr_accessor)
-        end
-      end
-
-      #
-      def annotatable_attribute_method(attr_method_name)
-        attr_method = method(attr_method_name)
-
-        (class << self; self; end).instance_eval do 
-
-          define_method(attr_method_name) do |*args|
-
-            args.flatten!
-
-            harg={}; while args.last.is_a?(Hash)
-              harg.update(args.pop)
-            end
-
-            raise ArgumentError if args.empty? and harg.empty?
-
-            if args.empty?  # hash mode
-              harg.each { |a,h| send(attr_method_name,a,h) }
-            else
-              klass = harg[:class] = args.pop if args.last.is_a?(Class)
-
-              attr_method.call(*args)
-
-              args.each { |a|
-                ann(a.to_sym,harg)
-              }
-
-              instance_attributes!.concat(args)  #merge!
-
-              # Use this callback to customize for your needs.
-              if respond_to?(:attr_callback)
-                attr_callback(self, args, harg)
-              end
-
-              # return the names of the attributes created
-              return args
-            end
-
-          end
-
-        end
-      end
-
-      # Return list of attributes that have a :class annotation.
-      #
-      #   class MyClass
-      #     attr_accessor :test
-      #     attr_accessor :name, String, :doc => 'Hello'
-      #     attr_accessor :age, Fixnum
-      #   end
-      #
-      #   MyClass.instance_attributes # => [:test, :name, :age, :body]
-      #   MyClass.classified_attributes # => [:name, :age]
-      #
-      def classified_attributes
-        instance_attributes.find_all do |a|
-          self.ann(a, :class)
-        end
-      end
-
-      # This define a simple adjustment to #attr to allow it to handle the boolean argument and
-      # to be able to accept attributes. It's backward compatible and is not needed for Ruby 1.9
-      # which gets rid of the secondary argument.
-      #
-      def attr(*args)
-        args.flatten!
-        case args.last
-        when TrueClass
-          args.pop
-          attr_accessor(*args)
-        when FalseClass
-          args.pop
-          attr_reader(*args)
-        else
-          attr_reader(*args)
-        end
-      end
-
-    end
-
-  end
-
-end
-
-# Copyright (c) 2005, 2008 TigerOps
-

data/test/test_annotatable.rb

@@ -1,28 +0,0 @@
-require 'anise/annotatable'
-
-class Test_Annotatable < Test::Unit::TestCase
-
-  include Anise::Annotatable
-
-  annotation :req
-
-  req 'r'
-
-  def a
-    "a"
-  end
-
-  def test_annotated
-    assert_equal( {:req=>['r']}, self.class.ann(:a) )
-  end
-
-  req 's'
-
-  attr :b
-
-  def test_annotated
-    assert_equal( {:req=>['s']}, self.class.ann(:b) )
-  end
-
-end
-

data/test/test_toplevel_annotatable.rb

@@ -1,32 +0,0 @@
-=begin
-require 'annotable'
-require 'test/unit'
-
-include Annotatable
-
-annotation :req
-
-class Test_Annotatable < Test::Unit::TestCase
-
-  annotation :req
-
-  req 'r'
-
-  def a
-    "a"
-  end
-
-  def test_annotated
-    assert_equal( {:req=>['r']}, self.class.ann(:a) )
-  end
-
-  req 's'
-
-  attr :b
-
-  def test_annotated
-    assert_equal( {:req=>['s']}, self.class.ann(:b) )
-  end
-
-end
-=end

data/test/test_toplevel_attribute.rb

@@ -1,27 +0,0 @@
-=begin
-require 'annotable/attributes'
-require 'test/unit'
-
-include Annotatable::Attributes
-
-$self = self
-
-attr :b, :y => 1
-
-class Test_Attribute_Toplevel < Test::Unit::TestCase
-
-  attr :q
-
-  attr :a, :x => 1
-
-  def test_attr_a
-    assert_equal( {:x=>1}, self.class.ann(:a) )
-  end
-
-  def test_attr_b
-    assert_equal( {:y=>1}, $self.class.ann(:b) )
-  end
-
-end
-=end
-