class RGSSConvertToArray

  def initialize
    @elements = []
  end

  ## Modified from ruby source
  def convertToArray(element, copy = false)
    @elements = element
    case @elements
    when Array
      copy ? @elements.dup : @elements
    else
      begin
        converted = @elements.to_ary
      rescue Exception => e
        raise "Cannot convert #{@elements.class} into an Array (#{e.message})"
      end
      raise "This object should return an array" unless converted.is_a? Array
      converted
    end
  end

  private :convertToArray ##I can still access convertToArray

  def convertVectorToArray(vector)
    @elem = Array.new
    for n in vector
      @elem.push(n)
    end
    convertToArray(@elem)
  end

end


## Now we test:

class TestConvertToArray < Test::Unit::TestCase

  def setup
    @c = RGSSConvertToArray.new
    @v = RGSSVector.new
  end

  def teardown
      @v.delete?
  end

  def test_conversion
    array = [1,2]
    assert_equal([1, 2], @c.convertToArray(array))
  end

  def test_convertVectorToArray
    @v.add(10)
    assert_equal([10], @c.convertVectorToArray(@v))
  end

end

=begin

Out put:

Loaded suite /home/adam/Documents/RGSS2/Test Suites/TestConvertToArray
Started
..
Finished in 0.003398 seconds.

2 tests, 2 assertions, 0 failures, 0 errors


-- Test should have 1 error or failure.....??

=end