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