public inbox for insight@sourceware.org
 help / color / mirror / Atom feed
* [patch] Fix saving of sessions (or lack of...)
@ 2000-12-29 23:55 Fernando Nasser
  2001-01-02 19:43 ` Fernando Nasser
  0 siblings, 1 reply; 2+ messages in thread
From: Fernando Nasser @ 2000-12-29 23:55 UTC (permalink / raw)
  To: Insight List

If we exit a debugging session while the inferior is running, or while
we are downloading, the session is not saved.

I believe the session should be saved anyway.

The patch is attached.

ChangeLog:

   * interface.tcl (gdbtk_quit_check): Save session whenever possible.
Index: interface.tcl
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/interface.tcl,v
retrieving revision 1.11
diff -c -p -r1.11 interface.tcl
*** interface.tcl	2000/12/07 21:56:25	1.11
--- interface.tcl	2000/12/30 07:45:36
*************** proc gdbtk_quit_check {} {
*** 222,228 ****
      if {![gdbtk_tcl_query $msg no]} {
        return 0
      }
!   } elseif {$gdb_exe_name != ""} {
      session_save
    }
    return 1
--- 222,231 ----
      if {![gdbtk_tcl_query $msg no]} {
        return 0
      }
!   }
!   
!   # If we have an executable file loaded, save a session associated to it
!   if {$gdb_exe_name != ""} {
      session_save
    }
    return 1

^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: [patch] Fix saving of sessions (or lack of...)
  2000-12-29 23:55 [patch] Fix saving of sessions (or lack of...) Fernando Nasser
@ 2001-01-02 19:43 ` Fernando Nasser
  0 siblings, 0 replies; 2+ messages in thread
From: Fernando Nasser @ 2001-01-02 19:43 UTC (permalink / raw)
  To: Insight List

This one is in.

Fernando Nasser wrote:
> 
> If we exit a debugging session while the inferior is running, or while
> we are downloading, the session is not saved.
> 
> I believe the session should be saved anyway.
> 
> The patch is attached.
> 
> ChangeLog:
> 
>    * library/interface.tcl (gdbtk_quit_check): Save session whenever
>    possible.
> 
>   ------------------------------------------------------------------------
> Index: interface.tcl
> ===================================================================
> RCS file: /cvs/src/src/gdb/gdbtk/library/interface.tcl,v
> retrieving revision 1.11
> diff -c -p -r1.11 interface.tcl
> *** interface.tcl       2000/12/07 21:56:25     1.11
> --- interface.tcl       2000/12/30 07:45:36
> *************** proc gdbtk_quit_check {} {
> *** 222,228 ****
>       if {![gdbtk_tcl_query $msg no]} {
>         return 0
>       }
> !   } elseif {$gdb_exe_name != ""} {
>       session_save
>     }
>     return 1
> --- 222,231 ----
>       if {![gdbtk_tcl_query $msg no]} {
>         return 0
>       }
> !   }
> !
> !   # If we have an executable file loaded, save a session associated to it
> !   if {$gdb_exe_name != ""} {
>       session_save
>     }
>     return 1

-- 
Fernando Nasser
Red Hat Canada Ltd.                     E-Mail:  fnasser@redhat.com
2323 Yonge Street, Suite #300
Toronto, Ontario   M4P 2C9

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2001-01-02 19:43 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2000-12-29 23:55 [patch] Fix saving of sessions (or lack of...) Fernando Nasser
2001-01-02 19:43 ` Fernando Nasser

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).