* unix/configure.in: Updated TCL_PACKAGE_PATH value to

        * win/configure.in:     handle --libdir configuration.

        * unix/configure.in:    autoconf-2.57
        * win/configure.in:

        * generic/tclBasic.c (Tcl_CreateInterp): Moved call to
        TclInitEmbeddedConfigurationInformation() earlier in
        Tcl_CreateInterp() so that other parts of interp creation
        and initialization may access and use the config values.

1 files changed, 10 insertions, 9 deletions

diff --git a/generic/tclBasic.c b/generic/tclBasic.c
index cf68241..20a46d0 100644
--- a/generic/tclBasic.c
+++ b/generic/tclBasic.c
@@ -13,7 +13,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclBasic.c,v 1.104 2004/05/30 12:18:25 dkf Exp $
+ * RCS: @(#) $Id: tclBasic.c,v 1.105 2004/06/11 20:25:21 dgp Exp $
  */
 
 #include "tclInt.h"
@@ -528,6 +528,15 @@ Tcl_CreateInterp()
 #endif
 
     /*
+     * TIP #59: Make embedded configuration information
+     * available. This makes use of a public API call
+     * (Tcl_RegisterConfig) and thus requires that the global stub
+     * table is initialized.
+     */
+
+    TclInitEmbeddedConfigurationInformation (interp);
+
+    /*
      * Compute the byte order of this machine.
      */
 
@@ -574,14 +583,6 @@ Tcl_CreateInterp()
 #endif
     Tcl_InitStubs(interp, TCL_VERSION, 1);
 
-    /*
-     * TIP #59: Make embedded configuration information
-     * available. This makes use of a public API call
-     * (Tcl_RegisterConfig) and thus requires that the global stub
-     * table is initialized.
-     */
-
-    TclInitEmbeddedConfigurationInformation (interp);
     return interp;
 }