~ubuntu-branches/ubuntu/utopic/slic3r/utopic

« back to all changes in this revision

Viewing changes to xs/t/19_model.t

• browse files at revision 1
• compare with another revision
• download diff
• download tarball
• view history from revision 1

Show diffs side-by-side

added

removed

xs/t/19_model.t

 

1

#!/usr/bin/perl

 

2

 

 

3

use strict;

 

4

use warnings;

 

5

 

 

6

use Slic3r::XS;

 

7

use Test::More tests => 3;

 

8

 

 

9

{

 

10

    my $model = Slic3r::Model->new;

 

11

    my $object = $model->_add_object;

 

12

    isa_ok $object, 'Slic3r::Model::Object::Ref';

 

13

    isa_ok $object->origin_translation, 'Slic3r::Pointf::Ref';

 

14

    $object->origin_translation->translate(10,0);

 

15

    is_deeply \@{$object->origin_translation}, [10,0], 'origin_translation is modified by ref';

 

16

}

 

17

 

 

18

__END__

Loggerhead is a web-based interface for Breezy
Version: 2.0.1