diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-12-23 08:27:02 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-12-23 08:27:02 (GMT) |
| commit | 753a557ea2976254eafdc0a1711fcf3ec34d0b2d (patch) | |
| tree | 460e57d9387e7eeee7114bee464bf2aedc9c0b2d /generic/tclInt.h | |
| parent | b82ed83ec2892183f6c503108b2c6bd610e94b2c (diff) | |
| download | tcl-753a557ea2976254eafdc0a1711fcf3ec34d0b2d.zip tcl-753a557ea2976254eafdc0a1711fcf3ec34d0b2d.tar.gz tcl-753a557ea2976254eafdc0a1711fcf3ec34d0b2d.tar.bz2 | |
Eliminate the internal macro/function TclNewIntObj: In all cases TclNewLongObj is just as good.
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 11 |
1 files changed, 2 insertions, 9 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index ca8ad70..ede6411 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4562,13 +4562,12 @@ MODULE_SCOPE Tcl_PackageInitProc Procbodytest_SafeInit; * types, avoiding the corresponding function calls in time critical parts of * the core. The ANSI C "prototypes" for these macros are: * - * MODULE_SCOPE void TclNewIntObj(Tcl_Obj *objPtr, int i); * MODULE_SCOPE void TclNewLongObj(Tcl_Obj *objPtr, long l); * MODULE_SCOPE void TclNewBooleanObj(Tcl_Obj *objPtr, int b); * MODULE_SCOPE void TclNewWideObj(Tcl_Obj *objPtr, Tcl_WideInt w); * MODULE_SCOPE void TclNewDoubleObj(Tcl_Obj *objPtr, double d); - * MODULE_SCOPE void TclNewStringObj(Tcl_Obj *objPtr, char *s, int len); - * MODULE_SCOPE void TclNewLiteralStringObj(Tcl_Obj*objPtr, char*sLiteral); + * MODULE_SCOPE void TclNewStringObj(Tcl_Obj *objPtr, const char *s, int len); + * MODULE_SCOPE void TclNewLiteralStringObj(Tcl_Obj*objPtr, const char *sLiteral); * *---------------------------------------------------------------- */ @@ -4585,9 +4584,6 @@ MODULE_SCOPE Tcl_PackageInitProc Procbodytest_SafeInit; TCL_DTRACE_OBJ_CREATE(objPtr); \ } while (0) -#define TclNewIntObj(objPtr, l) \ - TclNewLongObj(objPtr, l) - /* * NOTE: There is to be no such thing as a "pure" boolean. * See comment above TclSetBooleanObj macro above. @@ -4617,9 +4613,6 @@ MODULE_SCOPE Tcl_PackageInitProc Procbodytest_SafeInit; } while (0) #else /* TCL_MEM_DEBUG */ -#define TclNewIntObj(objPtr, i) \ - (objPtr) = Tcl_NewIntObj(i) - #define TclNewLongObj(objPtr, l) \ (objPtr) = Tcl_NewLongObj(l) |