new constv type

[chiark-tcl.git] / maskmap / maskmap.c

diff --git a/maskmap/maskmap.c b/maskmap/maskmap.c
index e0c7f90ee6aa1b44e27004449aba93a23755c176..1ae8439b6a3c28acac50ee6e1f729968f7e6a659 100644 (file)
--- a/maskmap/maskmap.c
+++ b/maskmap/maskmap.c
@@ -106,8 +106,9 @@ int do_maskmap_amend(ClientData cd, Tcl_Interp *ip,
 }
 
 int do_maskmap_lookup(ClientData cd, Tcl_Interp *ip,
-                     MaskMap_Var map, HBytes_Value addr, Tcl_Obj *def,
+                     Tcl_Obj *mapo, HBytes_Value addr, Tcl_Obj *def,
                      Tcl_Obj **result) {
+  /*MaskMap_Var *map= (void*)&mapo->internalRep;*/
   *result= Tcl_NewIntObj(42);
   return TCL_OK; /*fixme*/
 }