ADDED tests/natools-s_expressions-conditionals-tests.adb Index: tests/natools-s_expressions-conditionals-tests.adb ================================================================== --- tests/natools-s_expressions-conditionals-tests.adb +++ tests/natools-s_expressions-conditionals-tests.adb @@ -0,0 +1,28 @@ +------------------------------------------------------------------------------ +-- Copyright (c) 2015, Natacha Porté -- +-- -- +-- Permission to use, copy, modify, and distribute this software for any -- +-- purpose with or without fee is hereby granted, provided that the above -- +-- copyright notice and this permission notice appear in all copies. -- +-- -- +-- THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES -- +-- WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF -- +-- MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR -- +-- ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES -- +-- WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN -- +-- ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF -- +-- OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. -- +------------------------------------------------------------------------------ + +with Natools.S_Expressions.Conditionals.Strings.Tests; + +package body Natools.S_Expressions.Conditionals.Tests is + + procedure All_Tests (Report : in out NT.Reporter'Class) is + begin + Report.Section ("Conditionals on strings"); + Strings.Tests.All_Tests (Report); + Report.End_Section; + end All_Tests; + +end Natools.S_Expressions.Conditionals.Tests; ADDED tests/natools-s_expressions-conditionals-tests.ads Index: tests/natools-s_expressions-conditionals-tests.ads ================================================================== --- tests/natools-s_expressions-conditionals-tests.ads +++ tests/natools-s_expressions-conditionals-tests.ads @@ -0,0 +1,30 @@ +------------------------------------------------------------------------------ +-- Copyright (c) 2015, Natacha Porté -- +-- -- +-- Permission to use, copy, modify, and distribute this software for any -- +-- purpose with or without fee is hereby granted, provided that the above -- +-- copyright notice and this permission notice appear in all copies. -- +-- -- +-- THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES -- +-- WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF -- +-- MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR -- +-- ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES -- +-- WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN -- +-- ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF -- +-- OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. -- +------------------------------------------------------------------------------ + +------------------------------------------------------------------------------ +-- Natools.S_Expressions.Conditionals.Tests gathers the test suite of all -- +-- conditional children packages. -- +------------------------------------------------------------------------------ + +with Natools.Tests; + +package Natools.S_Expressions.Conditionals.Tests is + + package NT renames Natools.Tests; + + procedure All_Tests (Report : in out NT.Reporter'Class); + +end Natools.S_Expressions.Conditionals.Tests; Index: tests/test_all.adb ================================================================== --- tests/test_all.adb +++ tests/test_all.adb @@ -27,10 +27,11 @@ with Natools.HMAC_Tests; with Natools.Reference_Tests; with Natools.Reference_Tests.Pools; with Natools.S_Expressions.Atom_Buffers.Tests; with Natools.S_Expressions.Cache_Tests; +with Natools.S_Expressions.Conditionals.Tests; with Natools.S_Expressions.Dynamic_Interpreter_Tests; with Natools.S_Expressions.Encodings.Tests; with Natools.S_Expressions.File_RW_Tests; with Natools.S_Expressions.Interpreter_Tests; with Natools.S_Expressions.Lockable.Tests; @@ -110,10 +111,14 @@ Report.End_Section; Report.Section ("S_Expressions.Caches"); Natools.S_Expressions.Cache_Tests.All_Tests (Report); Report.End_Section; + + Report.Section ("S_Expressions.Conditionals"); + Natools.S_Expressions.Conditionals.Tests.All_Tests (Report); + Report.End_Section; Report.Section ("S_Expressions.Dynamic_Interpreters"); Natools.S_Expressions.Dynamic_Interpreter_Tests.All_Tests (Report); Report.End_Section;