changeset 589:9c80c9229b84

Adapt to a change in Tcl behaviour
author bartv
date Tue, 11 Feb 2003 22:50:15 +0000
parents 4c4d0af923f7
children 8cd2a5dfbb00
files host/tools/configtool/standalone/common/ChangeLog host/tools/configtool/standalone/common/ecosconfig.cxx
diffstat 2 files changed, 12 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/host/tools/configtool/standalone/common/ChangeLog
+++ b/host/tools/configtool/standalone/common/ChangeLog
@@ -1,3 +1,11 @@
+2003-02-11  Bart Veer  <bartv@ecoscentric.com>
+
+	* ecosconfig.cxx:
+	With tcl 8.4 on a windows platform it is now necessary to call
+	Tcl_FindExecutable(). Otherwise Tcl does not get properly
+	initialized, and can end up indirecting through a NULL function
+	pointer.
+
 2002-02-05  Bart Veer  <bartv@redhat.com>
 
 	* cdl_exec.cxx, cdl_exec.hxx, ecosconfig.cxx:
--- a/host/tools/configtool/standalone/common/ecosconfig.cxx
+++ b/host/tools/configtool/standalone/common/ecosconfig.cxx
@@ -1,6 +1,7 @@
 //####COPYRIGHTBEGIN####
 //                                                                          
 // ----------------------------------------------------------------------------
+// Copyright (C) 2003 Bart Veer
 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
 //
 // This program is part of the eCos host tools.
@@ -93,7 +94,9 @@ int main (int argc, char * argv []) {
     bool help = false;          // --help
     bool enable_debug_set = false;  // --enable-debug or --disable-debug
     int  debug_level = 0;       // --enable-debug=[0|1|2]
-        
+
+    Tcl_FindExecutable(argv[0]);
+    
     // getopt() cannot easily be used here since this code has to
     // build with VC++ as well.
     bool args_ok = true;