X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=blobdiff_plain;f=src%2Fevent.c;h=8cfaef5353b54af288e674a7d2d0c816e6dfbc0b;hb=f2822b6fabc1917331a91b53519f2f1aaa67ce04;hp=b36288ddfab610e305a4205d659f963bdaabb4d4;hpb=9176d09512f99412bc4fec47a66139ca6560a47a;p=adns.git

diff --git a/src/event.c b/src/event.c
index b36288d..8cfaef5 100644
--- a/src/event.c
+++ b/src/event.c
@@ -625,8 +625,19 @@ xit:
 void adns_globalsystemfailure(adns_state ads) {
   adns__consistency(ads,0,cc_entex);
 
-  while (ads->udpw.head) adns__query_fail(ads->udpw.head, adns_s_systemfail);
-  while (ads->tcpw.head) adns__query_fail(ads->tcpw.head, adns_s_systemfail);
+  for (;;) {
+    adns_query qu;
+#define GSF_QQ(QQ)				\
+    if ((qu= ads->QQ.head)) {			\
+      LIST_UNLINK(ads->QQ,qu);			\
+      adns__query_fail(qu, adns_s_systemfail);	\
+      continue;					\
+    }
+    GSF_QQ(udpw);
+    GSF_QQ(tcpw);
+#undef GSF_QQ
+    break;
+  }
   
   switch (ads->tcpstate) {
   case server_connecting: