File:
[cvs.NetBSD.org] /
pkgsrc /
x11 /
blt /
patches /
patch-src_bltNsUtil.h
Revision
1.2:
download - view:
text,
annotated -
select for diffs
Mon Jun 6 04:27:14 2022 UTC (2 years, 6 months ago) by
dholland
Branches:
MAIN
CVS tags:
pkgsrc-2024Q3-base,
pkgsrc-2024Q3,
pkgsrc-2024Q2-base,
pkgsrc-2024Q2,
pkgsrc-2024Q1-base,
pkgsrc-2024Q1,
pkgsrc-2023Q4-base,
pkgsrc-2023Q4,
pkgsrc-2023Q3-base,
pkgsrc-2023Q3,
pkgsrc-2023Q2-base,
pkgsrc-2023Q2,
pkgsrc-2023Q1-base,
pkgsrc-2023Q1,
pkgsrc-2022Q4-base,
pkgsrc-2022Q4,
pkgsrc-2022Q3-base,
pkgsrc-2022Q3,
pkgsrc-2022Q2-base,
pkgsrc-2022Q2,
HEAD
Patch up x11/blt some.
Most importantly, fix up what it passes to the TCL package handling
functions, since as it was the library won't initialize. I can't
remember when this changed in TCL but I've seen the same issue
before... years ago. This library has likely been inoperable all that
time.
Patch up a whole bunch of build warnings, some significant.
However, it probably still doesn't work and in addition to a lot more
routine build issues it needs attention from someone who knows more
tcl than me.
Bump PKGREVISION (to 13). I'm not going to bump the handful of
dependent packages since I don't think I've done anything to change
the interface, plus they're all likely inoperable anyway given how
broken this thing looks.
Prerequisite for checking PR 32807 for currency, since it depends on
blt and blt won't load. But I rather imagine the problem seen at the
time was blt dumping core.
$NetBSD: patch-src_bltNsUtil.h,v 1.2 2022/06/06 04:27:14 dholland Exp $
- update version constraints on private decls of tcl functions
(probably none of these should be here at all as at least some
of them are unexposed tcl internals)
--- src/bltNsUtil.h.orig 2002-07-18 06:35:32.000000000 +0000
+++ src/bltNsUtil.h
@@ -47,8 +47,10 @@ typedef struct Tcl_CallFrameStruct *Tcl_
#endif
+#if (TCL_MAJOR_VERSION <= 8) && (TCL_MINOR_VERSION < 5)
EXTERN Tcl_Command Tcl_FindCommand _ANSI_ARGS_((Tcl_Interp *interp,
char *name, Tcl_Namespace *nsPtr, int flags));
+#endif
#define NS_SEARCH_NONE (0)
#define NS_SEARCH_CURRENT (1<<0)
@@ -63,7 +65,7 @@ EXTERN Tcl_Namespace *Tcl_GetCurrentName
EXTERN Tcl_Namespace *Tcl_GetGlobalNamespace _ANSI_ARGS_((Tcl_Interp *interp));
-#if (TCL_MAJOR_VERSION >= 8)
+#if (TCL_MAJOR_VERSION >= 8) && (TCL_MINOR_VERSION <= 4)
EXTERN Tcl_Namespace *Tcl_CreateNamespace _ANSI_ARGS_((Tcl_Interp *interp,
char *name, ClientData clientData, Tcl_NamespaceDeleteProc *nsDelProc));
@@ -75,7 +77,9 @@ EXTERN Tcl_Namespace *Tcl_FindNamespace
EXTERN int Tcl_Export _ANSI_ARGS_((Tcl_Interp *interp, Tcl_Namespace *nsPtr,
char *name, int resetFlag));
-EXTERN Tcl_Var Tcl_FindNamespaceVar _ANSI_ARGS_((Tcl_Interp *interp, char *name,
+#endif /* TCL_MAJOR_VERSION >= 8 */
+
+EXTERN Tcl_Var Tcl_FindNamespaceVar _ANSI_ARGS_((Tcl_Interp *interp, const char *name,
Tcl_Namespace *contextNsPtr, int flags));
EXTERN void Tcl_PopCallFrame _ANSI_ARGS_((Tcl_Interp *interp));
@@ -83,6 +87,8 @@ EXTERN void Tcl_PopCallFrame _ANSI_ARGS_
EXTERN int Tcl_PushCallFrame _ANSI_ARGS_((Tcl_Interp *interp,
Tcl_CallFrame * framePtr, Tcl_Namespace *nsPtr, int isProcCallFrame));
+#if (TCL_MAJOR_VERSION >= 8) && (TCL_MINOR_VERSION <= 4)
+
extern Tcl_HashTable *Blt_GetArrayVariableTable _ANSI_ARGS_((
Tcl_Interp *interp, CONST char *varName, int flags));
CVSweb <webmaster@jp.NetBSD.org>