Allow passing in file names on the command line.

Author: coke

xt/examples-compilation.t

@@ -8,10 +8,18 @@ chdir $?FILE.IO.dirname.IO.dirname;
 my $p1 = shell "$*EXECUTABLE-NAME util/extract-examples.p6 --source-path=./doc/ --prefix=./examples/";
 chdir 'examples';
 
-my @files = find(dir => '.',
+my @files;
+
+if @*ARGS {
+    # don't pass examples/ as part of the path name
+    @files = @*ARGS;
+} else {
+    @files = find(dir => '.',
                  name => /'Type'|'Language' .*? .p6$/,
                  exclude => /'exceptions.p6'|'ArgFiles.p6'/,
                  type => 'file');
+}
+
 my $proc;
 plan +@files;