X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?a=blobdiff_plain;f=hbytes%2Fhook.c;h=b65741f38b09865e4e25b3b5651993d9ac1ac4d7;hb=9547c7ba84dfcccaa3ff7032ddeb698e163ad81d;hp=2d59baa5fce7581083a346abaeaec1872e6cb949;hpb=b7effca02db339dd29fb17c8e40e39edd90e8fa4;p=chiark-tcl.git

diff --git a/hbytes/hook.c b/hbytes/hook.c
index 2d59baa..b65741f 100644
--- a/hbytes/hook.c
+++ b/hbytes/hook.c
@@ -386,6 +386,12 @@ int do_toplevel_ulong(ClientData cd, Tcl_Interp *ip,
   return subcmd->func(0,ip,objc,objv);
 }
 
+int do_toplevel_adns(ClientData cd, Tcl_Interp *ip,
+		      const Adns_SubCommand *subcmd,
+		      int objc, Tcl_Obj *const *objv) {
+  return subcmd->func(0,ip,objc,objv);
+}
+
 #define URANDOM "/dev/urandom"
 
 int get_urandom(Tcl_Interp *ip, Byte *buffer, int l) {