From 2ecc150530aeb416def9abadace50f1adfe0ad2d Mon Sep 17 00:00:00 2001
From: "Dr. Stephen Henson" <steve@openssl.org>
Date: Tue, 1 Feb 2011 17:15:53 +0000
Subject: [PATCH] Tolerate mixed case and leading zeroes when comparing.

---
 fips/fipsalgtest.pl | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/fips/fipsalgtest.pl b/fips/fipsalgtest.pl
index 851cc98dd9..0b6ac0f3fa 100644
--- a/fips/fipsalgtest.pl
+++ b/fips/fipsalgtest.pl
@@ -881,7 +881,10 @@ sub next_line {
         s/\s+/ /g;
 	# Delete trailing whitespace
 	s/\s+$//;
-        return $_;
+	# Remove leading zeroes
+	s/= 00/= /;
+	# Translate to upper case
+        return uc $_;
     }
     return undef;
 }
-- 
2.25.1