diff options
Diffstat (limited to 'crypto/obj/obj_dat.pl')
-rw-r--r-- | crypto/obj/obj_dat.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/crypto/obj/obj_dat.pl b/crypto/obj/obj_dat.pl index 201ec722..036ded54 100644 --- a/crypto/obj/obj_dat.pl +++ b/crypto/obj/obj_dat.pl @@ -6,7 +6,7 @@ use integer; if (scalar @ARGV != 2) { - print "Usage: perl obj_dat.pl ../../include/openssl/obj_mac.h obj_dat.h\n"; + print "Usage: perl obj_dat.pl ../../include/openssl/nid.h obj_dat.h\n"; exit 1; } @@ -163,7 +163,7 @@ foreach (sort { $ln{$nid{$a}} cmp $ln{$nid{$b}} } @a) push(@ln,sprintf("%2d,\t/* \"$ln{$nid{$_}}\" */\n",$_)); } -@a=grep(defined($obj{$nid{$_}}),0 .. $n); +@a=grep(defined($obj{$nid{$_}}) && $objd{$obj{$nid{$_}}} =~ /,/,0 .. $n); foreach (sort obj_cmp @a) { $m=$obj{$nid{$_}}; @@ -176,7 +176,7 @@ foreach (sort obj_cmp @a) print OUT <<'EOF'; /* THIS FILE IS GENERATED FROM objects.h by obj_dat.pl via the * following command: - * perl obj_dat.pl ../../include/openssl/obj_mac.h obj_dat.h */ + * perl obj_dat.pl ../../include/openssl/nid.h obj_dat.h */ /* Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com) * All rights reserved. |