Bugfix: don't look in internal table for signature if found in application

[openssl.git] / crypto / objects / obj_dat.pl

diff --git a/crypto/objects/obj_dat.pl b/crypto/objects/obj_dat.pl
index 5dfb84ea00459d59298bde1573a1ad7fdf75dea3..8a09a46ee659c62bea17e0f9aab426e658ed73ed 100644 (file)
--- a/crypto/objects/obj_dat.pl
+++ b/crypto/objects/obj_dat.pl
@@ -1,5 +1,9 @@
 #!/usr/local/bin/perl
 
+# fixes bug in floating point emulation on sparc64 when
+# this script produces off-by-one output on sparc64
+use integer;
+
 sub obj_cmp
        {
        local(@a,@b,$_,$r);
@@ -90,7 +94,7 @@ for ($i=0; $i<$n; $i++)
        {
        if (!defined($nid{$i}))
                {
-               push(@out,"{NULL,NULL,NID_undef,0,NULL},\n");
+               push(@out,"{NULL,NULL,NID_undef,0,NULL,0},\n");
                }
        else
                {
@@ -134,7 +138,7 @@ for ($i=0; $i<$n; $i++)
                        }
                else
                        {
-                       $out.="0,NULL";
+                       $out.="0,NULL,0";
                        }
                $out.="},\n";
                push(@out,$out);