30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
package NT renames Natools.Tests;
procedure All_Tests (Report : in out NT.Reporter'Class);
procedure Test_Basic_Usage (Report : in out NT.Reporter'Class);
procedure Test_Exception_Fallback (Report : in out NT.Reporter'Class);
procedure Test_Local_Fallback (Report : in out NT.Reporter'Class);
procedure Test_Premanent_Fallback (Report : in out NT.Reporter'Class);
procedure Test_Unknown_Commands (Report : in out NT.Reporter'Class);
private
package Test_Interpreters is new Natools.S_Expressions.Interpreters
|
>
|
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
|
package NT renames Natools.Tests;
procedure All_Tests (Report : in out NT.Reporter'Class);
procedure Test_Basic_Usage (Report : in out NT.Reporter'Class);
procedure Test_Exception_Fallback (Report : in out NT.Reporter'Class);
procedure Test_Inspection (Report : in out NT.Reporter'Class);
procedure Test_Local_Fallback (Report : in out NT.Reporter'Class);
procedure Test_Premanent_Fallback (Report : in out NT.Reporter'Class);
procedure Test_Unknown_Commands (Report : in out NT.Reporter'Class);
private
package Test_Interpreters is new Natools.S_Expressions.Interpreters
|