' Gambas test file

Public Sub FileReadWrite()

    Test.Plan(3)
    mFileReadWrite.RWTest()

End

Public Sub ReadUrandom()

    Test.Plan(1)
    mFileReadWrite.ReadUrandom()

End

Public Sub ReadZero()

    Test.Plan(1)
    mFileReadWrite.ReadDevZero()

End
