Work in progress: Good bye, Perl Threads!

1 files changed, 0 insertions, 35 deletions

diff --git a/t/threads.t b/t/threads.t
deleted file mode 100644
index 7fede3328..000000000
--- a/t/threads.t
+++ /dev/null
@@ -1,35 +0,0 @@
-use Test::More tests => 2;
-use strict;
-use warnings;
-
-BEGIN {
-    use FindBin;
-    use lib "$FindBin::Bin/../lib";
-    use local::lib "$FindBin::Bin/../local-lib";
-}
-
-use List::Util qw(first);
-use Slic3r;
-use Slic3r::Test;
-
-{
-    my $print = Slic3r::Test::init_print('20mm_cube');
-    {
-        my $thread = threads->create(sub { Slic3r::thread_cleanup(); return 1; });
-        ok $thread->join, "print survives thread spawning";
-    }
-}
-    
-{
-    my $thread = threads->create(sub {
-        {
-            my $print = Slic3r::Test::init_print('20mm_cube');
-            Slic3r::Test::gcode($print);
-        }
-        Slic3r::thread_cleanup();
-        return 1;
-    });
-    ok $thread->join, "process print in a separate thread";
-}
-
-__END__