$NetBSD: patch-ad,v 1.2 2000/09/03 14:45:22 wiz Exp $
--- tcl/uuwish.c.orig	Thu Jun  6 15:41:11 1996
+++ tcl/uuwish.c	Wed Aug 30 13:24:05 2000
@@ -79,17 +79,20 @@
 main (int argc, char *argv[])
 {
 #ifdef HAVE_TK
-  Tk_Main
+#ifdef TMAIN_THREE
+  Tk_Main(argc, argv, Tcl_AppInit);
+#else
+  Tk_Main(argc, argv);
+#endif
 #else
 #ifdef HAVE_TCL
-  Tcl_Main
+#ifdef TMAIN_THREE
+  Tcl_Main(argc, argv, Tcl_AppInit);
+#else
+  Tcl_Main(argc, argv);
 #endif
 #endif
-    (argc, argv
-#ifdef TMAIN_THREE
-     , Tcl_AppInit
 #endif
-     );
 
   return 0;
 }