Commits

Shinya Okano committed 0267ea0

Refactoring

Comments (0)

Files changed (1)

Nullpobug.UnitTest.pas

   , System.StrUtils
   , System.Generics.Collections
   , System.Rtti
+  , System.Diagnostics
   ;
 
 type
 
 implementation
 
+{ TestResult }
+constructor TTestResult.Create;
+begin
+  FResultType := rtSkip;
+  FError := nil;
+end;
+
+destructor TTestResult.Destroy;
+begin
+  FError := nil;
+  inherited Destroy;
+end;
+
 { TestCase }
 constructor TTestCase.Create;
 begin
   end;
 end;
 
-{ TestResult }
-constructor TTestResult.Create;
-begin
-  FResultType := rtSkip;
-  FError := nil;
-end;
-
-destructor TTestResult.Destroy;
-begin
-  FError := nil;
-  inherited Destroy;
-end;
-
 { TestSuite }
 constructor TTestSuite.Create;
 begin