foreach my $src (@src) {
if($src =~ /([a-z0-9]+)\.c$/ && !exists $exclude{$src}) {
my $name = $1;
- my $fn = $src;
if($embed) {
+ my $fn = $src;
if($srcdir ne "" && -e "$srcdir/$fn") {
$fn = $srcdir . "/" . $fn;
}
+ print "/* Embedding: \"$src\" */\n";
my $content = do { local $/; open my $fh, '<', $fn or die $!; <$fh> };
print $content;
}
else {
- print "#include \"$fn\"\n";
+ print "#include \"$src\"\n";
}
if(not exists $include{$src}) { # register test entry function
$tlist .= " {\"$name\", test_$name},\n";