diff options
author | Richard Levitte <levitte@openssl.org> | 2016-08-31 19:47:35 +0200 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2016-08-31 19:47:35 +0200 |
commit | d63c12c697faa4e2fa0e5d7565521a5813c86415 (patch) | |
tree | 702b5395b52440e11d0c9a9dab3c7b13a2ef3bde /Configure | |
parent | 0c0d78b88d0bc4171b577ba3877c7b7ed0e91935 (diff) |
Have Configure's HASH or TABLE produce complete lists
Because some targets execute perl code that might die, we risk
incomplete lists. Make it so dying doesn't happen when we're listing
targets.
Reviewed-by: Rich Salz <rsalz@openssl.org>
Diffstat (limited to 'Configure')
-rwxr-xr-x | Configure | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -788,7 +788,9 @@ while (@tocheckfor) { @tocheckfor = (keys %new_tocheckfor); } +our $die = sub { die @_; }; if ($target eq "TABLE") { + local $die = sub { warn @_; }; foreach (sort keys %table) { print_table_entry($_, "TABLE"); } @@ -803,6 +805,7 @@ if ($target eq "LIST") { } if ($target eq "HASH") { + local $die = sub { warn @_; }; print "%table = (\n"; foreach (sort keys %table) { print_table_entry($_, "HASH"); |