1 files changed, 46 insertions, 0 deletions
diff --git a/www/tclhttpd/files/patch-tcl84 b/www/tclhttpd/files/patch-tcl84
new file mode 100644
index 000000000000..0d9b472f8fe0
--- /dev/null
+++ b/www/tclhttpd/files/patch-tcl84
@@ -0,0 +1,46 @@
+--- src/crypt.c	Sat Feb 12 19:03:25 2000
++++ src/crypt.c	Thu Apr 24 12:04:03 2003
+@@ -12,4 +12,9 @@
+ 
+ #include "tcl.h"
++
++#ifndef CONST84
++#	define CONST84
++#endif
++
+ #ifndef _WIN32
+ #include "unistd.h"
+@@ -20,8 +25,4 @@
+  */
+ 
+-
+-static int	Crypt_Cmd _ANSI_ARGS_((ClientData clientData,
+-		    Tcl_Interp *interp, int argc, char **argv));
+-
+ #undef TCL_STORAGE_CLASS
+ #define TCL_STORAGE_CLASS DLLEXPORT
+@@ -53,5 +54,5 @@
+     Tcl_Interp *interp;			/* Current interpreter. */
+     int argc;				/* Number of arguments. */
+-    char **argv;			/* Argument strings. */
++    CONST84 char *argv[];		/* Argument strings. */
+ {
+     char *result;
+--- src/setuid.c	Tue Oct  6 20:12:11 1998
++++ src/setuid.c	Thu Apr 24 12:03:18 2003
+@@ -8,4 +8,8 @@
+ #include <unistd.h>
+ 
++#ifndef CONST84
++#	define CONST84
++#endif
++
+ /*
+  * SetuidCmd --
+@@ -19,5 +23,5 @@
+  */
+ int
+-SetuidCmd(ClientData data, Tcl_Interp *interp, int argc, char *argv[])
++SetuidCmd(ClientData data, Tcl_Interp *interp, int argc, CONST84 char *argv[])
+ {
+     int uid;