New Ticket     Tickets     Wiki     Browse Source     Timeline     Roadmap     Ticket Reports     Search

Ticket #22536: blt-2.4z-tcl8.5-fix.patch

File blt-2.4z-tcl8.5-fix.patch, 1.1 KB (added by howarth@…, 4 years ago)

blt-2.4z-tcl8.5-fix.patch

  • src/bltNsUtil.h

    old new  
    4646#define TCL_NAMESPACE_ONLY TCL_GLOBAL_ONLY 
    4747#endif 
    4848 
    49  
     49/* 
    5050EXTERN Tcl_Command Tcl_FindCommand _ANSI_ARGS_((Tcl_Interp *interp, 
    5151        char *name, Tcl_Namespace *nsPtr, int flags)); 
    52  
     52*/ 
    5353#define NS_SEARCH_NONE          (0) 
    5454#define NS_SEARCH_CURRENT       (1<<0) 
    5555#define NS_SEARCH_GLOBAL        (1<<1) 
     
    6464EXTERN Tcl_Namespace *Tcl_GetGlobalNamespace _ANSI_ARGS_((Tcl_Interp *interp)); 
    6565 
    6666#if (TCL_MAJOR_VERSION >= 8) 
     67/* 
    6768EXTERN Tcl_Namespace *Tcl_CreateNamespace _ANSI_ARGS_((Tcl_Interp *interp, 
    6869        char *name, ClientData clientData, Tcl_NamespaceDeleteProc *nsDelProc)); 
    69  
     70*/ 
    7071EXTERN void Tcl_DeleteNamespace _ANSI_ARGS_((Tcl_Namespace *nsPtr)); 
    71  
     72/* 
    7273EXTERN Tcl_Namespace *Tcl_FindNamespace _ANSI_ARGS_((Tcl_Interp *interp, 
    7374        char *name, Tcl_Namespace *context, int flags)); 
    7475 
    7576EXTERN int Tcl_Export _ANSI_ARGS_((Tcl_Interp *interp, Tcl_Namespace *nsPtr, 
    7677        char *name, int resetFlag)); 
    77  
     78*/ 
    7879EXTERN Tcl_Var Tcl_FindNamespaceVar _ANSI_ARGS_((Tcl_Interp *interp, char *name, 
    7980        Tcl_Namespace *contextNsPtr, int flags)); 
    8081