Natools

Diff
Login

Differences From Artifact [e310324b1a]:

To Artifact [86f3ec8f2c]:


401
402
403
404
405
406
407

408
409
410
411
412
413
414
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415







+







   procedure All_Tests_4096 (Report : in out NT.Reporter'Class) is
   begin
      declare
         Dict : constant Smaz_4096.Dictionary := Dictionary_4096 (False);
      begin
         Report.Section ("Without variable-length verbatim");
         Test_Validity_4096 (Report, Dict);
         Sample_Strings_4096 (Report, Dict);
         Report.End_Section;
      end;

      declare
         Dict : constant Smaz_4096.Dictionary := Dictionary_4096 (True);
      begin
         Report.Section ("With variable-length verbatim");