### 19 755 1119251973 1208342275 makepp_test_script.pl
{ open my $fh, '>', 'raw' }
# There is no guarantee that a bug will actually show up here, because it
# might always take long enough to load makepp that the timestamps always
# change on generated targets. If the environment is conducive to exposing
# such a bug, then it will usually happen by the 4th run.
makepp "X=$_" for 1..4;
open my $in, '<', 'raw';
open my $out, '>', 'commands';
while( <$in> ) {
print $out $_
unless /^makepp[: ]/;
}
# Destructor might come too late to delete tdir on Windows.
close $in; close $out;
1;
### 1 644 1119251973 1208342214 makeppextra.pm
open STDOUT, '>>', 'raw'; # Doing this in run_tests can prevent raw from being deleted.
### 9 644 1163099047 1068849106 Makeppfile
signature md5
$(phony default): y
x:
&echo -o $(output) $(X)
y: x
&cp $< $@
### D 755 1068849350 1068849350 answers
### 8 644 1119253233 1068849337 answers/commands
&echo -o x 1
&cp x y
&echo -o x 2
&cp x y
&echo -o x 3
&cp x y
&echo -o x 4
&cp x y