just a quick test of Io's unit testing facility

MyFirstTest.io

MyFirstTest := UnitTest clone do(
    setUp := method(
        // setting up
    )

    tearDown := method(
        // tearing down
    )

    test_01 := method(
        assertTrue("日本語" at(2) asCharacter == "語")
    )

    test_02 := method(
        assertTrue(4 * 2 == 7)
    )
)

/* OUTPUT

myself@nrkdeb:~/misc$ io runtest.io
    test_02 - failed

  Exception: [4 *(2) ==(7) != true] [false != true]
  ---------
  Exception raise                      UnitTest.io 66
  MyFirstTest assertTrue               MyFirstTest.io 15
  MyFirstTest assertEquals             UnitTest.io 76
  MyFirstTest test_02                  doString 1

false

*/

runtest.io

// runtest.io

TestSuite clone setPath(System launchPath) run