diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-08-15 15:20:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-08-15 15:20:29 (GMT) |
| commit | 4796062aab8a24df621cf33dbe862f72b36986f8 (patch) | |
| tree | 29b9e228043f436e5eaff478e6178f21c6c185ee /generic/tclEnsemble.c | |
| parent | 7934f521d7f3b837fc6430fe78d9320756af1d82 (diff) | |
| parent | 2d85a1f9deb33cad80923f44a691189b7aefd8a5 (diff) | |
| download | tcl-4796062aab8a24df621cf33dbe862f72b36986f8.zip tcl-4796062aab8a24df621cf33dbe862f72b36986f8.tar.gz tcl-4796062aab8a24df621cf33dbe862f72b36986f8.tar.bz2 | |
Merge tip-548
Diffstat (limited to 'generic/tclEnsemble.c')
| -rw-r--r-- | generic/tclEnsemble.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclEnsemble.c b/generic/tclEnsemble.c index 761d879..227af0d 100644 --- a/generic/tclEnsemble.c +++ b/generic/tclEnsemble.c @@ -119,7 +119,7 @@ static inline Tcl_Obj * NewNsObj( Tcl_Namespace *namespacePtr) { - register Namespace *nsPtr = (Namespace *) namespacePtr; + Namespace *nsPtr = (Namespace *) namespacePtr; if (namespacePtr == TclGetGlobalNamespace(nsPtr->interp)) { return Tcl_NewStringObj("::", 2); @@ -1813,7 +1813,7 @@ NsEnsembleImplementationCmdNR( subcmdName = TclGetStringFromObj(subObj, &stringLength); for (i=0 ; i<tableLength ; i++) { - register int cmp = strncmp(subcmdName, + int cmp = strncmp(subcmdName, ensemblePtr->subcommandArrayPtr[i], stringLength); |