From: ian <ian>
Date: Wed, 19 May 1999 23:26:23 +0000 (+0000)
Subject: Make fcntl recording not have spurious OK.
X-Git-Tag: rel-adns-0-2~3
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=adns.git;a=commitdiff_plain;h=b373026c3b6b19e24d34e3078891ed48c9505792

Make fcntl recording not have spurious OK.
---

diff --git a/regress/hrecord.c.m4 b/regress/hrecord.c.m4
index 7300689..98a24b7 100644
--- a/regress/hrecord.c.m4
+++ b/regress/hrecord.c.m4
@@ -108,12 +108,14 @@ int H$1(hm_args_massage($3,void)) {
   if (r==-1) { Tvberrno(e); goto x_error; }
   if (cmd == F_GETFL) {
     Tvbf(r & O_NONBLOCK ? "O_NONBLOCK|..." : "~O_NONBLOCK&...");
-  } else if (cmd == F_SETFL) {
-    Tmust("$1","return",!r);
   } else {
-    Tmust("cmd","F_GETFL/F_SETFL",0);
-  }
-  Tvba("OK");')
+    if (cmd == F_SETFL) {
+      Tmust("$1","return",!r);
+    } else {
+      Tmust("cmd","F_GETFL/F_SETFL",0);
+    }
+    Tvba("OK");
+  }')
  $2
 
  hm_create_nothing