initial import and build-faff, wip

[chiark-tcl.git] / base / tables-examples.tct

diff --git a/base/tables-examples.tct b/base/tables-examples.tct
index 7ce5dc7f671bfcf61842961ba4169843c996d077..663073606b0c6b4772cdaa3448febccdd8df077d 100644 (file)
--- a/base/tables-examples.tct
+++ b/base/tables-examples.tct
@@ -14,19 +14,6 @@ Fini addrmapv                        fini_somethingv(ip, rc, &@.sth);
 Type sockaddr:                 SockAddr_Value @
 Init sockaddr                  sockaddr_clear(&@);
 
-Type iddata(const IdDataSpec *idds):   void *@
-Type ulong:                    uint32_t @
-Type long:                     long @
-Type string:                   const char *@
-
-Type adnsresults:              adns_answer *@
-Init adnsresults               @=0;
-Fini adnsresults               free(@);
-
-Type charfrom(const char *opts, const char *what):     int
-
-H-Include      "hbytes.h"
-
 Table toplevel TopLevel_Command
        hbytes
                subcmd  enum(HBytes_SubCommand, "hbytes subcommand")
@@ -44,36 +31,6 @@ Table toplevel TopLevel_Command
                subcmd  enum(Adns_SubCommand,"adns subcommand")
                ...     obj
 
-Table adns Adns_SubCommand
-       lookup
-               rrtype  enum(AdnsTclRRTypeInfo, "rrtype")
-               domain  string
-               ...     obj
-               =>      obj
-       synch
-               rrtype  enum(AdnsTclRRTypeInfo, "rrtype")
-               domain  string
-               ...     obj
-               =>      obj
-       asynch
-               on_yes  obj
-               on_no   obj
-               on_fail obj
-               xargs   obj
-               rrtype  enum(AdnsTclRRTypeInfo, "rrtype")
-               domain  string
-               ...     obj
-               =>      iddata(&adnstcl_queries)
-       asynch-cancel
-               query   iddata(&adnstcl_queries)
-       new-resolver
-               ...     obj
-               =>      iddata(&adnstcl_resolvers)
-       set-default-resolver
-               res     iddata(&adnstcl_resolvers)
-       destroy-resolver
-               res     iddata(&adnstcl_resolvers)
-
 Table addrmap AddrMap_SubCommand
        lookup
                map     constv(&addrmap_type)