diff options
Diffstat (limited to 'generic/tclStubInit.c')
-rw-r--r-- | generic/tclStubInit.c | 16 |
1 files changed, 2 insertions, 14 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 8b0e08e..e004694 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclStubInit.c,v 1.195 2010/08/21 16:30:26 nijtmans Exp $ + * RCS: @(#) $Id: tclStubInit.c,v 1.196 2010/08/25 01:00:10 nijtmans Exp $ */ #include "tclInt.h" @@ -41,17 +41,6 @@ #undef Tcl_CreateHashEntry #undef Tcl_Panic -/* Only provided in the stub table for backwards - * binary compatibility. - */ -#define TclFSGetNativePath getnativepath -static const char * -getnativepath( - Tcl_Obj *pathPtr) -{ - return Tcl_FSGetNativePath(pathPtr); -} - /* * WARNING: The contents of this file is automatically generated by the * tools/genStubs.tcl script. Any modifications to the function declarations @@ -974,7 +963,7 @@ const TclStubs tclStubs = { Tcl_FSGetTranslatedPath, /* 466 */ Tcl_FSEvalFile, /* 467 */ Tcl_FSNewNativePath, /* 468 */ - TclFSGetNativePath, /* 469 */ + Tcl_FSGetNativePath, /* 469 */ Tcl_FSFileSystemInfo, /* 470 */ Tcl_FSPathSeparator, /* 471 */ Tcl_FSListVolumes, /* 472 */ @@ -1135,7 +1124,6 @@ const TclStubs tclStubs = { Tcl_LoadFile, /* 627 */ Tcl_FindSymbol, /* 628 */ Tcl_FSUnloadFile, /* 629 */ - Tcl_FSGetNativePath, /* 630 */ }; /* !END!: Do not edit above this line. */ |