[RFA] Cygwin/Windows compatibility patches for tcl

[Andrew Cagney]

Syd Polk wrote:
> 
> At 06:56 PM 6/5/00 -0400, Chris Faylor wrote:
> >I'm not sure if this is the best location for tcl patches but since they
> >relate to problems with insight, I guess it sort of make sense.  I've
> >also Cc'ed Syd Polk, who approves the tcl/tk/itcl/tix changes in
> >sourceware.
> >
> >This patch corrects several problems that Cygwin users are seeing with
> >Insight for Windows.  I'm a little puzzled as to why the slash to backslash
> >conversion code is in tcl at all but its removal solves the cygwin insight
> >problems.
> 
> I actually think that the backslash reversal code is remnants from another
> project from within Cygnus.
> 
> >Ok to check in?
> 
> Please.

FYI,

I reverted a part of the code (see attached) - it dejagnu (tcl) couldn't
compile :-(.  I suspect it was ment to be #ifcygwin #else #endif.

Hope you don't mind.

	Andrew
Tue Jun  6 17:05:20 2000  Andrew Cagney  <cagney@b1.cygnus.com>

	* generic/tclFileName.c (Tcl_TranslateFileName): Revert Mon Jun 5
 	18:48:32 2000 Christopher Faylor <cgf@cygnus.com>, didn't compile.

Index: generic/tclFileName.c
===================================================================
RCS file: /cvs/src/src/tcl/generic/tclFileName.c,v
retrieving revision 1.2
diff -p -r1.2 tclFileName.c
*** tclFileName.c	2000/06/05 23:07:29	1.2
--- tclFileName.c	2000/06/06 07:06:25
*************** Tcl_TranslateFileName(interp, name, buff
*** 963,970 ****
       * some system interfaces don't accept forward slashes.
       */
  
- #ifndef __CYGWIN__
-     cygwin_conv_to_win32_path (Tcl_DStringValue(bufferPtr)
      if (tclPlatform == TCL_PLATFORM_WINDOWS) {
  	for (p = Tcl_DStringValue(bufferPtr); *p != '\0'; p++) {
  	    if (*p == '/') {
--- 963,968 ----
*************** Tcl_TranslateFileName(interp, name, buff
*** 972,978 ****
  	    }
  	}
      }
- #endif
      return Tcl_DStringValue(bufferPtr);
  }
  
--- 970,975 ----