Sha256: e86e2389201526a6f01bf5cf9ea317ab5f81929a3391e979022ad0c183b6f274

Contents?: true

Size: 745 Bytes

Versions: 19

Compression:

Stored size: 745 Bytes

Contents

use v6;
use Test;
use lib './';

BEGIN {
    plan 7;

    my @files = <Example Robot>;
    my $file = @files.grep({ ( $_ ~ '.pm' ).IO.f })[0] 
        or exit flunk "neither " ~ ( @files.map({ $_ ~ '.pm' }).join( ' or ' ) ) ~ ' found';
    EVAL( 'use ' ~ $file );
    pass 'Load module';
}

ok Robot.can('name'), 'Robot class has name attribute';
ok Robot.can('reset_name'), 'Robot class has reset_name method';

my $robot = Robot.new;
my $name = $robot.name;

like $name, /^^<[A..Z]>**2 <[0..9]>**3$$/, 'Name should match schema';
is $name, $robot.name, 'Name should be persistent';
ok $robot.name ne Robot.new.name, 'Robots should have different names';

$robot.reset_name;

ok $robot.name ne $name, 'reset_name should change the robot name';

Version data entries

19 entries across 19 versions & 1 rubygems

Version Path
trackler-2.0.0.8 tracks/perl6/robot-name/robot.t
trackler-2.0.0.7 tracks/perl6/robot-name/robot.t
trackler-2.0.0.6 tracks/perl6/robot-name/robot.t
trackler-2.0.0.5 tracks/perl6/robot-name/robot.t
trackler-2.0.0.4 tracks/perl6/robot-name/robot.t
trackler-2.0.0.3 tracks/perl6/robot-name/robot.t
trackler-2.0.0.2 tracks/perl6/robot-name/robot.t
trackler-2.0.0.1 tracks/perl6/robot-name/robot.t
trackler-2.0.0.0 tracks/perl6/robot-name/robot.t
trackler-1.0.4.1 tracks/perl6/robot-name/robot.t
trackler-1.0.4.0 tracks/perl6/robot-name/robot.t
trackler-1.0.3.0 tracks/perl6/robot-name/robot.t
trackler-1.0.2.1 tracks/perl6/robot-name/robot.t
trackler-1.0.2.0 tracks/perl6/robot-name/robot.t
trackler-1.0.1.2 tracks/perl6/robot-name/robot.t
trackler-1.0.1.1 tracks/perl6/robot-name/robot.t
trackler-1.0.1.0 tracks/perl6/robot-name/robot.t
trackler-1.0.0.1 tracks/perl6/robot-name/robot.t
trackler-1.0.0 tracks/perl6/robot-name/robot.t