Source

mutated_ocaml / 0MAKEDIFF-J

#!/usr/bin/perl

`/bin/cp ocamlspot/INSTALL-ocamlspot.txt .`;


`hg diff -r 772c88eaa4a5 -r tip -X CVS -X .hgignore -X 0MAKEDIFF -X 0UPDATE-CVS -X 0INSTALL > ocamlspot.diff`;

open(IN, "ocamlspot.diff");

@files = ("INSTALL-ocamlspot.txt", ".hgignore", "0MAKEDIFF", "0UPDATE-CVS", "0INSTALL", "ocamlspot.diff");
while(<IN>){
    if( /^Binary file (.*) has changed/ ){
	@files = (@files, $1);
    }
}

$com = sprintf "tar zcvf ocamlspot.tgz %s", join(' ', @files);

print STDERR "$com\n";
`$com`;