Sha256: a6e15f8103b6282029354ed7742c59175fbe05315da9df4a765177079aa6abb6
Contents?: true
Size: 554 Bytes
Versions: 25
Compression:
Stored size: 554 Bytes
Contents
#!/usr/bin/env perl6
use v6;
use Test;
use lib IO::Path.new($?FILE).parent.path;
BEGIN {
plan 8;
eval-lives-ok %*ENV<EXERCISM>.so ?? 'use Example' !! 'use Leap', 'Module loaded';
}
ok Leap.can('is_leap'), 'Leap class has is_leap() method';
ok my $leap = Leap.new, 'Create new Leap object';
my %year = (
1996 => True,
1997 => False,
1998 => False,
1900 => False,
2400 => True,
);
for %year.sort -> $y {
is $leap.is_leap($y.key), $y.value,
[ flat( $y.key, 'is', 'not' xx !$y.value, 'a leap year' ) ].join( ' ' )
}
Version data entries
25 entries across 25 versions & 1 rubygems