mirror of
				https://github.com/SoftFever/OrcaSlicer.git
				synced 2025-10-30 20:21:12 -06:00 
			
		
		
		
	
		
			
				
	
	
		
			12 lines
		
	
	
	
		
			193 B
		
	
	
	
		
			Perl
		
	
	
	
	
	
			
		
		
	
	
			12 lines
		
	
	
	
		
			193 B
		
	
	
	
		
			Perl
		
	
	
	
	
	
| #!/usr/bin/perl
 | |
| 
 | |
| use strict;
 | |
| use warnings;
 | |
| 
 | |
| use Slic3r::XS;
 | |
| use Test::More tests => 1;
 | |
| 
 | |
| my $point = Slic3r::Point::XS->new(10, 15);
 | |
| is_deeply [ @$point ], [10, 15], 'point roundtrip';
 | |
| 
 | |
| __END__
 | 
