union 1.0.0

data/CHANGES

@@ -0,0 +1,2 @@
+= 1.0.0 - 10-Jun-2008
+* Initial release

data/MANIFEST

@@ -0,0 +1,7 @@
+* CHANGES
+* MANIFEST
+* README
+* Rakefile
+* facade.gemspec
+* lib/union.rb
+* test/test_union.rb

data/README

@@ -0,0 +1,31 @@
+= Description
+A struct-like C union class for Ruby.
+
+= Installation
+   rake test (optional)
+   rake install (standard) or rake install_gem (rubygems)
+
+= Synopsis
+   require 'union'
+
+   Union.new('Human', :name, :age, :height)
+   h = Union::Human.new
+
+   # Only one attribute of the union may be set
+   h.name = 'Daniel' # => #<struct Union::Human name="Daniel", age=nil>
+   h.age  = 38       # => #<struct Union::Human name=nil, age=38>
+
+= Known issues or bugs
+None that I'm aware of. Please report any bugs you find on the project page
+at http://www.rubyforge.org/projects/shards
+
+= License
+Ruby's
+
+= Warranty
+This package is provided "as is" and without any express or
+implied warranties, including, without limitation, the implied
+warranties of merchantability and fitness for a particular purpose.
+
+= Author
+* Daniel J. Berger

data/Rakefile

@@ -0,0 +1,22 @@
+require 'rake'
+require 'rake/testtask'
+require 'rbconfig'
+include Config
+
+desc 'Install the union library (non-gem)'
+task :install do
+   sitelibdir = CONFIG["sitelibdir"]
+   file = "lib/union.rb"
+   FileUtils.cp(file, sitelibdir, :verbose => true)
+end
+
+task :install_gem do
+   ruby 'union.gemspec'
+   file = Dir["*.gem"].first
+   sh "gem install #{file}"
+end
+
+Rake::TestTask.new do |t|
+   t.verbose = true
+   t.warning = true
+end

data/lib/union.rb

@@ -0,0 +1,47 @@
+# The Union class mimics a C union, where only one member of a Union
+# object can be set to a non-nil value at a time.
+#
+class Union < Struct
+   # The version of this library
+   VERSION = '1.0.0'
+   
+   # Creates and returns a new Union. Unlike Struct::Class.new, this does not
+   # take any arguments. You must assign attributes individually.
+   #
+   #    Union.new('Human', :name, :age)
+   #    h = Union::Human.new
+   #
+   #    h.name = 'Daniel' # => #<struct Union::Human name="Daniel", age=nil>
+   #    h.age  = 38       # => #<struct Union::Human name=nil, age=38>
+   #--
+   # The semantics of Union.new(arg1, arg2, ...) would be non-sensical. Which
+   # attribute should be set while the rest are ignored? The first one or the
+   # last one? I decided to disallow it altogether.
+   #
+   def initialize
+      super
+      members.each{ |attribute|
+         m = %Q{
+            def #{attribute}=(value)
+               self['#{attribute}'] = value
+            end
+         }
+         instance_eval(m)
+      }
+   end
+
+   # Identical to Struct attribute assignment, except that setting one instance
+   # variable sets all other instance variables to nil. Also, you cannot use a
+   # numeric index. You must use a string or symbol.
+   #
+   #    Union.new('Human', :name, :age)
+   #    h = Union::Human.new
+   #
+   #    h[:name] = 'Daniel' # => #<struct Union::Human name="Daniel", age=nil>
+   #    h[:age]  = 38       # => #<struct Union::Human name=nil, age=38>
+   #
+   def []=(symbol, value)
+      super(symbol, value)
+      members.each{ |m| super(m, nil) unless m == symbol.to_s }
+   end
+end

data/test/test_union.rb

@@ -0,0 +1,50 @@
+require 'union'
+require 'test/unit'
+
+class TC_Union < Test::Unit::TestCase
+   def setup
+      Union.new('Human', :name, :age, :height) unless defined? Union::Human
+      @union = Union::Human.new
+   end
+   
+   def test_union_version
+      assert_equal('1.0.0', Union::VERSION)
+   end
+   
+   def test_union_constructor      
+      assert_raise(ArgumentError){ Union::Human.new('Matz') }
+   end
+   
+   def test_union_attribute_assignment_basic
+      assert_nothing_raised{ @union.name = 'Daniel' }
+      assert_equal('Daniel', @union.name)
+   end
+   
+   def test_union_attribute_assignment_by_method_name
+      assert_nothing_raised{ @union.name = 'Daniel' }
+      assert_nothing_raised{ @union.age = 38 }
+      assert_nil(@union.name)
+      assert_nil(@union.height)
+      assert_equal(38, @union.age)
+   end
+   
+   def test_union_attribute_assignment_by_string_ref
+      assert_nothing_raised{ @union['name'] = 'Daniel' }
+      assert_nothing_raised{ @union['age'] = 38 }
+      assert_nil(@union['name'])
+      assert_nil(@union['height'])
+      assert_equal(38, @union['age'])
+   end
+   
+   def test_union_attribute_assignment_by_symbol_ref
+      assert_nothing_raised{ @union[:name] = 'Daniel' }
+      assert_nothing_raised{ @union[:age] = 38 }
+      assert_nil(@union[:name])
+      assert_nil(@union[:height])
+      assert_equal(38, @union[:age])
+   end         
+   
+   def teardown
+      @union = nil
+   end
+end

data/union.gemspec

@@ -0,0 +1,22 @@
+require "rubygems"
+
+spec = Gem::Specification.new do |gem|
+   gem.name      = "union"
+   gem.version   = "1.0.0"
+   gem.author    = "Daniel J. Berger"
+   gem.email     = "djberg96@gmail.com"
+   gem.homepage  = "http://www.rubyforge.org/projects/shards"
+   gem.platform  = Gem::Platform::RUBY
+   gem.summary   = "A struct-like C union for Ruby"
+   gem.test_file = "test/test_union.rb"
+   gem.has_rdoc  = true
+   gem.files = Dir['lib/*.rb'] + Dir['[A-Z]*']  + Dir['test/*']
+   gem.files.reject! { |fn| fn.include? "CVS" }
+   gem.require_path = "lib"
+   gem.extra_rdoc_files = ["README", "CHANGES", "MANIFEST"]
+end
+
+if $0 == __FILE__
+   Gem.manage_gems
+   Gem::Builder.new(spec).build
+end

metadata

@@ -0,0 +1,65 @@
+--- !ruby/object:Gem::Specification 
+name: union
+version: !ruby/object:Gem::Version 
+  version: 1.0.0
+platform: ruby
+authors: 
+- Daniel J. Berger
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-06-10 00:00:00 -06:00
+default_executable: 
+dependencies: []
+
+description: 
+email: djberg96@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README
+- CHANGES
+- MANIFEST
+files: 
+- lib/union.rb
+- CHANGES
+- CVS
+- lib
+- MANIFEST
+- Rakefile
+- README
+- test
+- union.gemspec
+- test/CVS
+- test/test_union.rb
+has_rdoc: true
+homepage: http://www.rubyforge.org/projects/shards
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.1.1
+signing_key: 
+specification_version: 2
+summary: A struct-like C union for Ruby
+test_files: 
+- test/test_union.rb