42 lines
865 B
ActionScript
Executable File
42 lines
865 B
ActionScript
Executable File
/**
|
|
* TestCase
|
|
*
|
|
* Embryonic unit test support class.
|
|
* Copyright (c) 2007 Henri Torgemane
|
|
*
|
|
* See LICENSE.txt for full license information.
|
|
*/
|
|
package com.hurlant.crypto.tests
|
|
{
|
|
public class TestCase
|
|
{
|
|
public var harness:ITestHarness;
|
|
|
|
public function TestCase(h:ITestHarness, title:String) {
|
|
harness = h;
|
|
harness.beginTestCase(title);
|
|
}
|
|
|
|
|
|
public function assert(msg:String, value:Boolean):void {
|
|
if (value) {
|
|
// TestHarness.print("+ ",msg);
|
|
return;
|
|
}
|
|
throw new Error("Test Failure:"+msg);
|
|
}
|
|
|
|
public function runTest(f:Function, title:String):void {
|
|
harness.beginTest(title);
|
|
try {
|
|
f();
|
|
} catch (e:Error) {
|
|
trace("EXCEPTION THROWN: "+e);
|
|
trace(e.getStackTrace());
|
|
harness.failTest(e.toString());
|
|
return;
|
|
}
|
|
harness.passTest();
|
|
}
|
|
}
|
|
} |