Created
August 18, 2016 01:48
-
-
Save zoffixznet/278dc7e51595ea1c154f782e573fa4ec to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
cpan@perlbuild2:~/CPANPRC/rakudo$ make t/spec/S10-packages/use-with-class.t t/spec/S11-modules/importing.t t/spec/S11-modules/require.t | |
rm -f -- perl6 | |
cp -- perl6-m perl6 | |
chmod -- 755 perl6 | |
/home/cpan/perl5/perlbrew/perls/perl-5.24.0/bin/perl t/harness5 --fudge --moar --keep-exit-code --verbosity=1 t/spec/S10-packages/use-with-class.t | |
t/spec/S10-packages/use-with-class.t .. | |
1..9 | |
ok 1 - can instantiate object of "imported" class | |
ok 2 - can access attribute | |
ok 3 - can access method | |
ok 4 - can set through setter | |
ok 5 - can set trough assignment | |
ok 6 - setting actually worked | |
ok 7 - can extend "imported" class | |
ok 8 - can load class from inside a method | |
ok 9 - declaring a class after use-ing a module (RT \#73910) | |
ok | |
All tests successful. | |
Files=1, Tests=9, 8 wallclock secs ( 0.01 usr 0.00 sys + 7.03 cusr 0.78 csys = 7.82 CPU) | |
Result: PASS | |
/home/cpan/perl5/perlbrew/perls/perl-5.24.0/bin/perl t/harness5 --fudge --moar --keep-exit-code --verbosity=1 t/spec/S11-modules/importing.t | |
t/spec/S11-modules/importing.t .. | |
1..16 | |
ok 1 - Foo::foo is defined (explicitly :DEFAULT) | |
ok 2 - Foo::foo is the sub we expect | |
ok 3 - Foo::bar is defined (explicitly :DEFAULT and :others) | |
ok 4 - Foo::bar is the sub we expect | |
ok 5 - Foo::baz is defined (:MANDATORY) | |
ok 6 - Foo::baz is the sub we expect | |
ok 7 - Foo::bop is defined (implicitly :DEFAULT) | |
ok 8 - Foo::bop is the sub we expect | |
ok 9 - Foo::waz multi is defined (implicitly :DEFAULT) | |
ok 10 - Foo::waz is the sub we expect | |
ok 11 - Foo::waz imported does not wipe out our other waz multis | |
ok 12 - qux() not imported | |
ok 13 - gaz() not imported | |
ok 14 - Foo::foo is undefined in outer scope | |
ok 15 - can instantiate class that's loaded from inside another class | |
1..4 | |
ok 1 - 'use t::spec::packages::S11-modules::Foo :NoSucTag;' died | |
ok 2 - right exception type (X::Import::NoSuchTag) | |
ok 3 - .tag matches NoSucTag | |
ok 4 - .source-package matches t::spec::packages::S11-modules::Foo | |
ok 16 - die while trying to import a non-existent export tag | |
ok | |
All tests successful. | |
Files=1, Tests=16, 8 wallclock secs ( 0.01 usr 0.00 sys + 7.18 cusr 0.73 csys = 7.92 CPU) | |
Result: PASS | |
/home/cpan/perl5/perlbrew/perls/perl-5.24.0/bin/perl t/harness5 --fudge --moar --keep-exit-code --verbosity=1 t/spec/S11-modules/require.t | |
t/spec/S11-modules/require.rakudo.moar .. | |
1..27 | |
ok 1 - successful require PACKAGE returns PACKAGE | |
ok 2 - successful require STRING returns STRING | |
not ok 3 - require Test installs stub Test package at compile time# TODO creation of stub package symbol NYI RT \#125083 | |
# Failed test 'require Test installs stub Test package at compile time' | |
# at t/spec/S11-modules/require.rakudo.moar line 21 | |
# expected: '(Test)' | |
# got: '(Any)' | |
ok 4 - can load InnerModule from a path at run time | |
ok 5 - can introspect EXPORT of require'd package | |
ok 6 - can call our-sub from required module | |
ok 7 - can load InnerModule from a variable at run time | |
ok 8 - can import symbol not inside module | |
ok 9 - can load InnerModule by name and path, with import list | |
ok 10 - \# SKIP Trying to import from 'InnerModule', but the following symbols are missing: quux RT \#118407 | |
ok 11 - can load Fancy::Utilities at run time | |
ok 12 - can call our-sub from required module | |
ok 13 - can require with variable name | |
ok 14 - can call subroutines in a module by name | |
ok 15 - require with import list | |
ok 16 - loading modules does not clobber GLOBAL | |
ok 17 - can change directory and require a module | |
ok 18 - requiring something non-existent does not make it segfault | |
1..2 | |
ok 1 - code dies | |
ok 2 - right exception type (X::Import::MissingSymbols) | |
ok 19 - throws correct exception | |
ok 20 - require works at BEGIN | |
ok 21 - \# SKIP import require at compile time RT \#127538 | |
ok 22 - bar didn't leak | |
ok 23 - got outer symbol | |
ok 24 - call method that causes a require | |
ok 25 - got inner symbol | |
ok 26 - Cool::Utils has been merged | |
ok 27 - Cool::Utils was returned | |
# FUDGED! | |
ok | |
All tests successful. | |
Files=1, Tests=27, 25 wallclock secs ( 0.02 usr 0.00 sys + 22.36 cusr 2.32 csys = 24.70 CPU) | |
Result: PASS | |
cpan@perlbuild2:~/CPANPRC/rakudo$ |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment