Tcl Source Code

The routine TclpInitLibraryPath constructs a
search path for Tcl, and stores it in the
Tcl variable ::tcl_libPath.  The path is
used in the search for an init.tcl file by
the default operation of Tcl_Init().

The intent is to include on this path the
names of several directories, relative to
the executable, where the init.tcl might be
in any of the various directory layouts of Tcl,
both installed and development.

Some of the directories meant to represent
the development directory layout include
the name of the root directory.  In forming
that name, the rule is followed that for
alpha and beta releases, the name is
tcl[info patchlevel], while for stable releases,
the name is tcl[info tclversion].

Looking at the name of the root directory
created by Tcl's own 'make dist' target,
however, the root directory name of a Tcl
source distribution is:

DISTNAME = tcl@TCL_VERSION@@TCL_PATCH_LEVEL@

That is, the full patch level is always used.

These different parts of Tcl should agree about
what the root directory name of a Tcl source
distribution is.

Here's a patch, correcting TclpInitLibraryPath,
and also correcting [tcl_findLibrary] so it
remains consistent as well.

Logged In: YES 
user_id=80530

Committed.

File Added - 10028: libpath.patch