Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
[bool.t] Removed two fudged tests that were contradicted by unfudged …
…tests.
  • Loading branch information
Kodi Arfer authored and Kodi Arfer committed Jan 16, 2011
1 parent 9b43296 commit a2cd3d1
Showing 1 changed file with 4 additions and 7 deletions.
11 changes: 4 additions & 7 deletions S02-builtin_data_types/bool.t
@@ -1,6 +1,6 @@
use v6;
use Test;
plan 47;
plan 45;

#L<S12/Enumerations/"Two built-in enumerations are">

Expand Down Expand Up @@ -46,6 +46,8 @@ isa_ok(~Bool::True, Str);
isa_ok(~Bool::False, Str);
is(~Bool::True, 'Bool::True', 'Bool stringification (True)');
is(~Bool::False, 'Bool::False', 'Bool stringification (False)');
is Bool::True.Str, 'Bool::True', 'True.Str';
is Bool::False.Str, 'Bool::False', 'False.Str';


# numification - interaction with +
Expand All @@ -55,12 +57,7 @@ is(+Bool::True, '1', 'True numifies to 1');
isa_ok(+Bool::True, Int, 'True numifies to an Int');
is(+Bool::False, '0', 'False numifies to 0');
isa_ok(+Bool::False, Int, 'False numifies to an Int');
# stringification
#?rakudo 2 todo '~Bool'
is(~Bool::True, 'True', 'True stringifies to True');
is(~Bool::False, 'False', 'False stringifies to False');
is Bool::True.Str, 'Bool::True', 'True.Str';
is Bool::False.Str, 'Bool::False', 'False.Str';


# Arithmetic operations
my $bool = Bool::False;
Expand Down

0 comments on commit a2cd3d1

Please sign in to comment.