Mercurial > emacs
comparison lisp/gdb-ui.el @ 52868:34fccd9658c6
(breakpoint-xpm-data, breakpoint-enabled-pbm-data)
(breakpoint-disabled-pbm-data): Make breakpoint icons 10x10
instead of 12x12.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Thu, 16 Oct 2003 19:26:49 +0000 |
parents | f49c1c4d92de |
children | f27266006051 |
comparison
equal
deleted
inserted
replaced
52867:e5dd8a7a6092 | 52868:34fccd9658c6 |
---|---|
936 (defvar gdb-cdir nil "Compilation directory.") | 936 (defvar gdb-cdir nil "Compilation directory.") |
937 | 937 |
938 (defconst breakpoint-xpm-data "/* XPM */ | 938 (defconst breakpoint-xpm-data "/* XPM */ |
939 static char *magick[] = { | 939 static char *magick[] = { |
940 /* columns rows colors chars-per-pixel */ | 940 /* columns rows colors chars-per-pixel */ |
941 \"12 12 2 1\", | 941 \"10 10 2 1\", |
942 \" c red\", | 942 \" c red\", |
943 \"+ c None\", | 943 \"+ c None\", |
944 /* pixels */ | 944 /* pixels */ |
945 \"++++++++++++\", | 945 \"++ ++\", |
946 \"+++ +++\", | 946 \"+ +\", |
947 \"++ ++\", | 947 \" \", |
948 \"+ +\", | 948 \" \", |
949 \"+ +\", | 949 \" \", |
950 \"+ +\", | 950 \" \", |
951 \"+ +\", | 951 \" \", |
952 \"+ +\", | 952 \" \", |
953 \"+ +\", | 953 \"+ +\", |
954 \"++ ++\", | 954 \"++ ++\", |
955 \"+++ +++\", | |
956 \"++++++++++++\" | |
957 };" | 955 };" |
958 "XPM data used for breakpoint icon.") | 956 "XPM data used for breakpoint icon.") |
959 | 957 |
960 (defconst breakpoint-enabled-pbm-data | 958 (defconst breakpoint-enabled-pbm-data |
961 "P1 | 959 "P1 |
962 12 12\", | 960 10 10\", |
963 0 0 0 0 0 0 0 0 0 0 0 0 | |
964 0 0 0 1 1 1 1 1 1 0 0 0 | 961 0 0 0 1 1 1 1 1 1 0 0 0 |
965 0 0 1 1 1 1 1 1 1 1 0 0 | 962 0 0 1 1 1 1 1 1 1 1 0 0 |
966 0 1 1 1 1 1 1 1 1 1 1 0 | 963 0 1 1 1 1 1 1 1 1 1 1 0 |
967 0 1 1 1 1 1 1 1 1 1 1 0 | 964 0 1 1 1 1 1 1 1 1 1 1 0 |
968 0 1 1 1 1 1 1 1 1 1 1 0 | 965 0 1 1 1 1 1 1 1 1 1 1 0 |
969 0 1 1 1 1 1 1 1 1 1 1 0 | 966 0 1 1 1 1 1 1 1 1 1 1 0 |
970 0 1 1 1 1 1 1 1 1 1 1 0 | 967 0 1 1 1 1 1 1 1 1 1 1 0 |
971 0 1 1 1 1 1 1 1 1 1 1 0 | 968 0 1 1 1 1 1 1 1 1 1 1 0 |
972 0 0 1 1 1 1 1 1 1 1 0 0 | 969 0 0 1 1 1 1 1 1 1 1 0 0 |
973 0 0 0 1 1 1 1 1 1 0 0 0 | 970 0 0 0 1 1 1 1 1 1 0 0 0" |
974 0 0 0 0 0 0 0 0 0 0 0 0" | |
975 "PBM data used for enabled breakpoint icon.") | 971 "PBM data used for enabled breakpoint icon.") |
976 | 972 |
977 (defconst breakpoint-disabled-pbm-data | 973 (defconst breakpoint-disabled-pbm-data |
978 "P1 | 974 "P1 |
979 12 12\", | 975 10 10\", |
980 0 0 0 0 0 0 0 0 0 0 0 0 | 976 0 0 1 0 1 0 1 0 0 0 |
981 0 0 0 1 0 1 0 1 0 0 0 0 | 977 0 1 0 1 0 1 0 1 0 0 |
982 0 0 1 0 1 0 1 0 1 0 0 0 | 978 1 0 1 0 1 0 1 0 1 0 |
983 0 1 0 1 0 1 0 1 0 1 0 0 | 979 0 1 0 1 0 1 0 1 0 1 |
984 0 0 1 0 1 0 1 0 1 0 1 0 | 980 1 0 1 0 1 0 1 0 1 0 |
985 0 1 0 1 0 1 0 1 0 1 0 0 | 981 0 1 0 1 0 1 0 1 0 1 |
986 0 0 1 0 1 0 1 0 1 0 1 0 | 982 1 0 1 0 1 0 1 0 1 0 |
987 0 1 0 1 0 1 0 1 0 1 0 0 | 983 0 1 0 1 0 1 0 1 0 1 |
988 0 0 1 0 1 0 1 0 1 0 1 0 | 984 0 0 1 0 1 0 1 0 1 0 |
989 0 0 0 1 0 1 0 1 0 1 0 0 | 985 0 0 0 1 0 1 0 1 0 0" |
990 0 0 0 0 1 0 1 0 1 0 0 0 | |
991 0 0 0 0 0 0 0 0 0 0 0 0" | |
992 "PBM data used for disabled breakpoint icon.") | 986 "PBM data used for disabled breakpoint icon.") |
993 | 987 |
994 (defvar breakpoint-enabled-icon | 988 (defvar breakpoint-enabled-icon |
995 (find-image `((:type xpm :data ,breakpoint-xpm-data) | 989 (find-image `((:type xpm :data ,breakpoint-xpm-data) |
996 (:type pbm :data ,breakpoint-enabled-pbm-data))) | 990 (:type pbm :data ,breakpoint-enabled-pbm-data))) |