aboutsummaryrefslogtreecommitdiff
path: root/t/release/Test/IRC/Server.pm6
diff options
context:
space:
mode:
Diffstat (limited to 't/release/Test/IRC/Server.pm6')
-rw-r--r--t/release/Test/IRC/Server.pm620
1 files changed, 0 insertions, 20 deletions
diff --git a/t/release/Test/IRC/Server.pm6 b/t/release/Test/IRC/Server.pm6
deleted file mode 100644
index fed3d66..0000000
--- a/t/release/Test/IRC/Server.pm6
+++ /dev/null
@@ -1,20 +0,0 @@
-unit class Test::IRC::Server;
-
-use JSON::Fast;
-
-has $!port;
-has $!proc;
-has Promise $.promise;
-has @.out;
-
-submethod BUILD (:$!port = 5000, :$server = 't/release/servers/01-basic.pl') {
- $!proc = Proc::Async.new: 'perl', $server, $!port;
- $!proc.stdout.tap: {
- %*ENV<IRC_CLIENT_DEBUG> and dd .lines;
- @!out.append: |.linesĀ».&from-json
- };
- $!proc.stderr.tap: { warn $_ };
- $!promise = $!proc.start;
-}
-
-method kill { $!proc.kill; }