Index: tests/natools-chunked_strings-tests.adb ================================================================== --- tests/natools-chunked_strings-tests.adb +++ tests/natools-chunked_strings-tests.adb @@ -17,10 +17,11 @@ with Natools.Chunked_Strings.Tests.CXA4010; with Natools.Chunked_Strings.Tests.CXA4011; with Natools.Chunked_Strings.Tests.CXA4030; with Natools.Chunked_Strings.Tests.CXA4031; with Natools.Chunked_Strings.Tests.CXA4032; +with Natools.Accumulators.Tests; package body Natools.Chunked_Strings.Tests is package NT renames Natools.Tests; procedure All_Blackbox_Tests (Report : in out Natools.Tests.Reporter'Class) @@ -35,10 +36,18 @@ Test_CXA4010 (Report); Test_CXA4011 (Report); Test_CXA4030 (Report); Test_CXA4031 (Report); Test_CXA4032 (Report); + + NT.Section (Report, "String_Accumulator interface"); + declare + Acc : Chunked_String; + begin + Accumulators.Tests.Test (Report, Acc); + end; + NT.End_Section (Report); NT.End_Section (Report); end All_Blackbox_Tests; procedure All_Tests (Report : in out Natools.Tests.Reporter'Class) is