map 0.0.1

data/Rakefile

@@ -0,0 +1,371 @@
+This.rubyforge_project = 'codeforpeople'
+This.author = "Ara T. Howard"
+This.email = "ara.t.howard@gmail.com"
+This.homepage = "http://github.com/ahoward/#{ This.lib }/tree/master"
+
+
+task :default do
+  puts((Rake::Task.tasks.map{|task| task.name.gsub(/::/,':')} - ['default']).sort)
+end
+
+task :test do
+  run_tests!
+end
+
+namespace :test do
+  task(:unit){ run_tests!(:unit) }
+  task(:functional){ run_tests!(:functional) }
+  task(:integration){ run_tests!(:integration) }
+end
+
+def run_tests!(which = nil)
+  which ||= '**'
+  test_dir = File.join(This.dir, "test")
+  test_glob ||= File.join(test_dir, "#{ which }/**_test.rb")
+  test_rbs = Dir.glob(test_glob).sort
+        
+  div = ('=' * 119)
+  line = ('-' * 119)
+  helper = "-r ./test/helper.rb" if test(?e, "./test/helper.rb")
+
+  test_rbs.each_with_index do |test_rb, index|
+    testno = index + 1
+    command = "#{ This.ruby } -I ./lib -I ./test/lib #{ helper } #{ test_rb }"
+
+    puts
+    say(div, :color => :cyan, :bold => true)
+    say("@#{ testno } => ", :bold => true, :method => :print)
+    say(command, :color => :cyan, :bold => true)
+    say(line, :color => :cyan, :bold => true)
+
+    system(command)
+
+    say(line, :color => :cyan, :bold => true)
+
+    status = $?.exitstatus
+
+    if status.zero? 
+      say("@#{ testno } <= ", :bold => true, :color => :white, :method => :print)
+      say("SUCCESS", :color => :green, :bold => true)
+    else
+      say("@#{ testno } <= ", :bold => true, :color => :white, :method => :print)
+      say("FAILURE", :color => :red, :bold => true)
+    end
+    say(line, :color => :cyan, :bold => true)
+
+    exit(status) unless status.zero?
+  end
+end
+
+
+task :gemspec do
+  ignore_extensions = 'git', 'svn', 'tmp', /sw./, 'bak', 'gem'
+  ignore_directories = 'pkg'
+  ignore_files = 'test/log'
+
+  shiteless = 
+    lambda do |list|
+      list.delete_if do |entry|
+        next unless test(?e, entry)
+        extension = File.basename(entry).split(%r/[.]/).last
+        ignore_extensions.any?{|ext| ext === extension}
+      end
+      list.delete_if do |entry|
+        next unless test(?d, entry)
+        dirname = File.expand_path(entry)
+        ignore_directories.any?{|dir| File.expand_path(dir) == dirname}
+      end
+      list.delete_if do |entry|
+        next unless test(?f, entry)
+        filename = File.expand_path(entry)
+        ignore_files.any?{|file| File.expand_path(file) == filename}
+      end
+    end
+
+  lib         = This.lib
+  object      = This.object
+  version     = This.version
+  files       = shiteless[Dir::glob("**/**")]
+  executables = shiteless[Dir::glob("bin/*")].map{|exe| File.basename(exe)}
+  has_rdoc    = true #File.exist?('doc')
+  test_files  = "test/#{ lib }.rb" if File.file?("test/#{ lib }.rb")
+  summary     = object.respond_to?(:summary) ? object.summary : "summary: #{ lib } kicks the ass"
+  description = object.respond_to?(:description) ? object.description : "description: #{ lib } kicks the ass"
+
+  if This.extensions.nil?
+    This.extensions = []
+    extensions = This.extensions
+    %w( Makefile configure extconf.rb ).each do |ext|
+      extensions << ext if File.exists?(ext)
+    end
+  end
+  extensions = [extensions].flatten.compact
+
+  template = 
+    if test(?e, 'gemspec.erb')
+      Template{ IO.read('gemspec.erb') }
+    else
+      Template {
+        <<-__
+          ## #{ lib }.gemspec
+          #
+
+          Gem::Specification::new do |spec|
+            spec.name = #{ lib.inspect }
+            spec.version = #{ version.inspect }
+            spec.platform = Gem::Platform::RUBY
+            spec.summary = #{ lib.inspect }
+            spec.description = #{ description.inspect }
+
+            spec.files = #{ files.inspect }
+            spec.executables = #{ executables.inspect }
+            
+            spec.require_path = "lib"
+
+            spec.has_rdoc = #{ has_rdoc.inspect }
+            spec.test_files = #{ test_files.inspect }
+            #spec.add_dependency 'lib', '>= version'
+            #spec.add_dependency 'fattr'
+
+            spec.extensions.push(*#{ extensions.inspect })
+
+            spec.rubyforge_project = #{ This.rubyforge_project.inspect }
+            spec.author = #{ This.author.inspect }
+            spec.email = #{ This.email.inspect }
+            spec.homepage = #{ This.homepage.inspect }
+          end
+        __
+      }
+    end
+
+  Fu.mkdir_p(This.pkgdir)
+  gemspec = File.join(This.pkgdir, "#{ lib }.gemspec")
+  open(gemspec, "w"){|fd| fd.puts(template)}
+  This.gemspec = gemspec
+end
+
+task :gem => [:clean, :gemspec] do
+  Fu.mkdir_p(This.pkgdir)
+  before = Dir['*.gem']
+  cmd = "gem build #{ This.gemspec }"
+  `#{ cmd }`
+  after = Dir['*.gem']
+  gem = ((after - before).first || after.first) or abort('no gem!')
+  Fu.mv(gem, This.pkgdir)
+  This.gem = File.join(This.pkgdir, File.basename(gem))
+end
+
+task :readme do
+  samples = ''
+  prompt = '~ > '
+  lib = This.lib
+  version = This.version
+
+  Dir['sample*/*'].sort.each do |sample|
+    samples << "\n" << "  <========< #{ sample } >========>" << "\n\n"
+
+    cmd = "cat #{ sample }"
+    samples << Util.indent(prompt + cmd, 2) << "\n\n"
+    samples << Util.indent(`#{ cmd }`, 4) << "\n"
+
+    cmd = "ruby #{ sample }"
+    samples << Util.indent(prompt + cmd, 2) << "\n\n"
+
+    cmd = "ruby -e'STDOUT.sync=true; exec %(ruby -I ./lib #{ sample })'"
+    samples << Util.indent(`#{ cmd } 2>&1`, 4) << "\n"
+  end
+
+  template = 
+    if test(?e, 'readme.erb')
+      Template{ IO.read('readme.erb') }
+    else
+      Template {
+        <<-__
+          NAME
+            #{ lib }
+
+          DESCRIPTION
+
+          INSTALL
+            gem install #{ lib }
+
+          SAMPLES
+            #{ samples }
+        __
+      }
+    end
+
+  open("README", "w"){|fd| fd.puts template}
+end
+
+
+task :clean do
+  Dir[File.join(This.pkgdir, '**/**')].each{|entry| Fu.rm_rf(entry)}
+end
+
+
+task :release => [:clean, :gemspec, :gem] do
+  gems = Dir[File.join(This.pkgdir, '*.gem')].flatten
+  raise "which one? : #{ gems.inspect }" if gems.size > 1
+  raise "no gems?" if gems.size < 1
+
+  cmd = "gem push #{ This.gem }"
+  puts cmd
+  puts
+  system(cmd)
+  abort("cmd(#{ cmd }) failed with (#{ $?.inspect })") unless $?.exitstatus.zero?
+
+  cmd = "rubyforge login && rubyforge add_release #{ This.rubyforge_project } #{ This.lib } #{ This.version } #{ This.gem }"
+  puts cmd
+  puts
+  system(cmd)
+  abort("cmd(#{ cmd }) failed with (#{ $?.inspect })") unless $?.exitstatus.zero?
+end
+
+
+
+
+
+BEGIN {
+# support for this rakefile
+#
+  $VERBOSE = nil
+
+  require 'ostruct'
+  require 'erb'
+  require 'fileutils'
+  require 'rbconfig'
+
+# fu shortcut
+#
+  Fu = FileUtils
+
+# cache a bunch of stuff about this rakefile/environment
+#
+  This = OpenStruct.new
+
+  This.file = File.expand_path(__FILE__)
+  This.dir = File.dirname(This.file)
+  This.pkgdir = File.join(This.dir, 'pkg')
+
+# grok lib
+#
+  lib = ENV['LIB']
+  unless lib
+    lib = File.basename(Dir.pwd).sub(/[-].*$/, '')
+  end
+  This.lib = lib
+
+# grok version
+#
+  version = ENV['VERSION']
+  unless version
+    require "./lib/#{ This.lib }"
+    This.name = lib.capitalize
+    This.object = eval(This.name)
+    version = This.object.send(:version)
+  end
+  This.version = version
+
+# we need to know the name of the lib an it's version
+#
+  abort('no lib') unless This.lib
+  abort('no version') unless This.version
+
+# discover full path to this ruby executable
+#
+  c = Config::CONFIG
+  bindir = c["bindir"] || c['BINDIR']
+  ruby_install_name = c['ruby_install_name'] || c['RUBY_INSTALL_NAME'] || 'ruby'
+  ruby_ext = c['EXEEXT'] || ''
+  ruby = File.join(bindir, (ruby_install_name + ruby_ext))
+  This.ruby = ruby
+
+# some utils
+#
+  module Util
+    def indent(s, n = 2)
+      s = unindent(s)
+      ws = ' ' * n
+      s.gsub(%r/^/, ws)
+    end
+
+    def unindent(s)
+      indent = nil
+      s.each do |line|
+      next if line =~ %r/^\s*$/
+      indent = line[%r/^\s*/] and break
+    end
+    indent ? s.gsub(%r/^#{ indent }/, "") : s
+  end
+    extend self
+  end
+
+# template support
+#
+  class Template
+    def initialize(&block)
+      @block = block
+      @template = block.call.to_s
+    end
+    def expand(b=nil)
+      ERB.new(Util.unindent(@template)).result(b||@block)
+    end
+    alias_method 'to_s', 'expand'
+  end
+  def Template(*args, &block) Template.new(*args, &block) end
+
+# colored console output support
+#
+  This.ansi = {
+    :clear      => "\e[0m",
+    :reset      => "\e[0m",
+    :erase_line => "\e[K",
+    :erase_char => "\e[P",
+    :bold       => "\e[1m",
+    :dark       => "\e[2m",
+    :underline  => "\e[4m",
+    :underscore => "\e[4m",
+    :blink      => "\e[5m",
+    :reverse    => "\e[7m",
+    :concealed  => "\e[8m",
+    :black      => "\e[30m",
+    :red        => "\e[31m",
+    :green      => "\e[32m",
+    :yellow     => "\e[33m",
+    :blue       => "\e[34m",
+    :magenta    => "\e[35m",
+    :cyan       => "\e[36m",
+    :white      => "\e[37m",
+    :on_black   => "\e[40m",
+    :on_red     => "\e[41m",
+    :on_green   => "\e[42m",
+    :on_yellow  => "\e[43m",
+    :on_blue    => "\e[44m",
+    :on_magenta => "\e[45m",
+    :on_cyan    => "\e[46m",
+    :on_white   => "\e[47m"
+  }
+  def say(phrase, *args)
+    options = args.last.is_a?(Hash) ? args.pop : {}
+    options[:color] = args.shift.to_s.to_sym unless args.empty?
+    keys = options.keys
+    keys.each{|key| options[key.to_s.to_sym] = options.delete(key)}
+
+    color = options[:color]
+    bold = options.has_key?(:bold)
+
+    parts = [phrase]
+    parts.unshift(This.ansi[color]) if color
+    parts.unshift(This.ansi[:bold]) if bold
+    parts.push(This.ansi[:clear]) if parts.size > 1
+
+    method = options[:method] || :puts
+
+    Kernel.send(method, parts.join)
+  end
+
+# always run out of the project dir
+#
+  Dir.chdir(This.dir)
+}

data/lib/map.rb

@@ -0,0 +1,396 @@
+class Map < Hash
+  Version = '0.0.1' unless defined?(Version)
+  Load = Kernel.method(:load) unless defined?(Load)
+
+  class << Map
+    def version
+      Map::Version
+    end
+
+  # class constructor 
+  #
+    def new(*args, &block)
+      map = super(&block)
+
+      case args.size
+        when 0
+          return map
+
+        when 1
+          case arg = args.first
+            when Hash
+              new_from_hash(arg, map)
+            when Array
+              new_from_array(arg, map)
+            else
+              new_from_hash(arg.to_hash, map)
+          end
+
+        else
+          new_from_array(args, map)
+      end
+
+      map
+    end
+
+    def new_from_hash(hash, map = new)
+      map.update(hash)
+      map
+    end
+
+    def new_from_array(array, map = new)
+      each_pair(array){|key, val| map[key] = val}
+      map
+    end
+
+  # iterate over arguments in pairs smartly.
+  #
+    def each_pair(*args)
+      size = args.size
+      parity = size % 2 == 0 ? :even : :odd
+      first = args.first
+
+      return args if size == 0
+
+      if size == 1 and first.respond_to?(:each_pair)
+        first.each_pair do |key, val|
+          yield(key, val)
+        end
+        return args
+      end
+
+      if size == 1 and first.respond_to?(:each_slice)
+        first.each_slice(2) do |key, val|
+          yield(key, val)
+        end
+        return args
+      end
+
+      array_of_pairs = args.all?{|a| a.is_a?(Array) and a.size == 2}
+
+      if array_of_pairs
+        args.each do |pair|
+          key, val, *ignored = pair
+          yield(key, val)
+        end
+      else
+        0.step(args.size - 1, 2) do |a|
+          key = args[a]
+          val = args[a + 1]
+          yield(key, val)
+        end
+      end
+
+      args
+    end
+
+    alias_method '[]', 'new'
+  end
+
+
+# instance constructor 
+#
+  attr_accessor :keys
+
+  def initialize(*args, &block)
+    super
+    @keys = []
+  end
+
+# support methods
+#
+  def map
+    self
+  end
+
+  def map_for(hash)
+    map = Map.new(hash)
+    map.default = hash.default
+    map
+  end
+
+  def convert_key(key)
+    key.kind_of?(Symbol) ? key.to_s : key
+  end
+
+  def convert_val(val)
+    case val
+      when Hash
+        map_for(val)
+      when Array
+        val.collect{|v| Hash === v ? map_for(v) : v}
+      else
+        val
+    end
+  end
+
+  def convert(key, val)
+    [convert_key(key), convert_val(val)]
+  end
+
+# maps are aggressive with copy operations.  they are all deep copies.  make a
+# new one if you really want a shallow copy
+#
+  def copy
+    default = self.default
+    self.default = nil
+    copy = Marshal.load(Marshal.dump(self))
+    copy.default = default
+    copy
+  ensure
+    self.default = default
+  end
+
+  def dup
+    copy
+  end
+
+  def clone
+    copy
+  end
+
+  def default(key = nil)
+    key.is_a?(Symbol) && include?(key = key.to_s) ? self[key] : super
+  end
+
+# writer/reader methods
+#
+  alias_method '__set__', '[]=' unless method_defined?('__set__')
+  alias_method '__get__', '[]' unless method_defined?('__get__')
+  alias_method '__update__', 'update' unless method_defined?('__update__')
+
+  def set(key, val)
+    key, val = convert(key, val)
+    @keys.push(key) unless has_key?(key)
+    __set__(key, val)
+  end
+  alias_method 'store', 'set'
+  alias_method '[]=', 'set'
+
+  def get(key)
+    __get__(key)
+  end
+  alias_method '[]', 'get'
+
+  def fetch(key, *args, &block)
+    super(convert_key(key), *args, &block)
+  end
+
+  def key?(key)
+    super(convert_key(key))
+  end
+  alias_method 'include?', 'key?'
+  alias_method 'has_key?', 'key?'
+  alias_method 'member?', 'key?'
+
+  def update(*args)
+    Map.each_pair(*args) do |key, val|
+      set(key, val)
+    end
+    self
+  end
+  alias_method 'merge!', 'update'
+
+  def merge(*args)
+    copy.update(*args)
+  end
+
+  def reverse_merge(hash)
+    map = copy
+    hash.each{|key, val| map[key] = val unless map.key?(key)}
+    map
+  end
+
+  def reverse_merge!(hash)
+    replace(reverse_merge(hash))
+  end
+
+  def values
+    array = []
+    @keys.each{|key| array.push(self[key])}
+    array
+  end
+  alias_method 'vals', 'values'
+
+  def values_at(*keys)
+    keys.map{|key| self[key]}
+  end
+
+  def first
+    [@keys.first, self[@keys.first]]
+  end
+
+  def last
+    [@keys.last, self[@keys.last]]
+  end
+
+# iterator methods
+#
+  def each_with_index
+    @keys.each_with_index{|key, index| yield([key, self[key]], index)}
+    self
+  end
+
+  def each_key
+    @keys.each{|key| yield(key)}
+    self
+  end
+
+  def each_value
+    @keys.each{|key| yield self[key]}
+    self
+  end
+
+  def each
+    @keys.each{|key| yield(key, self[key])}
+    self
+  end
+  alias_method 'each_pair', 'each'
+
+# mutators
+#
+  def delete(key)
+    key = convert_key(key)
+    @keys.delete(key)
+    super(key)
+  end
+
+  def clear
+    @keys = []
+    super
+  end
+
+  def delete_if
+    to_delete = []
+    @keys.each{|key| to_delete.push(key) if yield(key)}
+    to_delete.each{|key| delete(key)}
+    map
+  end
+
+  def replace(hash)
+    clear
+    update(hash)
+  end
+
+# ordered container specific methods
+#
+  def shift
+    unless empty?
+      key = @keys.first
+      val = delete(key)
+      [key, val]
+    end
+  end
+
+  def unshift(*args)
+    Map.each_pair(*args) do |key, val|
+      if key?(key)
+        delete(key)
+      else
+        @keys.unshift(key)
+      end
+      __set__(key, val)
+    end
+    self
+  end
+
+  def push(*args)
+    Map.each_pair(*args) do |key, val|
+      if key?(key)
+        delete(key)
+      else
+        @keys.push(key)
+      end
+      __set__(key, val)
+    end
+    self
+  end
+
+  def pop
+    unless empty?
+      key = @keys.last
+      val = delete(key)
+      [key, val]
+    end
+  end
+
+# misc
+#
+  def ==(hash)
+    return false if @keys != hash.keys
+    super hash
+  end
+
+  def invert
+    inverted = Map.new
+    inverted.default = self.default
+    @keys.each{|key| inverted[self[key]] = key }
+    inverted
+  end
+
+  def reject(&block)
+    dup.delete_if(&block)
+  end
+
+  def reject!(&block)
+    hash = reject(&block)
+    self == hash ? nil : hash
+  end
+
+  def select
+    array = []
+    each{|key, val| array << [key,val] if yield(key, val)}
+    array
+  end
+
+  def inspect
+    array = []
+    each{|key, val| array << (key.inspect + "=>" + val.inspect)}
+    string = '{' + array.join(", ") + '}'
+  end
+
+# converions
+#
+  def to_hash
+    hash = Hash.new(default)
+    each do |key, val|
+      val = val.to_hash if val.respond_to?(:to_hash)
+      hash[key] = val
+    end
+    hash
+  end
+
+  def to_yaml(*args, &block)
+    to_hash.to_yaml(*args, &block)
+  end
+
+  def to_array
+    array = []
+    each{|*pair| array.push(pair)}
+    array
+  end
+  alias_method 'to_a', 'to_array'
+
+  def to_s
+    to_array.to_s
+  end
+
+  def stringify_keys!; self end
+  def symbolize_keys!; self end
+  def to_options!; self end
+
+  def class
+    Hash
+  end
+
+  def __class__
+    Map
+  end
+end
+
+module Kernel
+private
+  def Map(*args, &block)
+    Map.new(*args, &block)
+  end
+end

data/test/lib/testing.rb

@@ -0,0 +1,68 @@
+# simple testing support
+#
+  require 'test/unit'
+
+  def Testing(*args, &block)
+    Class.new(Test::Unit::TestCase) do
+      def self.slug_for(*args)
+        string = args.flatten.compact.join('-')
+        words = string.to_s.scan(%r/\w+/)
+        words.map!{|word| word.gsub %r/[^0-9a-zA-Z_-]/, ''}
+        words.delete_if{|word| word.nil? or word.strip.empty?}
+        words.join('-').downcase
+      end
+
+      @@testing_subclass_count = 0 unless defined?(@@testing_subclass_count) 
+      @@testing_subclass_count += 1
+      slug = slug_for(*args).gsub(%r/-/,'_')
+      name = ['TESTING', '%03d' % @@testing_subclass_count, slug].delete_if{|part| part.empty?}.join('_')
+      name = name.upcase!
+      const_set(:Name, name)
+      def self.name() const_get(:Name) end
+
+      def self.testno()
+        '%05d' % (@testno ||= 0)
+      ensure
+        @testno += 1
+      end
+
+      def self.testing(*args, &block)
+        method = ["test", testno, slug_for(*args)].delete_if{|part| part.empty?}.join('_')
+        define_method("test_#{ testno }_#{ slug_for(*args) }", &block)
+      end
+
+      alias_method '__assert__', 'assert'
+
+      def assert(*args, &block)
+        if block
+          label = "assert(#{ args.join ' ' })"
+          result = nil
+          assert_nothing_raised{ result = block.call }
+          __assert__(result, label)
+          result
+        else
+          result = args.shift
+          label = "assert(#{ args.join ' ' })"
+          __assert__(result, label)
+          result
+        end
+      end
+
+      def subclass_of exception
+        class << exception
+          def ==(other) super or self > other end
+        end
+        exception
+      end
+
+      alias_method '__assert_raises__', 'assert_raises'
+
+      def assert_raises(*args, &block)
+        args.push(subclass_of(Exception)) if args.empty?
+        __assert_raises__(*args, &block)
+      end
+
+      module_eval &block
+      self
+    end
+  end

data/test/map.rb

@@ -0,0 +1,157 @@
+require 'testing'
+require 'map'
+
+Testing Map do
+  testing 'that bare constructor werks' do
+    assert{ Map.new }
+  end
+
+  testing 'that the contructor accepts a hash' do
+    assert{ Map.new(hash = {}) }
+  end
+
+  testing 'that the constructor accepts the empty array' do
+    array = []
+    assert{ Map.new(array) }
+    assert{ Map.new(*array) }
+  end
+
+  testing 'that the contructor accepts an even sized array' do
+    arrays = [
+      [ %w( k v ), %w( key val ) ],
+      [ %w( k v ), %w( key val ), %w( a b ) ],
+      [ %w( k v ), %w( key val ), %w( a b ), %w( x y ) ]
+    ]
+    arrays.each do |array|
+      assert{ Map.new(array) }
+      assert{ Map.new(*array) }
+    end
+  end
+
+  testing 'that the contructor accepts an odd sized array' do
+    arrays = [
+      [ %w( k v ) ],
+      [ %w( k v ), %w( key val ), %w( a b ) ]
+    ]
+    arrays.each do |array|
+      assert{ Map.new(array) }
+      assert{ Map.new(*array) }
+    end
+  end
+
+  testing 'that the constructor accepts arrays of pairs' do
+    arrays = [
+      [],
+      [ %w( k v ) ],
+      [ %w( k v ), %w( key val ) ],
+      [ %w( k v ), %w( key val ), %w( a b ) ]
+    ]
+    arrays.each do |array|
+      assert{ Map.new(array) }
+      assert{ Map.new(*array) }
+    end
+  end
+
+  testing 'that "[]" is a synonym for "new"' do
+    list = [
+      [],
+      [{}],
+      [[:key, :val]],
+      [:key, :val]
+    ]
+    list.each do |args|
+      map = assert{ Map[*args] }
+      assert{ map.is_a?(Map) }
+      assert{ Map.new(*args) == map }
+    end
+  end
+
+  testing 'that #each yields pairs in order' do
+    map = new_int_map
+    i = 0
+    map.each do |key, val|
+      assert{ key == i.to_s }
+      assert{ val == i }
+      i += 1
+    end
+  end
+
+  testing 'that keys and values are ordered' do
+    n = 2048
+    map = new_int_map(n)
+    values = Array.new(n){|i| i}
+    keys = values.map{|value| value.to_s}
+    assert{ map.keys.size == n }
+    assert{ map.keys == keys}
+    assert{ map.values == values}
+  end
+
+  testing 'that maps are string/symbol indifferent for simple look-ups' do
+    map = Map.new
+    map[:k] = :v
+    map['a'] = 'b'
+    assert{ map[:k] == :v }
+    assert{ map[:k.to_s] == :v }
+    assert{ map[:a] == 'b' }
+    assert{ map[:a.to_s] == 'b' }
+  end
+
+  testing 'that maps are string/symbol indifferent for recursive look-ups' do
+    map = Map.new
+    assert{ map[:a] = Map[:b, 42] }
+    assert{ map[:a][:b] = Map[:c, 42] }
+    assert{ map[:a][:b][:c] == 42 }
+    assert{ map['a'][:b][:c] == 42 }
+    assert{ map['a']['b'][:c] == 42 }
+    assert{ map['a']['b']['c'] == 42 }
+    assert{ map[:a]['b'][:c] == 42 }
+    assert{ map[:a]['b']['c'] == 42 }
+    assert{ map[:a][:b]['c'] == 42 }
+    assert{ map['a'][:b]['c'] == 42 }
+  end
+
+  testing 'that maps support shift like a good ordered container' do
+    map = Map.new
+    10.times do |i|
+      key, val = i.to_s, i
+      assert{ map.unshift(key, val) }
+      assert{ map[key] == val }
+      assert{ map.keys.first.to_s == key.to_s}
+      assert{ map.values.first.to_s == val.to_s}
+    end
+
+    map = Map.new
+    args = []
+    10.times do |i|
+      key, val = i.to_s, i
+      args.unshift([key, val])
+    end
+    map.unshift(*args)
+    10.times do |i|
+      key, val = i.to_s, i
+      assert{ map[key] == val }
+      assert{ map.keys[i].to_s == key.to_s}
+      assert{ map.values[i].to_s == val.to_s}
+    end
+  end
+
+protected
+  def new_int_map(n = 1024)
+    map = Map.new
+    n.times{|i| map[i.to_s] = i}
+    map
+  end
+end
+
+
+
+
+BEGIN {
+  testdir = File.dirname(File.expand_path(__FILE__))
+  testlibdir = File.join(testdir, 'lib')
+  rootdir = File.dirname(testdir)
+  libdir = File.join(rootdir, 'lib')
+
+  $LOAD_PATH.push(libdir)
+  $LOAD_PATH.push(testlibdir)
+}

metadata

@@ -0,0 +1,70 @@
+--- !ruby/object:Gem::Specification 
+name: map
+version: !ruby/object:Gem::Version 
+  hash: 29
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Ara T. Howard
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-10-03 00:00:00 -06:00
+default_executable: 
+dependencies: []
+
+description: "description: map kicks the ass"
+email: ara.t.howard@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- lib/map.rb
+- Rakefile
+- test/lib/testing.rb
+- test/map.rb
+has_rdoc: true
+homepage: http://github.com/ahoward/map/tree/master
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: codeforpeople
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: map
+test_files: 
+- test/map.rb