aboutsummaryrefslogtreecommitdiff
path: root/build
diff options
context:
space:
mode:
authorMoritz Lenz <moritz@faui2k3.org>2010-07-24 23:56:02 +0200
committerMoritz Lenz <moritz@faui2k3.org>2010-07-24 23:56:02 +0200
commitb3012ed0082728b46ddb7247ceb6b0e507ff435d (patch)
tree9015f1347aca88921d5af76be2a8306324e0b714 /build
parenta4fc7bb9505a3c297c078f0f98f8fafc039ee2f9 (diff)
releasd reakudo is so broken that pls does not run; use master for now
Diffstat (limited to 'build')
-rw-r--r--build/buildall.pl11
-rw-r--r--build/download-stuff.pl2
2 files changed, 10 insertions, 3 deletions
diff --git a/build/buildall.pl b/build/buildall.pl
index 697c177..3aa9d8b 100644
--- a/build/buildall.pl
+++ b/build/buildall.pl
@@ -39,16 +39,23 @@ if ($res ne 'sanity') {
print "Things look good so far, executing a very simple Perl 6 program worked!\n";
+
copy('ufo/ufo', "$inst_path/bin/") or die "Can't copy ufo/ufo to $inst_path/bin: $!";
print "We now have alien technology that lets us install more modules...\n";
$ENV{PLS_NO_FETCH} = 1;
+use Cwd;
+my $proto_lib = getcwd() . '/proto/lib';
+$ENV{PERL6LIB} = $proto_lib;
chdir 'proto' or die "Can't chdir to 'proto': $!";
# TODO: find a better way to determine which modules to install in this step.
# Likely derive from @modules or so.
-for (qw(xml-writer svg svg-plot)) {
- system('perl6', 'proof-of-concept', $_);
+for (qw(zavolaj xml-writer svg svg-plot)) {
+ print "Installing $_...\n";
+ system('perl6', 'proof-of-concept', $_) == 0
+ or die "Can't run poc $_ ($?): $!";
+
}
diff --git a/build/download-stuff.pl b/build/download-stuff.pl
index 9306998..f220010 100644
--- a/build/download-stuff.pl
+++ b/build/download-stuff.pl
@@ -64,7 +64,7 @@ chdir '../..';
# but possible )
#
my %tags = (
- rakudo => '2010.07',
+ rakudo => 'master', # XXX replace by tag of Rakudo point release
proto => 'pls_rstar_hacks',
);