chiark / gitweb /
copyright dates
[chiark-tcl.git] / cdb / readonly.c
index 7a3ba446439b825fa8b51c05ba62b48d486b69ff..0ebaa404ee09b25afde8e5851ee1798a77a5eb7e 100644 (file)
@@ -1,6 +1,6 @@
 /*
  * cdb, cdb-wr - Tcl bindings for tinycdb and a journalling write extension
- * Copyright 2006 Ian Jackson
+ * Copyright 2006-2012 Ian Jackson
  *
  * This program is free software; you can redistribute it and/or
  * modify it under the terms of the GNU General Public License as
@@ -95,9 +95,3 @@ int cht_do_cdb_lookup_hb(ClientData cd, Tcl_Interp *ip, void *ro_v,
   return cht_cdb_donesomelookup(ip, ro_v, def, result, data, dlen,
                                cht_cdb_storeanswer_hb);
 }
-
-int cht_do_cdbtoplevel_cdb(ClientData cd, Tcl_Interp *ip,
-                          const Cdb_SubCommand* subcmd,
-                          int objc, Tcl_Obj *const *objv) {
-  return subcmd->func((void*)subcmd,ip,objc,objv);
-}