674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
|
end loop;
Print_Line (Original_Total, Output_Total, Base64_Total);
end;
end if;
when Actions.Evaluate =>
Natools.Smaz.Tools.Set_Dictionary_For_Map_Search (Dictionary);
Dictionary.Hash := Natools.Smaz.Tools.Map_Search'Access;
declare
Total_Size : Ada.Streams.Stream_Element_Count;
Counts : Natools.Smaz.Tools.Dictionary_Counts;
begin
if Handler.Job_Count > 0 then
Parallel_Evaluate_Dictionary (Handler.Job_Count,
|
|
|
|
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
|
end loop;
Print_Line (Original_Total, Output_Total, Base64_Total);
end;
end if;
when Actions.Evaluate =>
Natools.Smaz.Tools.Set_Dictionary_For_Trie_Search (Dictionary);
Dictionary.Hash := Natools.Smaz.Tools.Trie_Search'Access;
declare
Total_Size : Ada.Streams.Stream_Element_Count;
Counts : Natools.Smaz.Tools.Dictionary_Counts;
begin
if Handler.Job_Count > 0 then
Parallel_Evaluate_Dictionary (Handler.Job_Count,
|