diff options
author | Ulf Möller <ulf@openssl.org> | 1999-05-07 22:55:27 +0000 |
---|---|---|
committer | Ulf Möller <ulf@openssl.org> | 1999-05-07 22:55:27 +0000 |
commit | 7d5d27b9a3edf37e6752a961b0da969b6813fa75 (patch) | |
tree | 5f7a6007d694e8e45360b722118f1897484b76dd /util/mkdef.pl | |
parent | 12d7d32f24a3fb1ea804cfeebdbbcb91308150bd (diff) |
Generate DLLs with Mingw32.
Diffstat (limited to 'util/mkdef.pl')
-rwxr-xr-x | util/mkdef.pl | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/util/mkdef.pl b/util/mkdef.pl index 230644130b..d3263b6408 100755 --- a/util/mkdef.pl +++ b/util/mkdef.pl @@ -109,13 +109,13 @@ if($do_crypto == 1) { } } else { - - &print_def_file(*STDOUT,"SSLEAY",*ssl_list,@ssl_func) + my $err = 0; + $err += &print_def_file(*STDOUT,"SSLEAY",*ssl_list,@ssl_func) if $do_ssl == 1; - &print_def_file(*STDOUT,"LIBEAY",*crypto_list,@crypto_func) + $err += &print_def_file(*STDOUT,"LIBEAY",*crypto_list,@crypto_func) if $do_crypto == 1; - + exit($err); } @@ -290,6 +290,7 @@ sub print_def_file { (*OUT,my $name,*nums,@functions)=@_; my $n =1; + my $nodef=0; if ($W32) { $name.="32"; } @@ -329,14 +330,17 @@ EOF foreach $func (@functions) { if (!defined($nums{$func})) { - printf STDERR "$func does not have a number assigned\n" - if(!$do_update); + if(!$do_update) { + printf STDERR "$func does not have a number assigned\n"; + $nodef = 1; + } } else { $n=$nums{$func}; printf OUT " %s%-40s@%d\n",($W32)?"":"_",$func,$n; } } printf OUT "\n"; + return ($nodef); } sub load_numbers |