summaryrefslogtreecommitdiffstats
path: root/generic/tclTestObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-08-15 07:08:07 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-08-15 07:08:07 (GMT)
commit02ccd2a2ba84111c45dab93d4f3b80191e45108e (patch)
tree6518028407edba465c523492cb32bc3dd7f72fc0 /generic/tclTestObj.c
parent831e40a351cc05df4e170c4606d090020bd80b3a (diff)
parent6e2f02a5a6a694d1c1ad853307791acf1fd85c92 (diff)
downloadtcl-02ccd2a2ba84111c45dab93d4f3b80191e45108e.zip
tcl-02ccd2a2ba84111c45dab93d4f3b80191e45108e.tar.gz
tcl-02ccd2a2ba84111c45dab93d4f3b80191e45108e.tar.bz2
Eliminate "register" keyword _everywhere_ in Tcl. This keyword is deprecated in C++ (removed in C++17, even), and essentially does nothing with most modern compilers
Diffstat (limited to 'generic/tclTestObj.c')
-rw-r--r--generic/tclTestObj.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c
index 3f2aecd..cc54f24 100644
--- a/generic/tclTestObj.c
+++ b/generic/tclTestObj.c
@@ -53,7 +53,7 @@ static int TeststringobjCmd(ClientData dummy, Tcl_Interp *interp,
static void VarPtrDeleteProc(ClientData clientData, Tcl_Interp *interp)
{
- register int i;
+ int i;
Tcl_Obj **varPtr = (Tcl_Obj **) clientData;
for (i = 0; i < NUMBER_OF_OBJECT_VARS; i++) {
if (varPtr[i]) Tcl_DecrRefCount(varPtr[i]);
@@ -91,7 +91,7 @@ int
TclObjTest_Init(
Tcl_Interp *interp)
{
- register int i;
+ int i;
/*
* An array of Tcl_Obj pointers used in the commands that operate on or get
* the values of Tcl object-valued variables. varPtr[i] is the i-th variable's