chiark / gitweb /
Make fcntl recording not have spurious OK.
authorian <ian>
Wed, 19 May 1999 23:26:23 +0000 (23:26 +0000)
committerian <ian>
Wed, 19 May 1999 23:26:23 +0000 (23:26 +0000)
regress/hrecord.c.m4

index 7300689e809c9a2848fc9ef71b62d8aeb51f5d64..98a24b7795993876ace3036dfe8c64ff6203f8bb 100644 (file)
@@ -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&...");
   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 {
   } 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
  $2
 
  hm_create_nothing