[digest-highwayhash.git] / t / Digest-HighwayHash.t

#!/usr/bin/perl
use strict;
use warnings;

use Test::More tests => 4;
BEGIN { use_ok('Digest::HighwayHash') };

is highway_hash64([1, 2, 3, 4], 'hello'), 11956820856122239241, 'highway_hash64';
is_deeply highway_hash128([1, 2, 3, 4], 'hello'), [3048112761216189476, 13900443277579286659], 'highway_hash128';
is_deeply highway_hash256([1, 2, 3, 4], 'hello'), [8099666330974151427, 17027479935588128037, 4015249936799013189, 10027181291351549853], 'highway_hash256';
Commit	Line	Data
096619f2 MG	1	#!/usr/bin/perl
	2	use strict;
	3	use warnings;
	4
	5	use Test::More tests => 4;
	6	BEGIN { use_ok('Digest::HighwayHash') };
	7
	8	is highway_hash64([1, 2, 3, 4], 'hello'), 11956820856122239241, 'highway_hash64';
	9	is_deeply highway_hash128([1, 2, 3, 4], 'hello'), [3048112761216189476, 13900443277579286659], 'highway_hash128';
	10	is_deeply highway_hash256([1, 2, 3, 4], 'hello'), [8099666330974151427, 17027479935588128037, 4015249936799013189, 10027181291351549853], 'highway_hash256';