From cb7bb8e2592297d4de88fded6b4bcf995334ee29 Mon Sep 17 00:00:00 2001
Message-Id: <cb7bb8e2592297d4de88fded6b4bcf995334ee29.1714613842.git.mdw@distorted.org.uk>
From: Mark Wooding <mdw@chiark.greenend.org.uk>
Date: Sat, 21 Feb 2015 11:33:14 +0000
Subject: [PATCH] regress: Remove update-extra-select conversion script
Organization: Straylight/Edgeware

From: Ian Jackson <ijackson@chiark.greenend.org.uk>

This script was a one-off.

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---
 regress/update-extra-select | 27 ---------------------------
 1 file changed, 27 deletions(-)
 delete mode 100755 regress/update-extra-select

diff --git a/regress/update-extra-select b/regress/update-extra-select
deleted file mode 100755
index 0325309..0000000
--- a/regress/update-extra-select
+++ /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;
-}
-- 
[mdw]