Differences From Artifact [e9e0134210]:
- File tests/natools-smaz_tests.adb — part of check-in [541596303a] at 2017-02-10 20:58:14 on branch trunk — smaz_tests: update base-4096 expected streams for the new dictionaries (user: nat, size: 26411) [annotate] [blame] [check-ins using]
To Artifact [8e7b5af6d7]:
- File
tests/natools-smaz_tests.adb
— part of check-in
[0d15ccca30]
at
2017-02-11 20:52:51
on branch trunk
— smaz_tests: fix verbatim parts of expected base-4096 streams
Why didn't just use standard base-64!? (user: nat, size: 26694) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
553 554 555 556 557 558 559 |
-- foobar
Roundtrip_Test (Test, Dictionary,
"the end",
To_SEA ("BdmBBX//kB"));
-- the en<d >
Roundtrip_Test (Test, Dictionary,
"not-a-g00d-Exampl333",
| | | > > > | 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 |
-- foobar
Roundtrip_Test (Test, Dictionary,
"the end",
To_SEA ("BdmBBX//kB"));
-- the en<d >
Roundtrip_Test (Test, Dictionary,
"not-a-g00d-Exampl333",
To_SEA ("sa3/01SYtcGMwQWLTsYVdbxK"));
-- no< t-a -g0 0d->Exampl333
-- t-a 001011_10 1011_0100 10_000110
-- -g0 101101_00 1110_0110 00_001100
-- 0d- 000011_00 0010_0110 10_110100
Roundtrip_Test (Test, Dictionary,
"Smaz is a simple compression library",
To_SEA ("0xlVsA0BiBocTauZmAEbjbGXocFbvAdYGcec"));
-- Smaz is a simple compression library
Roundtrip_Test (Test, Dictionary,
"Nothing is more difficult, and therefore more precious, "
& "than to be able to decide",
|
| ︙ | ︙ | |||
576 577 578 579 580 581 582 |
-- this is an example of what works very well with smaz
Roundtrip_Test (Test, Dictionary,
"1000 numbers 2000 will 10 20 30 compress very little",
To_SEA ("IH+AyaFaFX0BsI+AQe1ZBA+AUEDA+AOWTaKcyc5AFX6ByZNduZ"));
-- 1000 numbers 2*0 will 10 20 30 compress very little",
Roundtrip_Test (Test, Dictionary,
": : : :",
| | > > > | 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595 596 |
-- this is an example of what works very well with smaz
Roundtrip_Test (Test, Dictionary,
"1000 numbers 2000 will 10 20 30 compress very little",
To_SEA ("IH+AyaFaFX0BsI+AQe1ZBA+AUEDA+AOWTaKcyc5AFX6ByZNduZ"));
-- 1000 numbers 2*0 will 10 20 30 compress very little",
Roundtrip_Test (Test, Dictionary,
": : : :",
To_SEA ("5/6AiOgoDI6A"));
-- :_: 010111_00 0000_0100 01_011100
-- _:_ 000001_00 0101_1100 00_000100
-- : 010111_00 0000
exception
when Error : others => Test.Report_Exception (Error);
end Sample_Strings_4096;
procedure Sample_Strings_4096 (Report : in out NT.Reporter'Class) is
begin
|
| ︙ | ︙ |