diff options
-rwxr-xr-x | tests/cavs_driver.pl | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/cavs_driver.pl b/tests/cavs_driver.pl index 28500c2d..7111f0f4 100755 --- a/tests/cavs_driver.pl +++ b/tests/cavs_driver.pl @@ -1,6 +1,6 @@ #!/usr/bin/env perl # -# $Id: cavs_driver.pl 1495 2009-01-22 10:47:13Z smueller $ +# $Id: cavs_driver.pl 1497 2009-01-22 14:01:29Z smueller $ # # CAVS test driver (based on the OpenSSL driver) # Written by: Stephan Müller <sm@atsec.com> @@ -1139,7 +1139,7 @@ sub hmac_kat($$$$) { $out .= "Tlen = $tlen\n"; $out .= "Key = $key\n"; $out .= "Msg = $msg\n"; - $out .= "Mac = " . &$hmac($key, $tlen, $msg, $hashtype{$tlen}) . "\n\n"; + $out .= "Mac = " . &$hmac($key, $tlen, $msg, $hashtype{$tlen}) . "\n"; return $out; } @@ -2233,6 +2233,8 @@ sub main() { # Do the job parse($infile, $outfile); + cleanup(); + } ########################################### |