diff options
Diffstat (limited to 'generic/tclNamesp.c')
| -rw-r--r-- | generic/tclNamesp.c | 38 |
1 files changed, 19 insertions, 19 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index 7a09490..957b525 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -160,25 +160,25 @@ static const Tcl_ObjType nsNameType = { */ static const EnsembleImplMap defaultNamespaceMap[] = { - {"children", NamespaceChildrenCmd}, - {"code", NamespaceCodeCmd}, - {"current", NamespaceCurrentCmd}, - {"delete", NamespaceDeleteCmd}, - {"ensemble", TclNamespaceEnsembleCmd}, - {"eval", NamespaceEvalCmd, NULL, NRNamespaceEvalCmd}, - {"exists", NamespaceExistsCmd}, - {"export", NamespaceExportCmd}, - {"forget", NamespaceForgetCmd}, - {"import", NamespaceImportCmd}, - {"inscope", NamespaceInscopeCmd, NULL, NRNamespaceInscopeCmd}, - {"origin", NamespaceOriginCmd}, - {"parent", NamespaceParentCmd}, - {"path", NamespacePathCmd}, - {"qualifiers", NamespaceQualifiersCmd}, - {"tail", NamespaceTailCmd}, - {"unknown", NamespaceUnknownCmd}, - {"upvar", NamespaceUpvarCmd, TclCompileNamespaceUpvarCmd}, - {"which", NamespaceWhichCmd}, + {"children", NamespaceChildrenCmd, NULL, NULL, NULL, 0}, + {"code", NamespaceCodeCmd, NULL, NULL, NULL, 0}, + {"current", NamespaceCurrentCmd, NULL, NULL, NULL, 0}, + {"delete", NamespaceDeleteCmd, NULL, NULL, NULL, 0}, + {"ensemble", TclNamespaceEnsembleCmd, NULL, NULL, NULL, 0}, + {"eval", NamespaceEvalCmd, NULL, NRNamespaceEvalCmd, NULL, 0}, + {"exists", NamespaceExistsCmd, NULL, NULL, NULL, 0}, + {"export", NamespaceExportCmd, NULL, NULL, NULL, 0}, + {"forget", NamespaceForgetCmd, NULL, NULL, NULL, 0}, + {"import", NamespaceImportCmd, NULL, NULL, NULL, 0}, + {"inscope", NamespaceInscopeCmd, NULL, NULL, NRNamespaceInscopeCmd, 0}, + {"origin", NamespaceOriginCmd, NULL, NULL, NULL, 0}, + {"parent", NamespaceParentCmd, NULL, NULL, NULL, 0}, + {"path", NamespacePathCmd, NULL, NULL, NULL, 0}, + {"qualifiers", NamespaceQualifiersCmd, NULL, NULL, NULL, 0}, + {"tail", NamespaceTailCmd, NULL, NULL, NULL, 0}, + {"unknown", NamespaceUnknownCmd, NULL, NULL, NULL, 0}, + {"upvar", NamespaceUpvarCmd, TclCompileNamespaceUpvarCmd, NULL, NULL, 0}, + {"which", NamespaceWhichCmd, NULL, NULL, NULL, 0}, {NULL, NULL, NULL, NULL, NULL, 0} }; |