fill.t 561 B

123456789101112131415161718192021222324252627282930
  1. use Test::More;
  2. use strict;
  3. use warnings;
  4. plan tests => 2;
  5. BEGIN {
  6. use FindBin;
  7. use lib "$FindBin::Bin/../lib";
  8. }
  9. use Slic3r;
  10. my $print = Slic3r::Print->new(
  11. x_length => 50,
  12. y_length => 50,
  13. );
  14. {
  15. my $filler = Slic3r::Fill::Rectilinear->new(print => $print);
  16. my $surface_width = 250;
  17. my $distance = $filler->adjust_solid_spacing(
  18. width => $surface_width,
  19. distance => 100,
  20. );
  21. is $distance, 125, 'adjusted solid distance';
  22. is $surface_width % $distance, 0, 'adjusted solid distance';
  23. }
  24. __END__