Differences From Artifact [c569e6f5c9]:
- File tools/smaz.adb — part of check-in [1516f5a576] at 2016-10-01 15:25:53 on branch trunk — tools/smaz: add a command-line option to output current dictionary (user: nat, size: 18269) [annotate] [blame] [check-ins using]
To Artifact [edede487cd]:
- File tools/smaz.adb — part of check-in [15ea367b55] at 2016-10-03 19:27:39 on branch trunk — tools/smaz: also add words from input phrases, on top of substrings (user: nat, size: 18337) [annotate] [blame] [check-ins using]
| ︙ | |||
328 329 330 331 332 333 334 335 336 337 338 339 340 341 | 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 | + |
when Dict_Sources.Word_List =>
declare
Counter : Natools.Smaz.Tools.Word_Counter;
begin
for S of Input loop
Natools.Smaz.Tools.Add_Substrings (Counter, S, 1, 3);
Natools.Smaz.Tools.Add_Words (Counter, S, 4, 10);
end loop;
return Natools.Smaz.Tools.To_Dictionary
(Natools.Smaz.Tools.Simple_Dictionary (Counter, 254),
True);
end;
end case;
|
| ︙ |