summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorrjohnson <rjohnson>1998-09-29 18:22:39 (GMT)
committerrjohnson <rjohnson>1998-09-29 18:22:39 (GMT)
commitef4f41df2bece12e3c09211f7495605014179593 (patch)
treed25d0c902a5d6d0e8ee20d9c08d650c22bdeda71 /generic
parent28cbc95b72aa9ba975be02e9b4b8919279a96fa5 (diff)
downloadtcl-ef4f41df2bece12e3c09211f7495605014179593.zip
tcl-ef4f41df2bece12e3c09211f7495605014179593.tar.gz
tcl-ef4f41df2bece12e3c09211f7495605014179593.tar.bz2
Removed function declarations that were never used and not referenced
by any implementation.
Diffstat (limited to 'generic')
-rw-r--r--generic/tcl.h7
-rw-r--r--generic/tclInt.h15
2 files changed, 2 insertions, 20 deletions
diff --git a/generic/tcl.h b/generic/tcl.h
index e0466cf..492793a 100644
--- a/generic/tcl.h
+++ b/generic/tcl.h
@@ -11,7 +11,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.h,v 1.25 1998/09/14 18:39:57 stanton Exp $
+ * RCS: @(#) $Id: tcl.h,v 1.26 1998/09/29 18:22:39 rjohnson Exp $
*/
#ifndef _TCL
@@ -1279,14 +1279,12 @@ EXTERN int Tcl_GetCommandInfo _ANSI_ARGS_((Tcl_Interp *interp,
char *cmdName, Tcl_CmdInfo *infoPtr));
EXTERN char * Tcl_GetCommandName _ANSI_ARGS_((Tcl_Interp *interp,
Tcl_Command command));
-EXTERN char * Tcl_GetCwd _ANSI_ARGS_((char *buf, int len));
EXTERN int Tcl_GetDouble _ANSI_ARGS_((Tcl_Interp *interp,
char *string, double *doublePtr));
EXTERN int Tcl_GetDoubleFromObj _ANSI_ARGS_((
Tcl_Interp *interp, Tcl_Obj *objPtr,
double *doublePtr));
EXTERN int Tcl_GetErrno _ANSI_ARGS_((void));
-EXTERN int Tcl_GetErrorLine _ANSI_ARGS_((Tcl_Interp *interp));
EXTERN char * Tcl_GetHostName _ANSI_ARGS_((void));
EXTERN int Tcl_GetIndexFromObj _ANSI_ARGS_((Tcl_Interp *interp,
Tcl_Obj *objPtr, char **tablePtr, char *msg,
@@ -1306,8 +1304,6 @@ EXTERN Tcl_ObjType * Tcl_GetObjType _ANSI_ARGS_((char *typeName));
EXTERN int Tcl_GetOpenFile _ANSI_ARGS_((Tcl_Interp *interp,
char *string, int write, int checkUsage,
ClientData *filePtr));
-EXTERN Tcl_Command Tcl_GetOriginalCommand _ANSI_ARGS_((
- Tcl_Command command));
EXTERN Tcl_PathType Tcl_GetPathType _ANSI_ARGS_((char *path));
EXTERN int Tcl_Gets _ANSI_ARGS_((Tcl_Channel chan,
Tcl_DString *dsPtr));
@@ -1426,7 +1422,6 @@ EXTERN void Tcl_RegisterChannel _ANSI_ARGS_((Tcl_Interp *interp,
EXTERN void Tcl_RegisterObjType _ANSI_ARGS_((
Tcl_ObjType *typePtr));
EXTERN void Tcl_Release _ANSI_ARGS_((ClientData clientData));
-EXTERN void Tcl_RestartIdleTimer _ANSI_ARGS_((void));
EXTERN void Tcl_ResetResult _ANSI_ARGS_((Tcl_Interp *interp));
#define Tcl_Return Tcl_SetResult
EXTERN int Tcl_ScanCountedElement _ANSI_ARGS_((CONST char *string,
diff --git a/generic/tclInt.h b/generic/tclInt.h
index 524448b..542e68c 100644
--- a/generic/tclInt.h
+++ b/generic/tclInt.h
@@ -10,7 +10,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.h,v 1.17 1998/09/14 18:40:00 stanton Exp $
+ * RCS: @(#) $Id: tclInt.h,v 1.18 1998/09/29 18:22:39 rjohnson Exp $
*/
#ifndef _TCLINT
@@ -1429,10 +1429,6 @@ EXTERN int TclCleanupChildren _ANSI_ARGS_((Tcl_Interp *interp,
int numPids, Tcl_Pid *pidPtr,
Tcl_Channel errorChan));
EXTERN void TclCleanupCommand _ANSI_ARGS_((Command *cmdPtr));
-EXTERN char * TclConvertToNative _ANSI_ARGS_((Tcl_Interp *interp,
- char *name, Tcl_DString *bufferPtr));
-EXTERN char * TclConvertToNetwork _ANSI_ARGS_((Tcl_Interp *interp,
- char *name, Tcl_DString *bufferPtr));
EXTERN int TclCopyAndCollapse _ANSI_ARGS_((int count,
char *src, char *dst));
EXTERN int TclCopyChannel _ANSI_ARGS_((Tcl_Interp *interp,
@@ -1495,7 +1491,6 @@ EXTERN char * TclGetEnv _ANSI_ARGS_((CONST char *name));
EXTERN char * TclGetExtension _ANSI_ARGS_((char *name));
EXTERN int TclGetFrame _ANSI_ARGS_((Tcl_Interp *interp,
char *string, CallFrame **framePtrPtr));
-EXTERN int TclGetIdleGeneration _ANSI_ARGS_((void));
EXTERN TclCmdProcType TclGetInterpProc _ANSI_ARGS_((void));
EXTERN int TclGetIntForIndex _ANSI_ARGS_((Tcl_Interp *interp,
Tcl_Obj *objPtr, int endValue, int *indexPtr));
@@ -1522,11 +1517,9 @@ EXTERN int TclGlobalInvoke _ANSI_ARGS_((Tcl_Interp *interp,
int argc, char **argv, int flags));
EXTERN int TclGuessPackageName _ANSI_ARGS_((char *fileName,
Tcl_DString *bufPtr));
-EXTERN int TclHasPipes _ANSI_ARGS_((void));
EXTERN int TclHasSockets _ANSI_ARGS_((Tcl_Interp *interp));
EXTERN int TclHideUnsafeCommands _ANSI_ARGS_((
Tcl_Interp *interp));
-EXTERN int TclIdlePending _ANSI_ARGS_((void));
EXTERN int TclInExit _ANSI_ARGS_((void));
EXTERN Tcl_Obj * TclIncrElementOfIndexedArray _ANSI_ARGS_((
Tcl_Interp *interp, int localIndex,
@@ -1560,8 +1553,6 @@ EXTERN Var * TclLookupVar _ANSI_ARGS_((Tcl_Interp *interp,
char *part1, char *part2, int flags, char *msg,
int createPart1, int createPart2,
Var **arrayPtrPtr));
-EXTERN int TclMakeFileTable _ANSI_ARGS_((Tcl_Interp *interp,
- int noStdio));
EXTERN int TclMatchFiles _ANSI_ARGS_((Tcl_Interp *interp,
char *separators, Tcl_DString *dirPtr,
char *pattern, char *tail));
@@ -1626,8 +1617,6 @@ EXTERN char * TclpRealloc _ANSI_ARGS_((char *ptr,
EXTERN int TclpRemoveDirectory _ANSI_ARGS_((char *path,
int recursive, Tcl_DString *errorPtr));
EXTERN int TclpRenameFile _ANSI_ARGS_((char *source, char *dest));
-EXTERN char * TclpSetEnv _ANSI_ARGS_((CONST char *name,
- CONST char *value));
#ifndef TclpSysAlloc
EXTERN VOID * TclpSysAlloc _ANSI_ARGS_((long size, int isBin));
#endif
@@ -1760,8 +1749,6 @@ EXTERN int Tcl_GlobalObjCmd _ANSI_ARGS_((ClientData clientData,
Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]));
EXTERN int Tcl_GlobCmd _ANSI_ARGS_((ClientData clientData,
Tcl_Interp *interp, int argc, char **argv));
-EXTERN int Tcl_HistoryCmd _ANSI_ARGS_((ClientData clientData,
- Tcl_Interp *interp, int argc, char **argv));
EXTERN int Tcl_IfCmd _ANSI_ARGS_((ClientData clientData,
Tcl_Interp *interp, int argc, char **argv));
EXTERN int Tcl_IncrCmd _ANSI_ARGS_((ClientData clientData,