Anonymous avatar Anonymous committed 746fe68

Remove build infrastructure for pulling in Parrot from SVN.

Comments (0)

Files changed (2)

build/PARROT_REVISION

-37372

build/gen_parrot.pl

-#! perl
-# Copyright (C) 2009 The Perl Foundation
-
-=head1 TITLE
-
-gen_parrot.pl - script to obtain and build Parrot for Pynie
-
-=head2 SYNOPSIS
-
-    perl gen_parrot.pl
-
-=head2 DESCRIPTION
-
-Maintains an appropriate copy of Parrot in the parrot/ subdirectory.
-The revision of Parrot to be used in the build is given by the
-build/PARROT_REVISION file.
-
-=cut
-
-use strict;
-use warnings;
-use 5.008;
-
-#  Work out slash character to use.
-my $slash = $^O eq 'MSWin32' ? '\\' : '/';
-
-##  determine what revision of Parrot we require
-open my $REQ, "build/PARROT_REVISION"
-  || die "cannot open build/PARROT_REVISION\n";
-my $required = <$REQ>; chomp $required;
-close $REQ;
-
-{
-    no warnings;
-    if (open my $REV, '-|', "parrot${slash}parrot_config revision") {
-        my $revision = <$REV>;
-        close $REV;
-        chomp $revision;
-        if ($revision >= $required) {
-            print "Parrot r$revision already available (r$required required)\n";
-            exit(0);
-        }
-    }
-}
-
-print "Checking out Parrot r$required via svn...\n";
-system("svn checkout -r $required https://svn.parrot.org/parrot/trunk parrot");
-
-chdir('parrot');
-
-
-##  If we have a Makefile from a previous build, do a 'make realclean'
-if (-f 'Makefile') {
-    my %config = read_parrot_config();
-    my $make = $config{'make'};
-    if ($make) {
-        print "Performing '$make realclean'\n";
-        system("$make realclean");
-    }
-}
-
-##  Configure Parrot
-system("$^X Configure.pl --prefix=install");
-
-my %config = read_parrot_config();
-my $make = $config{'make'};
-
-system($make);
-
-sub read_parrot_config {
-    my %config = ();
-    if (open my $CFG, "config_lib.pasm") {
-        while (<$CFG>) {
-            if (/P0\["(.*?)"], "(.*?)"/) { $config{$1} = $2 }
-        }
-        close $CFG;
-    }
-    %config;
-}
-    
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.