Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | tools/smaz: remove debug trace left over |
---|---|
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
fe798b80fc9938f8ccee8c1749b6718d |
User & Date: | nat 2017-06-16 21:17:04 |
Context
2017-06-17
| ||
19:33 | s_expressions-conditionals-strings: add an equality test check-in: 87228b7a84 user: nat tags: trunk | |
2017-06-16
| ||
21:17 | tools/smaz: remove debug trace left over check-in: fe798b80fc user: nat tags: trunk | |
2017-06-15
| ||
19:23 | string_slice_tests: test the new callback-based constructor check-in: 4b6433de7a user: nat tags: trunk | |
Changes
Changes to tools/smaz.adb.
︙ | ︙ | |||
636 637 638 639 640 641 642 | (Score - Old_Score) & ')'); end if; end; end loop; if Length (Original) < Max_Dict_Size then | < < < | 636 637 638 639 640 641 642 643 644 645 646 647 648 649 | (Score - Old_Score) & ')'); end if; end; end loop; if Length (Original) < Max_Dict_Size then for Position in Pending_Words.Iterate loop declare Word : constant String := String_Lists.Element (Position); New_Dict : constant Dictionary := Append_String (Original, Word); New_Score : Ada.Streams.Stream_Element_Count; New_Counts : Dictionary_Counts; |
︙ | ︙ |