Skip to content

Commit

Permalink
re-attempt to fix smartlinks in S02 to headings that contain C<>
Browse files Browse the repository at this point in the history
  • Loading branch information
diakopter committed Aug 11, 2011
1 parent 8aaac76 commit 05c3d8d
Show file tree
Hide file tree
Showing 5 changed files with 10 additions and 10 deletions.
2 changes: 1 addition & 1 deletion S02-builtin_data_types/fatrat.t
Expand Up @@ -4,7 +4,7 @@ use Test;

plan 1;

#L<S02/The Num and Rat Types/For applications that really need arbitrary precision>
#L<S02/The C<Num> and C<Rat> Types/For applications that really need arbitrary precision>
{
my $fatty := FatRat.new(9,10);
isa_ok( $fatty, FatRat);
Expand Down
2 changes: 1 addition & 1 deletion S02-builtin_data_types/infinity.t
Expand Up @@ -2,7 +2,7 @@ use v6;
use Test;
plan 13;

# L<S02/"Infinity and NaN" /Perl 6 by default makes standard IEEE floating point concepts visible>
# L<S02/"Infinity and C<NaN>" /Perl 6 by default makes standard IEEE floating point concepts visible>

{
my $x = Inf;
Expand Down
2 changes: 1 addition & 1 deletion S02-builtin_data_types/nan.t
Expand Up @@ -6,7 +6,7 @@ plan 19;

# Undeterminate Math results
# see L<"http://mathworld.wolfram.com/Indeterminate.html">
# L<S02/"Infinity and NaN" /Perl 6 by default makes standard IEEE floating point concepts visible>
# L<S02/"Infinity and C<NaN>" /Perl 6 by default makes standard IEEE floating point concepts visible>

is 0 * Inf , NaN, "0 * Inf";
is Inf / Inf, NaN, "Inf / Inf";
Expand Down
12 changes: 6 additions & 6 deletions S02-builtin_data_types/num.t
Expand Up @@ -2,7 +2,7 @@ use v6;

use Test;

#L<S02/The Num and Rat Types/Perl 6 intrinsically supports big integers>
#L<S02/The C<Num> and C<Rat> Types/Perl 6 intrinsically supports big integers>

plan 62;

Expand Down Expand Up @@ -34,7 +34,7 @@ is_approx( eval((-1.1).perl), -1.1, 'eval -1.1.Num.perl is -1.1' );
is($a, "-1", '-1 stringification works');
}

#L<S02/The Num and Rat Types/Rat supports extended precision rational arithmetic>
#L<S02/The C<Num> and C<Rat> Types/Rat supports extended precision rational arithmetic>
{
my $a = 1 / 1;
isa_ok($a, Rat);
Expand Down Expand Up @@ -101,7 +101,7 @@ is_approx( eval((-1.1).perl), -1.1, 'eval -1.1.Num.perl is -1.1' );
is($a, "10010", '10.01e3 stringification works');
}

#L<S02/The Num and Rat Types/Perl 6 intrinsically supports big integers>
#L<S02/The C<Num> and C<Rat> Types/Perl 6 intrinsically supports big integers>

{
my $a = 0b100; "$a";
Expand Down Expand Up @@ -130,7 +130,7 @@ is_approx( eval((-1.1).perl), -1.1, 'eval -1.1.Num.perl is -1.1' );
my $a = -1; "$a";
ok($a + 1 == 0, 'basic addition with negative numbers works'); # parsing bug
}
#L<S02/The Num and Rat Types/Rat supports extended precision rational arithmetic>
#L<S02/The C<Num> and C<Rat> Types/Rat supports extended precision rational arithmetic>

isa_ok(1 / 1, Rat);

Expand All @@ -146,15 +146,15 @@ isa_ok(1 / 1, Rat);
ok($a == 10.0, 'trailing zeros compare correctly');
}

#L<S02/The Num and Rat Types/Perl 6 intrinsically supports big integers>
#L<S02/The C<Num> and C<Rat> Types/Perl 6 intrinsically supports big integers>

{
my $a = "1.01";
isa_ok($a.Int, "Int");
is($a.Int, 1, "1.01 intifies to 1");
}

#L<S02/The Num and Rat Types/may be bound to an arbitrary>
#L<S02/The C<Num> and C<Rat> Types/may be bound to an arbitrary>

{
my $a = "0d0101";
Expand Down
2 changes: 1 addition & 1 deletion S02-builtin_data_types/whatever.t
Expand Up @@ -148,7 +148,7 @@ is (0,0,0,0,0,0) >>+>> ((1,2) xx *), <1 2 1 2 1 2>, 'xx * works';
}
}

# L<S02/The .assuming Method/This is only for operators that are not
# L<S02/The C<.assuming> Method/This is only for operators that are not
# Whatever-aware.>
{
multi sub infix:<quack>($x, $y) { "$x|$y" };
Expand Down

0 comments on commit 05c3d8d

Please sign in to comment.