From mboxrd@z Thu Jan  1 00:00:00 1970
From: Keith Seitz <keiths@cygnus.com>
To: Tom Tromey <tromey@redhat.com>
Cc: Insight List <insight@sourceware.cygnus.com>
Subject: Re: Startup with --args
Date: Wed, 21 Nov 2001 14:45:00 -0000
Message-ID: <Pine.GSO.4.33.0111211442230.28893-100000@makita.cygnus.com>
References: <87d72biwbh.fsf@creche.redhat.com>
X-SW-Source: 2001-q4/msg00353.html
Message-ID: <20011121144500.0KF6Jk_EplhVO7ZRxpOoL5VrZf9X5bFo380GO6Al9-w@z>

On 21 Nov 2001, Tom Tromey wrote:

> It never occurred to me.  Unbelievable.  How about the appended?  It
> is much simpler.

YES! Love that isolation! Of course, late last night I convinced myself
that maybe your original patch is correct, too. :-(

Time will tell.
Keith

> Index: ChangeLog
> from  Tom Tromey  <tromey@redhat.com>
>
> 	* library/interface.tcl (gdbtk_tcl_preloop): Override session's
> 	command-line arguments if required.
>
> Index: library/interface.tcl
> ===================================================================
> RCS file: /cvs/src/src/gdb/gdbtk/library/interface.tcl,v
> retrieving revision 1.32
> diff -u -r1.32 interface.tcl
> --- library/interface.tcl 2001/11/19 18:43:19 1.32
> +++ library/interface.tcl 2001/11/21 22:36:53
> @@ -113,8 +113,14 @@
>
>    if {$gdb_exe_name != ""} {
>      # At startup, file_changed_hook is called too late for us, so we
> -    # must notice the initial session by hand.
> +    # must notice the initial session by hand.  If the arguments exist
> +    # -- if the user used `gdb --args' -- then we want the new
> +    # arguments to override the session's arguments.
> +    set current_args [gdb_get_inferior_args]
>      session_notice_file_change
> +    if {[string length $current_args] > 0} {
> +      gdb_set_inferior_args $current_args
> +    }
>    }
>
>    gdbtk_update
>