This is the mail archive of the
insight@sources.redhat.com
mailing list for the Insight project.
Re: Startup with --args
- From: Tom Tromey <tromey at redhat dot com>
- To: Keith Seitz <keiths at cygnus dot com>
- Cc: Insight List <insight at sourceware dot cygnus dot com>
- Date: 21 Nov 2001 15:38:26 -0700
- Subject: Re: Startup with --args
- References: <Pine.GSO.4.33.0111201649230.20281-100000@makita.cygnus.com>
- Reply-to: tromey at redhat dot com
>>>>> "Keith" == Keith Seitz <keiths@cygnus.com> writes:
>> I've been running with my --args patch installed for a while now.
>> Hopefully it will get its final approval soon.
Keith> Are you waiting on me for something?
Nope. I think (but I still have to check) that I got the last
approval for that patch from Elena today.
Keith> Is there a way to do this without modifying
Keith> session_notice_file_change? I don't know. It seems to me that
Keith> if we want to override the session's arguments, we should just
Keith> do that.
It never occurred to me. Unbelievable. How about the appended? It
is much simpler.
Tom
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