diff options
| author | Rob Austein <sra@hactrn.net> | 2007-06-07 02:37:32 +0000 |
|---|---|---|
| committer | Rob Austein <sra@hactrn.net> | 2007-06-07 02:37:32 +0000 |
| commit | 5dadf34209c288b8fffba1016e6a3c9446381153 (patch) | |
| tree | 2ec36232cafd0da10fffda780f08a43c97d70aad /openssl/trunk/util/err-ins.pl | |
| parent | 6fcf9830cfea5236faf42cc3437ed4bed06c16de (diff) | |
Replace hacked OpenSSL code with OpenSSL 0.9.8e distribution.
svn path=/openssl/Makefile; revision=659
Diffstat (limited to 'openssl/trunk/util/err-ins.pl')
| -rwxr-xr-x | openssl/trunk/util/err-ins.pl | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/openssl/trunk/util/err-ins.pl b/openssl/trunk/util/err-ins.pl deleted file mode 100755 index 31b70df8..00000000 --- a/openssl/trunk/util/err-ins.pl +++ /dev/null @@ -1,33 +0,0 @@ -#!/usr/local/bin/perl -# -# tack error codes onto the end of a file -# - -open(ERR,$ARGV[0]) || die "unable to open error file '$ARGV[0]':$!\n"; -@err=<ERR>; -close(ERR); - -open(IN,$ARGV[1]) || die "unable to open header file '$ARGV[1]':$!\n"; - -@out=""; -while (<IN>) - { - push(@out,$_); - last if /BEGIN ERROR CODES/; - } -close(IN); - -open(OUT,">$ARGV[1]") || die "unable to open header file '$ARGV[1]':$1\n"; -print OUT @out; -print OUT @err; -print OUT <<"EOF"; - -#ifdef __cplusplus -} -#endif -#endif - -EOF -close(OUT); - - |