chiark / gitweb /
Add a few assertions about *_LLEN in adns.c.
authorian <ian>
Fri, 20 Oct 2006 10:44:50 +0000 (10:44 +0000)
committerian <ian>
Fri, 20 Oct 2006 10:44:50 +0000 (10:44 +0000)
adns/adns.c
debian/changelog

index 2a86f4a..a21de01 100644 (file)
@@ -524,6 +524,7 @@ static void make_resultstatus(Tcl_Interp *ip, adns_status status,
   results[1]= cht_ret_int(ip, status);
   results[2]= cht_ret_string(ip, adns_errabbrev(status));
   results[3]= cht_ret_string(ip, adns_strerror(status));
+  assert(RESULTSTATUS_LLEN==4);
 }
 
 static Tcl_Obj *make_resultrdata(Tcl_Interp *ip, adns_answer *answer) {
@@ -554,6 +555,7 @@ static void make_resultlist(Tcl_Interp *ip, adns_answer *answer,
   results[4]= cht_ret_string(ip, answer->owner);
   results[5]= cht_ret_string(ip, answer->cname ? answer->cname : "");
   results[6]= make_resultrdata(ip, answer);
+  assert(RESULTLIST_LLEN==7);
 }
 
 /*---------- synchronous query handling ----------*/
index 76235c6..bbf511e 100644 (file)
@@ -3,6 +3,9 @@ chiark-tcl (1.0.2) unstable; urgency=low
   Bugfixes:
   * Do not adns_cancel in the middle of adns_forallqueries.
 
+  Internal improvements:
+  * Add a few assertions about *_LLEN in adns.c.
+
  --
 
 chiark-tcl (1.0.1) unstable; urgency=low