CONSTify TclPrintInstruction and TclpNativeJoinPath (TIP #27)

{unix win} in *.decls is equivalent to {generic}
tclGetDate.y, tclDate.c:   single internal const decoration


FossilOrigin-Name: b4d9520da5a0a5a222745f840e07616a462c2dac

1 files changed, 4 insertions, 4 deletions

diff --git a/generic/tcl.decls b/generic/tcl.decls
index a9a5bcf..a95acf8 100644
--- a/generic/tcl.decls
+++ b/generic/tcl.decls
@@ -12,7 +12,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: tcl.decls,v 1.167 2008/12/27 10:07:06 dkf Exp $
+# RCS: @(#) $Id: tcl.decls,v 1.168 2009/01/22 06:42:33 nijtmans Exp $
 
 library tcl
 
@@ -412,7 +412,7 @@ declare 109 generic {
 declare 110 generic {
     void Tcl_DeleteInterp(Tcl_Interp *interp)
 }
-declare 111 {unix win} {
+declare 111 generic {
     void Tcl_DetachPids(int numPids, Tcl_Pid *pidPtr)
 }
 declare 112 generic {
@@ -703,7 +703,7 @@ declare 196 generic {
     Tcl_Obj *Tcl_ObjSetVar2(Tcl_Interp *interp, Tcl_Obj *part1Ptr,
 	    Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr, int flags)
 }
-declare 197 {unix win} {
+declare 197 generic {
     Tcl_Channel Tcl_OpenCommandChannel(Tcl_Interp *interp, int argc,
 	    CONST84 char **argv, int flags)
 }
@@ -739,7 +739,7 @@ declare 205 generic {
 declare 206 generic {
     int Tcl_Read(Tcl_Channel chan, char *bufPtr, int toRead)
 }
-declare 207 {unix win} {
+declare 207 generic {
     void Tcl_ReapDetachedProcs(void)
 }
 declare 208 generic {