diff options
author | Dr. Stephen Henson <steve@openssl.org> | 2008-09-16 21:44:57 +0000 |
---|---|---|
committer | Dr. Stephen Henson <steve@openssl.org> | 2008-09-16 21:44:57 +0000 |
commit | d83dde61803f03646c6dd41a1b764258898fe2de (patch) | |
tree | a6da52c23cb7895bcd2a9c90bf3ca3d5f45f7853 /util | |
parent | 63e1319d0fda2eb0d37e107ac58252f0d3dd0985 (diff) |
Merge changes to build system from fips branch.
Diffstat (limited to 'util')
-rw-r--r-- | util/arx.pl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/util/arx.pl b/util/arx.pl new file mode 100644 index 0000000000..ce62625c33 --- /dev/null +++ b/util/arx.pl @@ -0,0 +1,15 @@ +#!/bin/perl + +# Simple perl script to wrap round "ar" program and exclude any +# object files in the environment variable EXCL_OBJ + +map { s/^.*\/([^\/]*)$/$1/ ; $EXCL{$_} = 1} split(' ', $ENV{EXCL_OBJ}); + +#my @ks = keys %EXCL; +#print STDERR "Excluding: @ks \n"; + +my @ARGS = grep { !exists $EXCL{$_} } @ARGV; + +system @ARGS; + +exit $? >> 8; |