chiark / gitweb /
src/: adns__internal_submit can modify ctx->tinfo.
[adns.git] / src / check.c
index f0f1eeca35499059970c4d786770708c51319562..41cdde5ff3592d09f86d3e0bd4b9d8abcc114896 100644 (file)
@@ -3,12 +3,11 @@
  * - consistency checks
  */
 /*
- *  This file is
- *    Copyright (C) 1997-1999 Ian Jackson <ian@davenant.greenend.org.uk>
- *
- *  It is part of adns, which is
- *    Copyright (C) 1997-1999 Ian Jackson <ian@davenant.greenend.org.uk>
- *    Copyright (C) 1999 Tony Finch <dot@dotat.at>
+ *  This file is part of adns, which is
+ *    Copyright (C) 1997-2000,2003,2006  Ian Jackson
+ *    Copyright (C) 1999-2000,2003,2006  Tony Finch
+ *    Copyright (C) 1991 Massachusetts Institute of Technology
+ *  (See the file INSTALL for full details.)
  *  
  *  This program is free software; you can redistribute it and/or modify
  *  it under the terms of the GNU General Public License as published by
@@ -31,24 +30,26 @@ void adns_checkconsistency(adns_state ads, adns_query qu) {
   adns__consistency(ads,qu,cc_user);
 }
 
-#define DLIST_CHECK(list, nodevar, part, body)                                 \
-  if ((list).head) {                                                           \
-    assert(! (list).head->part back);                                          \
-    for ((nodevar)= (list).head; (nodevar); (nodevar)= (nodevar)->part next) { \
-      assert((nodevar)->part next                                              \
-            ? (nodevar) == (nodevar)->part next->part back                     \
-            : (nodevar) == (list).tail);                                       \
-      body                                                                     \
-    }                                                                          \
+#define DLIST_CHECK(list, nodevar, part, body)                 \
+  if ((list).head) {                                           \
+    assert(! (list).head->part back);                          \
+    for ((nodevar)= (list).head;                               \
+        (nodevar);                                             \
+        (nodevar)= (nodevar)->part next) {                     \
+      assert((nodevar)->part next                              \
+            ? (nodevar) == (nodevar)->part next->part back     \
+            : (nodevar) == (list).tail);                       \
+      body                                                     \
+    }                                                          \
   }
 
-#define DLIST_ASSERTON(node, nodevar, list, part)                              \
-  do {                                                                         \
-    for ((nodevar)= (list).head;                                               \
-        (nodevar) != (node);                                                   \
-        (nodevar)= (nodevar)->part next) {                                     \
-      assert((nodevar));                                                       \
-    }                                                                          \
+#define DLIST_ASSERTON(node, nodevar, list, part)      \
+  do {                                                 \
+    for ((nodevar)= (list).head;                       \
+        (nodevar) != (node);                           \
+        (nodevar)= (nodevar)->part next) {             \
+      assert((nodevar));                               \
+    }                                                  \
   } while(0)
 
 static void checkc_query_alloc(adns_state ads, adns_query qu) {