glue 0.31.0 → 0.40.0

data/test/glue/tc_property.rb

@@ -1,112 +0,0 @@
-$:.unshift File.join(File.dirname(__FILE__), '..', '..', 'lib')
-
-require 'test/unit'
-
-require 'og'
-require 'glue/logger'
-require 'glue/property'
-
-def VarChar(size)
-  return String, :sql => "VARCHAR(#{ size })"
-end
-NotNull = {:sql => "NOT NULL"}.freeze
-Null = {:sql => "NULL"}.freeze
-
-# Property.type_checking = false
-
-module Test # :nodoc: all
-
-class Msg
-  include Og::Unmanageable
-  
-  prop :owner_oid, Fixnum
-  prop_accessor :val1, :val2, :val3, Fixnum, :sql => "smallint"
-  prop_accessor :title, :body, String
-  prop_accessor :test, String, :sql => "char(10) NOT NULL"
-  prop_accessor :count, Fixnum
-  prop_accessor :create_time, Time  
-
-  # a marshaled property
-  prop_accessor :options, Array
-
-  # property with macro arguments!
-  prop_accessor :address, VarChar(30), NotNull
-  
-  def initialize
-    @create_time = Time.now
-    @options = []
-  end
-
-end
-
-class SubMsg < Msg
-  # to avoid conflicts with tc_og.rb
-  include Og::Unmanageable
-  
-  # duplicate definition with different type!
-  prop_accessor :count, Float
-
-  # another property
-  prop_accessor :another, Fixnum
-end
-
-class C
-        attr_accessor :name
-        attr_accessor :description
-end
-
-class C
-        property :name, String
-        property :description, String
-end
-
-class TC_N_Properties < Test::Unit::TestCase
-
-  def setup
-    @msg1 = Msg.new
-  end
-
-  def teardown
-    @msg1 = nil
-  end
-
-  def test_props
-    
-    # bug: props for subclasses.
-    # bug: props propagated to base classes.
-
-    assert(SubMsg.properties)
-    assert_equal(Msg.properties.size(), SubMsg.properties.size() - 1)
-
-    assert_equal(11, Msg.properties.size)
-    assert_equal(12, SubMsg.properties.size)
-
-    # bug: duplicate definition       
-    
-    assert_equal(Float, SubMsg.properties.values.find { |p| :count == p.symbol }.klass)
-
-    # dont force conversion
-    
-    @msg1.count = 2.4
-    assert_equal(Float, @msg1.count.class)
-
-    # force conversion
-    
-    @msg1.__force_count(2.4)
-    assert_equal(Fixnum, @msg1.count.class)    
-  end
-
-  def test_macro_params
-    sql = Msg.properties.values.find { |p| :address == p.symbol}.sql
-# FIXME: Temporarily dissabled.
-#   assert_equal 'VARCHAR(30) NOT NULL', sql
-  end
-
-
-  def test_soc
-    assert_equal String, C.ann.name.klass
-  end
-  
-end
-
-end

data/test/glue/tc_property_type_checking.rb

@@ -1,41 +0,0 @@
-$:.unshift File.join(File.dirname(__FILE__), '..', '..', 'lib')
-
-require 'test/unit'
-
-require 'glue/logger'
-require 'glue/property'
-
-=begin
-
-FIXME: temporarily dissabled.
-
-Glue::Property.type_checking = true
-
-module Test # :nodoc: all
-
-class Person 
-  prop_accessor :age, Fixnum
-  
-  def initialize(age = nil)
-    @age = age
-  end
-
-end
-
-class TC_PropertiesTypeChecking < Test::Unit::TestCase
-
-  def test_all
-    per = Person.new
-
-    FIXME: does not work when run in the full test suite.
-    # assert_raises(RuntimeError) {
-    #  per.age = 'Hello'
-    # }
-  end
-  
-end
-
-end
-
-=end
-

data/test/glue/tc_template.rb

@@ -1,35 +0,0 @@
-$:.unshift File.join(File.dirname(__FILE__), '..', '..', 'lib')
-
-require 'test/unit'
-require 'ostruct'
-
-require 'glue/template'
-
-class TestTemplate < Test::Unit::TestCase # :nodoc: all
-  include Glue
-    
-  def test_all
-    template = %q{
-      Hello #{user}
-
-      dont forget the following todo items:
-      
-      <?r for item in items ?>
-        <li>#{item}</li>
-      <?r end ?>
-    }
-
-    user = 'gmosx'
-    items = %w{ nitro is really great }
-    out = ''
-
-    Glue::Template.process(template, :out, binding)
-
-    assert_match %r{\<li\>nitro\</li\>}, out
-    assert_match %r{\<li\>really\</li\>}, out
-    assert_match %r{Hello gmosx}, out    
-    
-    # TODO: add test for static inclusion.
-    
-  end
-end