summaryrefslogtreecommitdiffstats
path: root/generic/tclInt.decls
diff options
context:
space:
mode:
Diffstat (limited to 'generic/tclInt.decls')
-rw-r--r--generic/tclInt.decls23
1 files changed, 12 insertions, 11 deletions
diff --git a/generic/tclInt.decls b/generic/tclInt.decls
index 182fd75..1ca3a1b 100644
--- a/generic/tclInt.decls
+++ b/generic/tclInt.decls
@@ -13,7 +13,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: tclInt.decls,v 1.121.2.3 2010/01/31 23:51:36 nijtmans Exp $
+# RCS: @(#) $Id: tclInt.decls,v 1.121.2.4 2010/02/07 22:16:54 nijtmans Exp $
library tcl
@@ -43,7 +43,7 @@ declare 3 generic {
# declare 4 generic {
# int TclChdir(Tcl_Interp *interp, char *dirName)
# }
-declare 5 {unix win} {
+declare 5 generic {
int TclCleanupChildren(Tcl_Interp *interp, int numPids, Tcl_Pid *pidPtr,
Tcl_Channel errorChan)
}
@@ -60,7 +60,7 @@ declare 8 generic {
# TclCreatePipeline unofficially exported for use by BLT.
-declare 9 {unix win} {
+declare 9 generic {
int TclCreatePipeline(Tcl_Interp *interp, int argc, CONST char **argv,
Tcl_Pid **pidArrayPtr, TclFile *inPipePtr, TclFile *outPipePtr,
TclFile *errFilePtr)
@@ -420,7 +420,7 @@ declare 103 generic {
int TclSockGetPort(Tcl_Interp *interp, CONST char *str, CONST char *proto,
int *portPtr)
}
-declare 104 {unix win} {
+declare 104 generic {
int TclSockMinimumBuffers(int sock, int size)
}
# Replaced by Tcl_FSStat in 8.4:
@@ -801,7 +801,7 @@ declare 183 generic {
#
#declare 197 generic {
# int TclCompEvalObj(Tcl_Interp *interp, Tcl_Obj *objPtr,
-# CONST CmdFrame* invoker, int word)
+# CONST CmdFrame *invoker, int word)
#}
declare 198 generic {
int TclObjGetFrame(Tcl_Interp *interp, Tcl_Obj *objPtr,
@@ -845,25 +845,25 @@ declare 208 generic {
}
# Made public by TIP 258
#declare 209 generic {
-# Tcl_Obj * TclGetEncodingSearchPath(void)
+# Tcl_Obj *TclGetEncodingSearchPath(void)
#}
#declare 210 generic {
# int TclSetEncodingSearchPath(Tcl_Obj *searchPath)
#}
#declare 211 generic {
-# CONST char * TclpGetEncodingNameFromEnvironment(Tcl_DString *bufPtr)
+# CONST char *TclpGetEncodingNameFromEnvironment(Tcl_DString *bufPtr)
#}
declare 212 generic {
void TclpFindExecutable(CONST char *argv0)
}
declare 213 generic {
- Tcl_Obj * TclGetObjNameOfExecutable(void)
+ Tcl_Obj *TclGetObjNameOfExecutable(void)
}
declare 214 generic {
void TclSetObjNameOfExecutable(Tcl_Obj *name, Tcl_Encoding encoding)
}
declare 215 generic {
- void * TclStackAlloc(Tcl_Interp *interp, int numBytes)
+ void *TclStackAlloc(Tcl_Interp *interp, int numBytes)
}
declare 216 generic {
void TclStackFree(Tcl_Interp *interp, void *freePtr)
@@ -914,7 +914,7 @@ declare 231 generic {
# Bits and pieces of TIP#280's guts
declare 232 generic {
int TclEvalObjEx(Tcl_Interp *interp, Tcl_Obj *objPtr, int flags,
- const CmdFrame *invoker, int word)
+ CONST CmdFrame *invoker, int word)
}
declare 233 generic {
void TclGetSrcInfoForPc(CmdFrame *contextPtr)
@@ -922,7 +922,7 @@ declare 233 generic {
# Exports for VarReform compat: Itcl, XOTcl like to peek into our varTables :(
declare 234 generic {
- Var *TclVarHashCreateVar(TclVarHashTable *tablePtr, const char *key,
+ Var *TclVarHashCreateVar(TclVarHashTable *tablePtr, CONST char *key,
int *newPtr)
}
declare 235 generic {
@@ -940,6 +940,7 @@ declare 243 generic {
void TclDbDumpActiveObjects(FILE *outFile)
}
+
##############################################################################
# Define the platform specific internal Tcl interface. These functions are