Skip to content

Commit

Permalink
[v6.d REVIEW] Be explicit about IO::Special.Str/.what values
Browse files Browse the repository at this point in the history
Otherwise they might contain garbage and test would still pass,
the way it's written.

Orig: 43ec5437d
  • Loading branch information
zoffixznet committed Sep 15, 2018
1 parent 92286fa commit 322694e
Showing 1 changed file with 3 additions and 2 deletions.
5 changes: 3 additions & 2 deletions S32-io/io-special.t
Expand Up @@ -3,15 +3,16 @@ use Test;

# Tests of IO::Special class

plan 45;
plan 16*3;

for [$*OUT.path, 'STDOUT'], [$*ERR.path, 'STDERR'], [$*IN.path, 'STDIN']
-> ($_, $name)
{
sub desc { $^v ~ " for $name" }

cmp-ok .IO, '===', $_, desc '.IO';
is-deeply .Str, .what, desc '.Str';
is-deeply .Str, "<$name>", desc '.Str';
is-deeply .what, "<$name>", desc '.what';
is-deeply .e, True, desc '.e';
is-deeply .d, False, desc '.d';
is-deeply .f, False, desc '.f';
Expand Down

0 comments on commit 322694e

Please sign in to comment.