diff options
| author | Moritz Lenz <moritz@faui2k3.org> | 2014-04-20 13:52:42 +0200 |
|---|---|---|
| committer | Moritz Lenz <moritz@faui2k3.org> | 2014-04-20 13:52:42 +0200 |
| commit | 0e87ffeb33918eadd85f658d9cae8fc2c4750766 (patch) | |
| tree | cd1918ee23b2e80788b48fb112229c968f00bc56 /tools | |
| parent | 9fb3187d468c3263d538bb8229d7acec0d60e1c1 (diff) | |
Add "verbose-modules-test" target
Diffstat (limited to 'tools')
| -rw-r--r-- | tools/build/Makefile.in | 7 | ||||
| -rw-r--r-- | tools/build/modules-test.pl | 5 |
2 files changed, 11 insertions, 1 deletions
diff --git a/tools/build/Makefile.in b/tools/build/Makefile.in index 223d376..083aae2 100644 --- a/tools/build/Makefile.in +++ b/tools/build/Makefile.in @@ -85,15 +85,22 @@ modules-install-m: $(PERL) tools/build/bin-install.pl $(PERL6_M_INSTALL) $(DESTDIR)$(MOAR_BIN_DIR) m modules/ufo/bin/ufo modules/panda/bin/panda modules/doc/bin/p6doc modules-test: @backend_modules_test@ +verbose-modules-test: @backend_modules_test@ modules-test-p: $(PERL) tools/build/modules-test.pl $(CURDIR) $(DESTDIR)$(PERL6_P_INSTALL) $(MODULES) +verbose-modules-test-p: + $(PERL) tools/build/modules-test.pl --verbose $(CURDIR) $(DESTDIR)$(PERL6_P_INSTALL) $(MODULES) modules-test-j: $(PERL) tools/build/modules-test.pl $(CURDIR) $(DESTDIR)$(PERL6_J_INSTALL) $(MODULES) +verbose-modules-test-j: + $(PERL) tools/build/modules-test.pl --verbose $(CURDIR) $(DESTDIR)$(PERL6_J_INSTALL) $(MODULES) modules-test-m: $(PERL) tools/build/modules-test.pl $(CURDIR) $(DESTDIR)$(PERL6_M_INSTALL) $(MODULES) +verbose-modules-test-m: + $(PERL) tools/build/modules-test.pl --verbose $(CURDIR) $(DESTDIR)$(PERL6_M_INSTALL) $(MODULES) install: rakudo-install modules-install diff --git a/tools/build/modules-test.pl b/tools/build/modules-test.pl index 095e76b..396f066 100644 --- a/tools/build/modules-test.pl +++ b/tools/build/modules-test.pl @@ -1,6 +1,9 @@ #! perl use Cwd; +use Getopt::Long; + +GetOptions('verbose' => \my $verbose); my $base = shift @ARGV; my $perl6 = shift @ARGV; @@ -11,7 +14,7 @@ while (<>) { print "Testing modules/$moduledir with $perl6...\n"; if (-d "$base/modules/$moduledir/t") { chdir("$base/modules/$moduledir"); - system('prove', '-e', $perl6, '-r', 't'); + system('prove', $verbose ? '-v' : (), '-e', $perl6, '-r', 't'); } else { print "...no t/ directory found.\n"; |