Help language development. Donate to The Perl Foundation

P5opendir cpan:ELIZABETH last updated on 2020-11-11

t/01-basic.t
use v6.*;
use Test;
use P5opendir;

plan 12;

ok defined(::('&opendir')),           '&opendir imported?';
ok !defined(P5opendir::<&opendir>),   '&opendir externally NOT accessible?';
ok defined(::('&readdir')),           '&readdir imported?';
ok !defined(P5opendir::<&readdir>),   '&readdir externally NOT accessible?';
ok defined(::('&telldir')),           '&telldir imported?';
ok !defined(P5opendir::<&telldir>),   '&telldir externally NOT accessible?';
ok defined(::('&seekdir')),           '&seekdir imported?';
ok !defined(P5opendir::<&seekdir>),   '&seekdir externally NOT accessible?';
ok defined(::('&rewinddir')),         '&rewinddir imported?';
ok !defined(P5opendir::<&rewinddir>), '&rewinddir externally NOT accessible?';
ok defined(::('&closedir')),          '&closedir imported?';
ok !defined(P5opendir::<&closedir>),  '&closedir externally NOT accessible?';

# vim: expandtab shiftwidth=4