]> sourceware.org Git - insight.git/commitdiff
Change set/show remotebaud commands to set/show serial baud.
authorPatrick Monnerat <patrick@monnerat.net>
Mon, 5 Mar 2018 02:46:29 +0000 (03:46 +0100)
committerPatrick Monnerat <patrick@monnerat.net>
Mon, 5 Mar 2018 02:46:29 +0000 (03:46 +0100)
The "remotebaud" subcommands have been removed from gdb and replaced by
"serial baud".

* gdbtk/library/interface.tcl (proc_set_baud): Use "set serial baud".
* gdbtk/library/targetselection.itb (TargetSelection::build_win): Use
  "show serial baud".
  (TargetSelection::change_baud): Use "set serial baud" and "show serial baud".
  (TargetSelection::cancel): Use "set serial baud".

gdbtk/library/interface.tcl
gdbtk/library/targetselection.itb

index 3272fc2de82dd89f9697c982d0bc1542b839f370..74f1bc3a0c50514fb7825070d5203dd39f648641 100644 (file)
@@ -1,5 +1,5 @@
 # Interface between GDB and Insight.
-# Copyright (C) 1997-2017 Red Hat, Inc.
+# Copyright (C) 1997-2018 Red Hat, Inc.
 #
 # This program is free software; you can redistribute it and/or modify it
 # under the terms of the GNU General Public License (GPL) as published by
@@ -1626,7 +1626,7 @@ proc set_baud {} {
     set baud [pref get gdb/load/baud]
   }
 #  debug "setting baud to $baud"
-  catch {gdb_cmd "set remotebaud $baud"}
+  catch {gdb_cmd "set serial baud $baud"}
 }
 
 # ------------------------------------------------------------------
index 3cbecdd5a13fee23aa2664a51a4a316c9dc42446..349af6b5c8738a62b7ffd930c3b159b4a52d4e90 100644 (file)
@@ -1,5 +1,5 @@
 # Target selection dialog for Insight.
-# Copyright (C) 1997-2015 Red Hat, Inc.
+# Copyright (C) 1997-2018 Red Hat, Inc.
 #
 # This program is free software; you can redistribute it and/or modify it
 # under the terms of the GNU General Public License (GPL) as published by
@@ -415,7 +415,7 @@ itcl::body TargetSelection::build_win {} {
     -textvariable [pref varname gdb/load/$target-baud] -width $Width \
     -maxheight 10 -bg $::Colors(textbg)
 
-  if {[catch {gdb_cmd "show remotebaud"} res]} {
+  if {[catch {gdb_cmd "show serial baud"} res]} {
     set baud [pref get gdb/load/$target-baud]
   } else {
     set baud [lindex $res end]
@@ -870,8 +870,8 @@ itcl::body TargetSelection::change_baud {w {baud ""}} {
   if {$baud != ""} {
     if {([string compare $baud "TCP"] != 0)
         && ([string compare $baud "ETH"] != 0)} {
-      gdb_cmd "set remotebaud $baud"
-      if {[catch {gdb_cmd "show remotebaud"} res]} {
+      gdb_cmd "set serial baud $baud"
+      if {[catch {gdb_cmd "show serial baud"} res]} {
        set newbaud 0
       } else {
        set newbaud [lindex $res end]
@@ -976,7 +976,7 @@ itcl::body TargetSelection::save {} {
 # ------------------------------------------------------------------
 itcl::body TargetSelection::cancel {} {
   global gdb_target_name
-  catch {gdb_cmd "set remotebaud $saved_baud"}
+  catch {gdb_cmd "set serial baud $saved_baud"}
 
   $fr.cb configure -value $saved_baud
   write_saved
This page took 0.037083 seconds and 5 git commands to generate.