head	1.2;
access;
symbols
	RELEASE_6_1_0:1.1
	RELEASE_5_5_0:1.1
	RELEASE_6_0_0:1.1;
locks; strict;
comment	@# @;


1.2
date	2006.06.27.23.23.19;	author mi;	state dead;
branches;
next	1.1;

1.1
date	2005.07.19.03.46.27;	author mi;	state Exp;
branches;
next	;


desc
@@


1.2
log
@Upgrade tclX from 8.3.5 to 8.4 released last November after several
years of idleness. The changes are fairly substantial -- all Tk bits,
however insignificant they were, are now removed completely, for
example. No TclX enabled executable is built/installed either -- a Tcl
script is expected to load the Tclx package via the "package require
Tclx" only.

The changes to port add the handling of SIGINFO (made possible by the
recent fix-up of lang/tcl84), running the authors' test-target as part
of the build, and skipping building/installing of help files in the
NOPORTDOCS case.

The devel/tcl-neo is the only dependant port of tclX and is updated to
depend on the new version.
@
text
@There is no need for TclX_WriteStr to exist any more -- Tcl_Write
will do the same thing if the passed length is negative.

This patch will still let the function into the library (for
ABI compatibility), but the new compiles will use Tcl_Write
directly.

TclX_Eval does not do anything to its `string' argument, nor
do Tcl_Eval or Tcl_EvalFile, that it calls. Constify `string'.

	-mi

--- ../tcl/generic/tclExtdInt.h	Sat May 19 12:45:23 2001
+++ ../tcl/generic/tclExtdInt.h	Mon Jul 18 21:05:47 2005
@@@@ -224,5 +224,3 @@@@
 
-extern int
-TclX_WriteStr _ANSI_ARGS_((Tcl_Channel  channel,
-                           char        *str));
+#define TclX_WriteStr(channel, string)	Tcl_Write((channel), (string), -1)
 
--- ../tcl/generic/tclXutil.c	Sat May 19 12:45:23 2001
+++ ../tcl/generic/tclXutil.c	Mon Jul 18 21:04:07 2005
@@@@ -556,5 +556,5 @@@@
     Tcl_Interp  *interp;
     unsigned     options;
-    char        *string;
+    const char  *string;
 {
     Interp      *iPtr = (Interp *) interp;
@@@@ -624,4 +624,7 @@@@
 }
 
+#ifdef TclX_WriteStr
+#	undef TclX_WriteStr
+#endif
 /*-----------------------------------------------------------------------------
  * TclX_WriteStr --
@@@@ -937,5 +940,5 @@@@
     Tcl_DString *joinedPath;
 {
-    char *joinArgv [2];
+    const char *joinArgv [2];
 
     joinArgv [0] = path1;
@


1.1
log
@Try to make the vendor's tests run smoothly. Fail, but in the process
eliminate all warnings (on i386) and const-ify the KeyedList-API and
others (patch-warnings grew up).

Fix a typo in the previous commit (s/KeyList/KeyedList/g in MLINKS).

Bump PORTREVISION again.
@
text
@@

