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

« back to all changes in this revision

Viewing changes to xs/t/16_flow.t

  • Committer: Package Import Robot
  • Author(s): Chow Loong Jin
  • Date: 2014-06-17 01:27:26 UTC
  • Revision ID: package-import@ubuntu.com-20140617012726-2wrs4zdo251nr4vg
Tags: upstream-1.1.4+dfsg
ImportĀ upstreamĀ versionĀ 1.1.4+dfsg

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#!/usr/bin/perl
 
2
 
 
3
use strict;
 
4
use warnings;
 
5
 
 
6
use Slic3r::XS;
 
7
use Test::More tests => 2;
 
8
 
 
9
{
 
10
    my $flow = Slic3r::Flow->new_from_width(
 
11
        role => Slic3r::Flow::FLOW_ROLE_PERIMETER,
 
12
        width               => '1',
 
13
        nozzle_diameter     => 0.5,
 
14
        layer_height        => 0.3, 
 
15
        bridge_flow_ratio   => 1,
 
16
    );
 
17
    isa_ok $flow, 'Slic3r::Flow', 'new_from_width';
 
18
}
 
19
 
 
20
{
 
21
    my $flow = Slic3r::Flow->new(
 
22
        width               => 1,
 
23
        spacing             => 0.95,
 
24
        nozzle_diameter     => 0.5,
 
25
    );
 
26
    isa_ok $flow, 'Slic3r::Flow', 'new';
 
27
}
 
28
 
 
29
__END__