Commit 5017fc66 authored by Brad King's avatar Brad King
Browse files

ENH: Renaming kwsys macro to kwsys_ns to work around borland preprocessor bug.

parent 914a9fb3
......@@ -23,7 +23,7 @@ open(INFILE, $ARGV[1]);
while (chomp ($line = <INFILE>))
{
if (($line !~ /^\#/) &&
($line =~ s/.*kwsys${name}_([A-Za-z0-9_]*).*/\1/) &&
($line =~ s/.*kwsys${name}_([A-Za-z0-9_]*).*/\1/) &&
($i{$line}++ < 1))
{
push(@lines, "$line");
......@@ -34,12 +34,12 @@ while (chomp ($line = <INFILE>))
}
}
close(INFILE);
$width = $max + 13;
print sprintf("#define %-${width}s kwsys(${name})\n", "kwsys${name}");
print sprintf("#define %-${width}s kwsys_ns(${name})\n", "kwsys${name}");
foreach $l (@lines)
{
print sprintf("#define %-${width}s kwsys(${name}_$l)\n",
print sprintf("#define %-${width}s kwsys_ns(${name}_$l)\n",
"kwsys${name}_$l");
}
print "\n";
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment