projects
/
openssl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix URLs mangled by reformat
[openssl.git]
/
util
/
files.pl
diff --git
a/util/files.pl
b/util/files.pl
index 41f033e3b9aa409dba89c65bc9481e6be5d0a8ae..d5c78bafc1bfecc696c3cc594fc45937ef51b083 100755
(executable)
--- a/
util/files.pl
+++ b/
util/files.pl
@@
-4,12
+4,18
@@
# It is basically a list of all variables from the passed makefile
#
# It is basically a list of all variables from the passed makefile
#
+while ($ARGV[0] =~ /^([^\s=]+)\s*=\s*(.*)$/)
+ {
+ $sym{$1} = $2;
+ shift;
+ }
+
$s="";
while (<>)
{
chop;
s/#.*//;
$s="";
while (<>)
{
chop;
s/#.*//;
- if (/^(
\S
+)\s*=\s*(.*)$/)
+ if (/^(
[^\s=]
+)\s*=\s*(.*)$/)
{
$o="";
($s,$b)=($1,$2);
{
$o="";
($s,$b)=($1,$2);
@@
-33,7
+39,7
@@
while (<>)
$o =~ s/\s+/ /g;
$o =~ s/\$[({]([^)}]+)[)}]/$sym{$1}/g;
$o =~ s/\s+/ /g;
$o =~ s/\$[({]([^)}]+)[)}]/$sym{$1}/g;
- $sym{$s}=$o;
+ $sym{$s}=$o
if !exists $sym{$s}
;
}
}
}
}