diff options
-rw-r--r-- | src/lib/libcrypto/objects/objects.pl | 13 | ||||
-rw-r--r-- | src/lib/libssl/src/crypto/objects/objects.pl | 13 |
2 files changed, 14 insertions, 12 deletions
diff --git a/src/lib/libcrypto/objects/objects.pl b/src/lib/libcrypto/objects/objects.pl index 76c06cc8f9..76bb8da677 100644 --- a/src/lib/libcrypto/objects/objects.pl +++ b/src/lib/libcrypto/objects/objects.pl | |||
@@ -107,12 +107,13 @@ while (<IN>) | |||
107 | } | 107 | } |
108 | close IN; | 108 | close IN; |
109 | 109 | ||
110 | open (NUMOUT,">$ARGV[1]") || die "Can't open output file $ARGV[1]"; | 110 | #XXX don't modify input files |
111 | foreach (sort { $a <=> $b } keys %nidn) | 111 | #open (NUMOUT,">$ARGV[1]") || die "Can't open output file $ARGV[1]"; |
112 | { | 112 | #foreach (sort { $a <=> $b } keys %nidn) |
113 | print NUMOUT $nidn{$_},"\t\t",$_,"\n"; | 113 | # { |
114 | } | 114 | # print NUMOUT $nidn{$_},"\t\t",$_,"\n"; |
115 | close NUMOUT; | 115 | # } |
116 | #close NUMOUT; | ||
116 | 117 | ||
117 | open (OUT,">$ARGV[2]") || die "Can't open output file $ARGV[2]"; | 118 | open (OUT,">$ARGV[2]") || die "Can't open output file $ARGV[2]"; |
118 | print OUT <<'EOF'; | 119 | print OUT <<'EOF'; |
diff --git a/src/lib/libssl/src/crypto/objects/objects.pl b/src/lib/libssl/src/crypto/objects/objects.pl index 76c06cc8f9..76bb8da677 100644 --- a/src/lib/libssl/src/crypto/objects/objects.pl +++ b/src/lib/libssl/src/crypto/objects/objects.pl | |||
@@ -107,12 +107,13 @@ while (<IN>) | |||
107 | } | 107 | } |
108 | close IN; | 108 | close IN; |
109 | 109 | ||
110 | open (NUMOUT,">$ARGV[1]") || die "Can't open output file $ARGV[1]"; | 110 | #XXX don't modify input files |
111 | foreach (sort { $a <=> $b } keys %nidn) | 111 | #open (NUMOUT,">$ARGV[1]") || die "Can't open output file $ARGV[1]"; |
112 | { | 112 | #foreach (sort { $a <=> $b } keys %nidn) |
113 | print NUMOUT $nidn{$_},"\t\t",$_,"\n"; | 113 | # { |
114 | } | 114 | # print NUMOUT $nidn{$_},"\t\t",$_,"\n"; |
115 | close NUMOUT; | 115 | # } |
116 | #close NUMOUT; | ||
116 | 117 | ||
117 | open (OUT,">$ARGV[2]") || die "Can't open output file $ARGV[2]"; | 118 | open (OUT,">$ARGV[2]") || die "Can't open output file $ARGV[2]"; |
118 | print OUT <<'EOF'; | 119 | print OUT <<'EOF'; |