generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Additional sanity check.

Browse Source
This commit is contained in:
Dr. Stephen Henson 2008-03-19 14:18:36 +00:00
parent ab12438030
commit 041e7f2eee
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
crypto/objects/objects.pl
View File

@ -14,6 +14,8 @@ while(<NUMIN>)
$Cname =~ s/^X//; $Cname =~ s/^X//;
if (defined($nidn{$mynum})) if (defined($nidn{$mynum}))
{ die "$ARGV[1]:$o:There's already an object with NID ",$mynum," on line ",$order{$mynum},"\n"; } { die "$ARGV[1]:$o:There's already an object with NID ",$mynum," on line ",$order{$mynum},"\n"; }
if (defined($nid{$Cname}))
{ die "$ARGV[1]:$o:There's already an object with name ",$mynum," on line ",$order{$nid{$Cname}},"\n"; }
$nid{$Cname} = $mynum; $nid{$Cname} = $mynum;
$nidn{$mynum} = $Cname; $nidn{$mynum} = $Cname;
$order{$mynum} = $o; $order{$mynum} = $o;