chiark / gitweb /
dispatch entrypoints
[chiark-tcl.git] / maskmap / maskmap-bits.c
1 int cht_do_hbytes_addr_map(ClientData cd, Tcl_Interp *ip,
2                        const AddrMap_SubCommand *subcmd,
3                        int objc, Tcl_Obj *const *objv) {
4   return subcmd->func(0,ip,objc,objv);
5 }
6
7 xxxx
8 extern int Chiark_tcl_hbytes_Init(Tcl_Interp *ip); /*called by load(3tcl)*/
9 int Chiark_tcl_hbytes_Init(Tcl_Interp *ip) {
10   static int initd;
11   
12   return cht_initextension(ip, cht_hbytestoplevel_entries, &initd,
13                            &cht_addrmap_type,
14                            (Tcl_ObjType*)0);
15 }