p6.p6

use v6.d.PREVIEW;
use lib <t/spec/packages/>;
use Test;
use Test::Util;
subtest '.open with "-" as path in 6.d lang is no longer special' => {
    plan 3;
    indir make-temp-dir, {
        (my $fh will leave {.close} = open '-', :w).spurt: 'foo';
        is-deeply open('-').slurp, 'foo', '&open(Str)';
    }
    indir make-temp-dir, {
        (my $fh will leave {.close} = open '-'.IO, :w).spurt: 'foo';
        is-deeply open('-'.IO).slurp, 'foo', '&open(Str)';
    }
    indir make-temp-dir, {
        (my $fh will leave {.close} = '-'.IO.open: :w).spurt: 'foo';
        is-deeply '-'.IO.open.slurp, 'foo', 'IO::Path.open';
    }
}