Permalink
Browse files

[alpha] update README with Subversion->Github moves, tweak test_summa…

…ry.pl
  • Loading branch information...
1 parent 30e0ed3 commit fd0a1841c372875fd6d885fb8a768d8506a45ac4 @mberends mberends committed Aug 25, 2011
Showing with 437 additions and 121 deletions.
  1. +39 −0 README
  2. +7 −0 Test.pm
  3. +391 −121 tools/test_summary.pl
View
39 README
@@ -57,6 +57,9 @@ Once you have a copy of Rakudo, build it as follows:
$ perl Configure.pl --gen-parrot
$ make
+Note: this no longer works. See "Loss of the Subversion Repositories"
+below for a workaround.
+
This will create a "perl6" or "perl6.exe" executable in the
current (rakudo) directory. Programs can then be run from
the build directory using a command like:
@@ -138,6 +141,42 @@ If you want to run the tests in parallel, you need to install a
fairly recent version of the Perl 5 module L<Test::Harness> (3.16
works for sure).
+=head3 Loss of the Subversion Repositories
+
+Since early 2010, Parrot and the Perl 6 test suite have moved from their
+respective Subversion repositories to Github. The Subversion servers
+are offline, so Rakudo's Configure.pl --gen-parrot and make testable
+procedures in Rakudo/alpha no longer work. Patches are welcome to adapt
+them to Git. In the meantime those wanting to build Rakudo/alpha should
+download a tarball from https://github.com/rakudo/rakudo/downloads or
+manually performs steps such as the following.
+
+ git clone git://github.com/rakudo/rakudo.git alpha
+ cd alpha
+ git checkout -b alpha --track remotes/origin/alpha
+ # The last Parrot 2.0.0 revision on which Rakudo/alpha was developed
+ # is r43487 from https://svn.parrot.org/parrot/trunk (now offline)
+ # which mapped to commit 8ebe2eaef15fc7724d67b953e7886f5d3db388ea
+ # according to the git log from https://github.com/parrot/parrot.
+ git clone git://github.com/parrot/parrot.git parrot
+ cd parrot
+ git reset --hard 8ebe2eaef15fc7724d67b953e7886f5d3db388ea
+ perl Configure.pl --prefix=`cd ..;pwd`/parrot_install
+ make install # Parrot
+ cd ..
+ perl Configure.pl --parrot-config=parrot_install/bin/parrot_config
+ make install # Rakudo
+ # The last Perl 6 spec tests on Rakudo/alpha were rev 29188 from
+ # http://svn.pugscode.org/pugs/t/spec (now offline) which mapped to
+ # commit 99adbfb2c7ddf7837994d59c48e18aafaee666ee according to the
+ # git log from https://github.com/perl6/roast.
+ git clone git://github.com/perl6/roast t/spec
+ cd t/spec
+ git reset --hard 99adbfb2c7ddf7837994d59c48e18aafaee666ee
+ cd ../..
+ # Optionally do some spectesting and benchmarking
+ time perl tools/test_summary.pl --timing
+
=head2 Where to get help or answers to questions
There are several mailing lists, IRC channels, and wikis available
View
@@ -13,6 +13,7 @@ our $todo_reason = '';
our $num_of_tests_planned;
our $no_plan = 1;
our $die_on_fail;
+our $perl6_test_times = ? %*ENV<PERL6_TEST_TIMES>;
our $GLOBAL::WARNINGS = 0;
@@ -40,6 +41,11 @@ multi sub plan($number_of_tests) is export(:DEFAULT) {
$no_plan = 0;
say '1..' ~ $number_of_tests;
+ # Emit two successive timestamps to measure the measurment overhead,
+ # and to eliminate cacheing bias, if it exists, from the first test.
+ say '# t=' ~ time() if $perl6_test_times;
+ say '# t=' ~ time() if $perl6_test_times;
+ # The time() function changed in later Rakudos to now.to-posix[0]
}
multi sub pass($desc) is export(:DEFAULT) {
@@ -242,6 +248,7 @@ sub proclaim($cond, $desc) {
print $todo_reason;
}
print "\n";
+ say '# t=' ~ time() if $perl6_test_times;
if !$cond && $die_on_fail && !$todo_reason {
die "Test failed. Stopping test";
Oops, something went wrong.

0 comments on commit fd0a184

Please sign in to comment.