regress: Remove update-extra-select conversion script
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 21 Feb 2015 11:33:14 +0000 (11:33 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Sat, 21 Feb 2015 11:33:14 +0000 (11:33 +0000)
This script was a one-off.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
regress/update-extra-select [deleted file]

diff --git a/regress/update-extra-select b/regress/update-extra-select
deleted file mode 100755 (executable)
index 0325309..0000000
+++ /dev/null
@@ -1,27 +0,0 @@
-#!/usr/bin/perl -wp
-use strict;
-
-our ($fd, $timeadj);
-
-BEGIN {
-    $fd = -1;
-}
-
-if (m/^ connect fd=(\d+) /) {
-    $fd=$1; next;
-}
-
-if (m/^ read fd=$fd buflen=1$/) {
-    die if $timeadj;
-    print
-       " select max=".($fd+1)." rfds=null wfds=[$fd]".
-       " efds=null to=0.000000\n".
-       " select=1 rfds=null wfds=[$fd] efds=null\n".
-       "+0.000001\n";
-    $timeadj = -0.000001;
-}
-
-if (m/^ \+([0-9.]+)$/ && $timeadj) {
-    $_ = sprintf " +%.6f\n", $1 + $timeadj;
-    $timeadj = 0;
-}