/[emacs]/emacs/lisp/gdb-ui.el
ViewVC logotype

Diff of /emacs/lisp/gdb-ui.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.47 by nickrob, Tue Oct 21 22:38:59 2003 UTC revision 1.48 by kfstorm, Wed Nov 19 23:40:17 2003 UTC
# Line 589  This filter may simply queue output for Line 589  This filter may simply queue output for
589  ;; any newlines.  ;; any newlines.
590  ;;  ;;
591    
592  (defcustom gud-gdba-command-name "~/gdb/gdb/gdb -annotate=3"  (defcustom gud-gdba-command-name "gdb -annotate=3"
593    "Default command to execute an executable under the GDB-UI debugger."    "Default command to execute an executable under the GDB-UI debugger."
594    :type 'string    :type 'string
595    :group 'gud)    :group 'gud)
# Line 933  static char *magick[] = { Line 933  static char *magick[] = {
933  \"  c red\",  \"  c red\",
934  \"+ c None\",  \"+ c None\",
935  /* pixels */  /* pixels */
936    \"+++    +++\",
937  \"++      ++\",  \"++      ++\",
938  \"+        +\",  \"+        +\",
939  \"          \",  \"          \",
940  \"          \",  \"          \",
941  \"          \",  \"          \",
942  \"          \",  \"          \",
 \"          \",  
 \"          \",  
943  \"+        +\",  \"+        +\",
944  \"++      ++\",  \"++      ++\",
945    \"+++    +++\",
946  };"  };"
947    "XPM data used for breakpoint icon.")    "XPM data used for breakpoint icon.")
948    
949  (defconst breakpoint-enabled-pbm-data  (defconst breakpoint-enabled-pbm-data
950  "P1  "P1
951  10 10\",  10 10\",
952    0 0 0 0 1 1 1 1 0 0 0 0
953  0 0 0 1 1 1 1 1 1 0 0 0  0 0 0 1 1 1 1 1 1 0 0 0
954  0 0 1 1 1 1 1 1 1 1 0 0  0 0 1 1 1 1 1 1 1 1 0 0
955  0 1 1 1 1 1 1 1 1 1 1 0  0 1 1 1 1 1 1 1 1 1 1 0
956  0 1 1 1 1 1 1 1 1 1 1 0  0 1 1 1 1 1 1 1 1 1 1 0
957  0 1 1 1 1 1 1 1 1 1 1 0  0 1 1 1 1 1 1 1 1 1 1 0
958  0 1 1 1 1 1 1 1 1 1 1 0  0 1 1 1 1 1 1 1 1 1 1 0
 0 1 1 1 1 1 1 1 1 1 1 0  
 0 1 1 1 1 1 1 1 1 1 1 0  
959  0 0 1 1 1 1 1 1 1 1 0 0  0 0 1 1 1 1 1 1 1 1 0 0
960  0 0 0 1 1 1 1 1 1 0 0 0"  0 0 0 1 1 1 1 1 1 0 0 0
961    0 0 0 0 1 1 1 1 0 0 0 0"
962    "PBM data used for enabled breakpoint icon.")    "PBM data used for enabled breakpoint icon.")
963    
964  (defconst breakpoint-disabled-pbm-data  (defconst breakpoint-disabled-pbm-data
# Line 977  static char *magick[] = { Line 977  static char *magick[] = {
977    "PBM data used for disabled breakpoint icon.")    "PBM data used for disabled breakpoint icon.")
978    
979  (defvar breakpoint-enabled-icon  (defvar breakpoint-enabled-icon
980    (find-image `((:type xpm :data ,breakpoint-xpm-data)    (find-image `((:type xpm :data ,breakpoint-xpm-data :ascent 100)
981                  (:type pbm :data ,breakpoint-enabled-pbm-data)))                  (:type pbm :data ,breakpoint-enabled-pbm-data :ascent 100)))
982    "Icon for enabled breakpoint in display margin")    "Icon for enabled breakpoint in display margin")
983    
984  (defvar breakpoint-disabled-icon  (defvar breakpoint-disabled-icon
985    (find-image `((:type xpm :data ,breakpoint-xpm-data :conversion disabled)    (find-image `((:type xpm :data ,breakpoint-xpm-data :conversion disabled :ascent 100)
986                  (:type pbm :data ,breakpoint-disabled-pbm-data)))                  (:type pbm :data ,breakpoint-disabled-pbm-data :ascent 100)))
987    "Icon for disabled breakpoint in display margin")    "Icon for disabled breakpoint in display margin")
988    
989  ;;-put breakpoint icons in relevant margins (even those set in the GUD buffer)  ;;-put breakpoint icons in relevant margins (even those set in the GUD buffer)

Legend:
Removed from v.1.47  
changed lines
  Added in v.1.48

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26