diff options
Diffstat (limited to 'graphics/tclblt/patches/02-debian-all.patch')
-rw-r--r-- | graphics/tclblt/patches/02-debian-all.patch | 99 |
1 files changed, 99 insertions, 0 deletions
diff --git a/graphics/tclblt/patches/02-debian-all.patch b/graphics/tclblt/patches/02-debian-all.patch new file mode 100644 index 0000000000..73a7ecfcce --- /dev/null +++ b/graphics/tclblt/patches/02-debian-all.patch @@ -0,0 +1,99 @@ +Description: Remaining unsplit changes from previous packager + Includes the rest of the changes that were applied to the source code by + previous packager. +Author: Paul E. Johnson (Debian Packaging) <pauljohn32@freefaculty.org> + +--- a/configure.in ++++ b/configure.in +@@ -349,7 +349,7 @@ + old_flags="$CFLAGS" + CFLAGS="-g -lm" + AC_MSG_CHECKING([whether DBL_EPSILON can be computed]) +- AC_TRY_RUN_WITH_OUTPUT(blt_cv_dbl_epsilon, [ ++ AC_TRY_RUN_WITH_OUTPUT([blt_cv_dbl_epsilon], [ + main () { + double e, u; + /* +--- a/generic/bltTree.c ++++ b/generic/bltTree.c +@@ -114,16 +114,18 @@ + + #define REBUILD_MULTIPLIER 3 + +-#define START_LOGSIZE 5 /* Initial hash table size is 32. */ +-#define MAX_LIST_VALUES 21 /* Convert to hash table when node +- * value list gets bigger than this +- * many values. */ +- + #if (SIZEOF_VOID_P == 8) + #define RANDOM_INDEX(i) HashOneWord(mask, downshift, i) + #define BITSPERWORD 64 ++#define START_LOGSIZE 10 ++#define MAX_LIST_VALUES 40 + #else + ++#define START_LOGSIZE 5 /* Initial hash table size is 32. */ ++#define MAX_LIST_VALUES 21 /* Convert to hash table when node ++ * value list gets bigger than this ++ * many values. */ ++ + /* + * The following macro takes a preliminary integer hash value and + * produces an index into a hash tables bucket list. The idea is +--- a/generic/bltText.c ++++ b/generic/bltText.c +@@ -881,6 +881,9 @@ + Pixmap bitmap; + int active; + ++ if (!textPtr) ++ return; ++ + display = Tk_Display(tkwin); + theta = FMOD(tsPtr->theta, (double)360.0); + if (theta < 0.0) { +--- a/generic/bltNsUtil.h ++++ b/generic/bltNsUtil.h +@@ -54,7 +54,7 @@ + #ifndef WIN32 + #if 0 + EXTERN Tcl_Command Tcl_FindCommand _ANSI_ARGS_((Tcl_Interp *interp, +- char *name, Tcl_Namespace *nsPtr, int flags)); ++ CONST char *name, Tcl_Namespace *nsPtr, int flags)); + + + /* +@@ -66,15 +66,15 @@ + + #if (TCL_MAJOR_VERSION >= 8) + EXTERN Tcl_Namespace *Tcl_CreateNamespace _ANSI_ARGS_((Tcl_Interp *interp, +- char *name, ClientData clientData, Tcl_NamespaceDeleteProc *nsDelProc)); ++ CONST char *name, ClientData clientData, Tcl_NamespaceDeleteProc *nsDelProc)); + + EXTERN void Tcl_DeleteNamespace _ANSI_ARGS_((Tcl_Namespace *nsPtr)); + + EXTERN Tcl_Namespace *Tcl_FindNamespace _ANSI_ARGS_((Tcl_Interp *interp, +- char *name, Tcl_Namespace *context, int flags)); ++ CONST char *name, Tcl_Namespace *context, int flags)); + + EXTERN int Tcl_Export _ANSI_ARGS_((Tcl_Interp *interp, Tcl_Namespace *nsPtr, +- char *name, int resetFlag)); ++ CONST char *name, int resetFlag)); + + EXTERN Tcl_Var Tcl_FindNamespaceVar _ANSI_ARGS_((Tcl_Interp *interp, char *name, + Tcl_Namespace *contextNsPtr, int flags)); +--- a/demos/scripts/page.tcl ++++ b/demos/scripts/page.tcl +@@ -1,4 +1,4 @@ +-#!/usr/local/bin/tclsh ++#!/usr/bin/tclsh8.6 + + array set page " + rows 2 +--- a/demos/scripts/xcolors.tcl ++++ b/demos/scripts/xcolors.tcl +@@ -1,3 +1,4 @@ ++# + #!../bltwish + # + # Tk version of xcolors |