#  _____         _
# |_   _|__  ___| |_
#   | |/ _ \/ __| __|
#   | |  __/\__ \ |_
#   |_|\___||___/\__|
#
# for lib/facets/core/array/first.rb
#
# Extracted Thu May 04 17:46:31 EDT 2006
# Unit Tools Reap Test Extractor
#

require 'facets/core/array/first.rb'


  require 'test/unit'

  class TCArray < Test::Unit::TestCase

    def test_first_eq
      a = [1,2]
      a.first = 0
      assert_equal( [0,2], a )
    end

    def test_first!
      a = [1,2,3]
      assert_equal( 1, a.first! )
      assert_equal( [2,3], a )
    end

    def test_last_eq
      a = [1,2]
      a.last = 3
      assert_equal( [1,3], a )
    end

    def test_last!
      a = [1,2,3]
      assert_equal( 3, a.last! )
      assert_equal( [1,2], a )
    end

  end