aboutsummaryrefslogtreecommitdiff
path: root/skel/build
diff options
context:
space:
mode:
authorpmichaud <pmichaud@pobox.com>2012-01-27 14:18:07 -0600
committerpmichaud <pmichaud@pobox.com>2012-01-27 14:18:07 -0600
commit4abcc075356072726c16b1ba1659061bf303f996 (patch)
tree6be3eb1091efbde80b4c0bc0b8b94811bc3d4a15 /skel/build
parentb5588c2c0f511effe3197794217308c55c7a1491 (diff)
Move module-install script into tools/build (where the rest of the build things go nowadays).
Diffstat (limited to 'skel/build')
-rw-r--r--skel/build/module-install.pl38
1 files changed, 0 insertions, 38 deletions
diff --git a/skel/build/module-install.pl b/skel/build/module-install.pl
deleted file mode 100644
index 63a9412..0000000
--- a/skel/build/module-install.pl
+++ /dev/null
@@ -1,38 +0,0 @@
-#! perl
-
-use warnings;
-use strict;
-use File::Find;
-use File::Copy;
-use File::Path;
-use File::Basename;
-
-my $perl6bin = 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/\Q$mlib\E/$perl6lib/;
- print "$source => $target\n";
- mkpath dirname($target);
- copy($source, $target) or die "copy failed: $!\n";
- push @pmfiles, $target;
- }
-}
-
-chdir 'rakudo';
-foreach my $pm (@pmfiles) {
- my $out = $pm; $out =~ s/\.pm6?$/.pir/;
- my @cmd = ($perl6bin, '--target=pir', "--output=$out", $pm);
- print join(' ', @cmd), "\n";
- system(@cmd);
-}