mirror of
https://github.com/AdaCore/xmlada.git
synced 2026-02-12 12:30:28 -08:00
63b47c6599
Move all the */test/ directories to tests/* Move all tests that potentially contain customer code or data to tests/adacore These will be moved to a separate git repository Part of O527-038 git-svn-id: svn+ssh://svn.eu.adacore.com/Dev/trunk/xmlada@240170 936e1b1b-40f2-da11-902a-00137254ae57
39 lines
1.0 KiB
Ada
39 lines
1.0 KiB
Ada
with Ada.Strings.Unbounded; use Ada.Strings.Unbounded;
|
|
with DOM.Core; use DOM.Core;
|
|
|
|
package Driver is
|
|
procedure Assert_Equals
|
|
(Expected : DOM_String;
|
|
Actual : DOM_String;
|
|
Ignore_Case : Boolean;
|
|
File : String;
|
|
Id : String);
|
|
procedure Assert_Equals
|
|
(Expected : DOM_String;
|
|
Actual : Unbounded_String;
|
|
Ignore_Case : Boolean;
|
|
File : String;
|
|
Id : String);
|
|
procedure Assert_Null
|
|
(Actual : Node;
|
|
File : String;
|
|
Id : String);
|
|
procedure Assert_Not_Null
|
|
(Actual : Node;
|
|
File : String;
|
|
Id : String);
|
|
procedure Assert_Not_Null
|
|
(Actual : Named_Node_Map;
|
|
File : String;
|
|
Id : String);
|
|
procedure Assert_False
|
|
(Actual : Boolean;
|
|
File : String;
|
|
Id : String);
|
|
procedure Assert_True
|
|
(Actual : Boolean;
|
|
File : String;
|
|
Id : String);
|
|
|
|
end Driver;
|