fxruby-commits

[Lyle J. <ly...@us...>]

Update of /cvsroot/fxruby/FXRuby/tests
In directory usw-pr-cvs1:/tmp/cvs-serv14322

Added Files:
      Tag: release10
	TC_FXFileStream.rb 
Log Message:
Added a test case (TC_FXFileStream.rb) for the FXFileStream class.


--- NEW FILE: TC_FXFileStream.rb ---
require 'test/unit'

require 'fox'

include Fox

class TC_FXFileStream < Test::Unit::TestCase
  def set_up
    @filestream = FXFileStream.new
  end

  def test_container
    assert_nil(@filestream.container)
  end
  
  def test_openNonExisting
    assert_equal(FXStreamDead, @filestream.direction)
    status = @filestream.open("goobers", FXStreamLoad)
    assert(!status)
    assert_equal(FXStreamDead, @filestream.direction)
  end

  def test_openExisting
    assert_equal(FXStreamDead, @filestream.direction)
    status = @filestream.open("README", FXStreamLoad)
    assert(status)
    assert_equal(FXStreamLoad, @filestream.direction)
    status = @filestream.close
    assert(status)
    assert_equal(FXStreamDead, @filestream.direction)
  end

  def test_openNew
    assert_equal(FXStreamDead, @filestream.direction)
    status = @filestream.open("goobers", FXStreamSave)
    assert(status)
    assert_equal(FXStreamSave, @filestream.direction)
    status = @filestream.close
    assert(status)
    assert_equal(FXStreamDead, @filestream.direction)
    File.delete("goobers")
  end
  
  def test_status
    assert_equal(FXStreamOK, @filestream.status)
    @filestream.open("README", FXStreamLoad)
    assert_equal(FXStreamOK, @filestream.status)
    @filestream.close
    assert_equal(FXStreamOK, @filestream.status)
  end
  
  def test_position
    @filestream.open("README", FXStreamLoad)
    assert_equal(0, @filestream.position)
    @filestream.position = 500
    assert_equal(500, @filestream.position)
    @filestream.close
  end
end