#!/usr/bin/perl use strict; use warnings; use Slic3r::XS; use Test::More tests => 5; { my $print = Slic3r::Print->_new; isa_ok $print, 'Slic3r::Print'; isa_ok $print->config, 'Slic3r::Config::Print::Ref'; isa_ok $print->default_object_config, 'Slic3r::Config::PrintObject::Ref'; isa_ok $print->default_region_config, 'Slic3r::Config::PrintRegion::Ref'; isa_ok $print->placeholder_parser, 'Slic3r::GCode::PlaceholderParser::Ref'; } __END__