2016-08-02 16:16:30 -04:00
|
|
|
USING: checksums checksums.crc32 kernel tools.test ;
|
2008-04-30 17:11:55 -04:00
|
|
|
|
2015-07-02 20:28:17 -04:00
|
|
|
{ B{ 0 0 0 0 } } [ "" crc32 checksum-bytes ] unit-test
|
2008-04-30 17:11:55 -04:00
|
|
|
|
2015-07-02 20:28:17 -04:00
|
|
|
{ B{ 0xcb 0xf4 0x39 0x26 } } [ "123456789" crc32 checksum-bytes ] unit-test
|
2016-08-02 16:16:30 -04:00
|
|
|
|
|
|
|
|
{ t } [
|
|
|
|
|
"resource:LICENSE.txt" crc32
|
|
|
|
|
[ [ swap add-checksum-file get-checksum ] with-checksum-state ]
|
|
|
|
|
[ checksum-file ] 2bi =
|
|
|
|
|
] unit-test
|
