aboutsummaryrefslogtreecommitdiff
path: root/build/module-install.pl
diff options
context:
space:
mode:
Diffstat (limited to 'build/module-install.pl')
-rw-r--r--build/module-install.pl37
1 files changed, 0 insertions, 37 deletions
diff --git a/build/module-install.pl b/build/module-install.pl
deleted file mode 100644
index cba32df..0000000
--- a/build/module-install.pl
+++ /dev/null
@@ -1,37 +0,0 @@
-#! perl
-
-use warnings;
-use strict;
-use File::Find;
-use File::Copy;
-use File::Path;
-use File::Basename;
-
-my $perl6 = shift @ARGV;
-my $perl6lib = shift @ARGV;
-
-my @pmfiles;
-while (@ARGV) {
- my $module = shift @ARGV;
- our $mlib = "$module/lib";
-
- find({ no_chdir=>1, wanted => \&libcopy }, $mlib);
-
- sub libcopy {
- return unless /\.pm6?/;
- my $source = $File::Find::name;
- my $target = $source;
- $target =~ s/$mlib/$perl6lib/;
- print "$source => $target\n";
- mkpath dirname($target);
- copy($source, $target) or die "copy failed: $!\n";
- push @pmfiles, $target;
- }
-}
-
-foreach my $pm (@pmfiles) {
- my $out = $pm; $out =~ s/\.pm6?$/.pir/;
- my @cmd = ('./perl6', '--target=pir', "--output=$out", $pm);
- print join(' ', @cmd), "\n";
- system(@cmd);
-}