From mboxrd@z Thu Jan  1 00:00:00 1970
From: Syd Polk <spolk@redhat.com>
To: Fernando Nasser <fnasser@cygnus.com>, insight@sourceware.cygnus.com
Subject: Re: PATCH: Download sometimes fails to find exec file
Date: Wed, 04 Oct 2000 12:52:00 -0000
Message-id: <4.2.0.58.20001004125347.00dc1b00@pop.cygnus.com>
References: <39DB857A.9900D88F@cygnus.com>
X-SW-Source: 2000-q4/msg00016.html

At 03:31 PM 10/4/00 -0400, Fernando Nasser wrote:
>This is quite similar to the previous problem.  It is also related to
>passing Cygwin filenames to Tcl.
>
>Here you are, sometimes, prevented to download your executable because
>Insight thinks that the file does not exist.
>
>--
>Fernando Nasser
>Red Hat - Toronto                       E-Mail:  fnasser@redhat.com
>2323 Yonge Street, Suite #300
>Toronto, Ontario   M4P 2C9
>
>
>
>Index: download.itb
>===================================================================
>RCS file: /cvs/cvsfiles/devo/gdb/gdbtk/library/download.itb,v
>retrieving revision 1.1
>diff -c -p -r1.1 download.itb
>*** download.itb        2000/02/04 13:52:34     1.1
>--- download.itb        2000/10/04 19:27:58
>*************** body Download::download_it { } {
>*** 147,152 ****
>--- 147,153 ----
>     global gdb_exe_name gdb_downloading gdb_loaded
>     global gdb_target_name gdb_pretty_name
>     global gdb_running
>+   global tcl_platform
>
>     debug "exe=$gdb_exe_name downloading=$gdb_downloading"
>     debug "    loaded=$gdb_loaded target=$gdb_target_name 
> running=$gdb_running"
>*************** body Download::download_it { } {
>*** 185,191 ****
>       }
>     }
>
>!   if {! [file exists $gdb_exe_name]} {
>       tk_messageBox -icon error -title GDB -type ok -modal task\
>         -message "Request to download non-existent executable $gdb_exe_name"
>       set gdb_downloading 0
>--- 186,195 ----
>       }
>     }
>
>!   if {[string compare $tcl_platform(platform) "windows"] == 0} {
>!     set f [ide_cygwin_path to_win32 $gdb_exe_name]
>!   }

What is "f" set to here if the platform is not windows?

>!   if {! [file exists $f]} {
>       tk_messageBox -icon error -title GDB -type ok -modal task\
>         -message "Request to download non-existent executable $gdb_exe_name"
>       set gdb_downloading 0

Syd Polk		spolk@redhat.com
Engineering Manager	+1 415 777 9810 x 241
Red Hat, Inc.