Permalink
Browse files

[t/spec] a few more fixed smartlinks; down to 56 broken

git-svn-id: http://svn.pugscode.org/pugs@26474 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent 8c69f1a commit d7f4d0bd005accd743c1eb7d7ee83ffebaeb2824 moritz committed Apr 26, 2009
Showing with 14 additions and 12 deletions.
  1. +1 −2 S16-io/bare-say.t
  2. +1 −1 S16-io/getc.t
  3. +1 −1 S16-io/print.t
  4. +1 −1 S16-io/say.t
  5. +2 −1 S29-any/cmp.t
  6. +3 −1 S29-any/eqv.t
  7. +1 −1 S32-scalar/defined.t
  8. +2 −2 S32-scalar/undef.t
  9. +1 −1 S32-trig/e.t
  10. +1 −1 S32-trig/trig.t
View
@@ -3,8 +3,7 @@ use Test;
plan 2;
-# L<S16/Input and Output/"As with print, it is a compiler error to use a
-# bare say withoutarguments.">
+# L<S32::IO/IO::Writeable::Encoded/"it is a compiler error"
eval_dies_ok('say', 'bare say is a compiler error');
eval_dies_ok('print', 'bare print is a compiler error');
View
@@ -2,7 +2,7 @@ use v6;
use Test;
plan 1;
-# L<S16/"Input and Output"/"getc">
+# L<S32::IO/IO/"getc">
sub nonce () { return (".{$*PID}." ~ 1000.rand.Int) }
View
@@ -1,6 +1,6 @@
use v6;
-# L<S16/"Input and Output"/=item print>
+# L<S32::IO/IO/=item print>
# doesn't use Test.pm and plan() intentionally
View
@@ -1,6 +1,6 @@
use v6;
-# L<S16/"Input and Output"/=item say>
+# L<S32::IO/IO/=item say>
# doesn't use Test.pm and plan() intentionally
View
@@ -3,9 +3,10 @@ use Test;
plan 3;
-# L<S29/Any/"=item cmp">
+# L<S32::Basics/Any/"=item cmp">
is('a' cmp 'a', 0, 'a is equal to a');
is('a' cmp 'b', -1, 'a is less than b');
is('b' cmp 'a', 1, 'b is greater than a');
+# vim: ft=perl6
View
@@ -4,7 +4,7 @@ use Test;
plan 40;
# L<S03/Comparison semantics/Binary eqv tests equality much like === does>
-# L<S29/Any/"=item eqv">
+# L<S32::Basics/Any/"=item eqv">
# eqv on values
{
@@ -122,3 +122,5 @@ plan 40;
is(1 eqv 1, Bool::True, 'eqv returns Bool::True when true');
is(0 eqv 1, Bool::False, 'eqv returns Bool::False when false');
}
+
+# vim: ft=perl6
@@ -2,7 +2,7 @@ use v6;
use Test;
plan 21;
-# L<S29/Scalar/"=item defined">
+# L<S32::Basics/Scalar/"=item defined">
=begin pod
View
@@ -26,7 +26,7 @@ plan 75;
our $GLOBAL;
-# L<S29/Scalar/"=item undef">
+# L<S32::Basics/Scalar/"=item undef">
is(undef, undef, "undef is equal to undef");
ok(!defined(undef), "undef is not defined");
@@ -54,7 +54,7 @@ ok(!defined(undef), "undef is not defined");
ok(!defined($a), "assigning another undef global");
}
-# L<S29/Scalar/"=item undefine">
+# L<S32::Basics/Scalar/"=item undefine">
{
my @ary = "arg1";
my $a = @ary.pop;
View
@@ -2,7 +2,7 @@ use v6;
use Test;
plan 5;
-# L<S29/"The :Trig tag">
+# L<S32::Numeric/"The :Trig tag">
=begin description
View
@@ -2,7 +2,7 @@ use v6;
use Test;
plan 613;
-# L<S29/"The :Trig tag">
+# L<S32::Numeric/"The :Trig tag">
=begin description

0 comments on commit d7f4d0b

Please sign in to comment.