aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorRichard M. Stallman1994-06-18 21:04:14 +0000
committerRichard M. Stallman1994-06-18 21:04:14 +0000
commitba1e23bf7645113734ca1a953086cf6af8060fb1 (patch)
tree689c87b0d911abd52cf7fc7d5b8acbc719bae928 /src
parent4ea0847a369e878d119b8644454c04223fdfb193 (diff)
downloademacs-ba1e23bf7645113734ca1a953086cf6af8060fb1.tar.gz
emacs-ba1e23bf7645113734ca1a953086cf6af8060fb1.zip
Doc fixes.
Diffstat (limited to 'src')
-rw-r--r--src/.gdbinit26
1 files changed, 13 insertions, 13 deletions
diff --git a/src/.gdbinit b/src/.gdbinit
index c0e97b33c20..e1fb7540abd 100644
--- a/src/.gdbinit
+++ b/src/.gdbinit
@@ -25,21 +25,21 @@ output (enum Lisp_Type) (($ >> 24) & 0x7f)
25echo \n 25echo \n
26end 26end
27document xtype 27document xtype
28Print the type of $, assuming it is an Elisp value. 28Print the type of $, assuming it is an Emacs Lisp value.
29end 29end
30 30
31define xint 31define xint
32print (($ & 0x00ffffff) << 8) >> 8 32print (($ & 0x00ffffff) << 8) >> 8
33end 33end
34document xint 34document xint
35Print $, assuming it is an Elisp integer. This gets the sign right. 35Print $, assuming it is an Emacs Lisp integer. This gets the sign right.
36end 36end
37 37
38define xptr 38define xptr
39print (void *) (($ & 0x00ffffff) | $data_seg_bits) 39print (void *) (($ & 0x00ffffff) | $data_seg_bits)
40end 40end
41document xptr 41document xptr
42Print the pointer portion of $, assuming it is an Elisp value. 42Print the pointer portion of $, assuming it is an Emacs Lisp value.
43end 43end
44 44
45define xwindow 45define xwindow
@@ -47,7 +47,7 @@ print (struct window *) (($ & 0x00ffffff) | $data_seg_bits)
47printf "%dx%d+%d+%d\n", $->width, $->height, $->left, $->top 47printf "%dx%d+%d+%d\n", $->width, $->height, $->left, $->top
48end 48end
49document xwindow 49document xwindow
50Print $ as a window pointer, assuming it is an Elisp window value. 50Print $ as a window pointer, assuming it is an Emacs Lisp window value.
51Print the window's position as "WIDTHxHEIGHT+LEFT+TOP". 51Print the window's position as "WIDTHxHEIGHT+LEFT+TOP".
52end 52end
53 53
@@ -55,7 +55,7 @@ define xmarker
55print (struct Lisp_Marker *) (($ & 0x00ffffff) | $data_seg_bits) 55print (struct Lisp_Marker *) (($ & 0x00ffffff) | $data_seg_bits)
56end 56end
57document xmarker 57document xmarker
58Print $ as a marker pointer, assuming it is an Elisp marker value. 58Print $ as a marker pointer, assuming it is an Emacs Lisp marker value.
59end 59end
60 60
61define xbuffer 61define xbuffer
@@ -64,7 +64,7 @@ output &((struct Lisp_String *) ((($->name) & 0x00ffffff) | $data_seg_bits))->da
64echo \n 64echo \n
65end 65end
66document xbuffer 66document xbuffer
67Set $ as a buffer pointer, assuming it is an Elisp buffer value. 67Set $ as a buffer pointer, assuming it is an Emacs Lisp buffer value.
68Print the name of the buffer. 68Print the name of the buffer.
69end 69end
70 70
@@ -75,7 +75,7 @@ echo \n
75end 75end
76document xsymbol 76document xsymbol
77Print the name and address of the symbol $. 77Print the name and address of the symbol $.
78This command assumes that $ is an Elisp symbol value. 78This command assumes that $ is an Emacs Lisp symbol value.
79end 79end
80 80
81define xstring 81define xstring
@@ -85,7 +85,7 @@ echo \n
85end 85end
86document xstring 86document xstring
87Print the contents and address of the string $. 87Print the contents and address of the string $.
88This command assumes that $ is an Elisp string value. 88This command assumes that $ is an Emacs Lisp string value.
89end 89end
90 90
91define xvector 91define xvector
@@ -95,14 +95,14 @@ echo \n
95end 95end
96document xvector 96document xvector
97Print the contents and address of the vector $. 97Print the contents and address of the vector $.
98This command assumes that $ is an Elisp vector value. 98This command assumes that $ is an Emacs Lisp vector value.
99end 99end
100 100
101define xframe 101define xframe
102print (struct frame *) (($ & 0x00ffffff) | $data_seg_bits) 102print (struct frame *) (($ & 0x00ffffff) | $data_seg_bits)
103end 103end
104document xframe 104document xframe
105Print $ as a frame pointer, assuming it is an Elisp frame value. 105Print $ as a frame pointer, assuming it is an Emacs Lisp frame value.
106end 106end
107 107
108define xcons 108define xcons
@@ -111,21 +111,21 @@ output *$
111echo \n 111echo \n
112end 112end
113document xcons 113document xcons
114Print the contents of $, assuming it is an Elisp cons. 114Print the contents of $, assuming it is an Emacs Lisp cons.
115end 115end
116 116
117define xcar 117define xcar
118print ((($ >> 24) & 0x7f) == Lisp_Cons ? ((struct Lisp_Cons *) (($ & 0x00ffffff) | $data_seg_bits))->car : 0) 118print ((($ >> 24) & 0x7f) == Lisp_Cons ? ((struct Lisp_Cons *) (($ & 0x00ffffff) | $data_seg_bits))->car : 0)
119end 119end
120document xcar 120document xcar
121Print the car of $, assuming it is an Elisp pair. 121Print the car of $, assuming it is an Emacs Lisp pair.
122end 122end
123 123
124define xcdr 124define xcdr
125print ((($ >> 24) & 0x7f) == Lisp_Cons ? ((struct Lisp_Cons *) (($ & 0x00ffffff) | $data_seg_bits))->cdr : 0) 125print ((($ >> 24) & 0x7f) == Lisp_Cons ? ((struct Lisp_Cons *) (($ & 0x00ffffff) | $data_seg_bits))->cdr : 0)
126end 126end
127document xcdr 127document xcdr
128Print the cdr of $, assuming it is an Elisp pair. 128Print the cdr of $, assuming it is an Emacs Lisp pair.
129end 129end
130 130
131define xsubr 131define xsubr