Commit | Line | Data |
---|---|---|
a44af9f2 RS |
1 | @c -*-texinfo-*- |
2 | @c This is part of the GNU Emacs Lisp Reference Manual. | |
fd897522 | 3 | @c Copyright (C) 1990, 1991, 1992, 1993, 1998, 1999 |
88510b17 | 4 | @c Free Software Foundation, Inc. |
a44af9f2 RS |
5 | @c See the file elisp.texi for copying conditions. |
6 | @setfilename ../info/internals | |
7 | @node GNU Emacs Internals, Standard Errors, Tips, Top | |
8 | @comment node-name, next, previous, up | |
9 | @appendix GNU Emacs Internals | |
10 | ||
11 | This chapter describes how the runnable Emacs executable is dumped with | |
12 | the preloaded Lisp libraries in it, how storage is allocated, and some | |
13 | internal aspects of GNU Emacs that may be of interest to C programmers. | |
14 | ||
15 | @menu | |
969fe9b5 | 16 | * Building Emacs:: How to the dumped Emacs is made. |
a44af9f2 RS |
17 | * Pure Storage:: A kludge to make preloaded Lisp functions sharable. |
18 | * Garbage Collection:: Reclaiming space for Lisp objects no longer used. | |
969fe9b5 | 19 | * Memory Usage:: Info about total size of Lisp objects made so far. |
a44af9f2 RS |
20 | * Writing Emacs Primitives:: Writing C code for Emacs. |
21 | * Object Internals:: Data formats of buffers, windows, processes. | |
22 | @end menu | |
23 | ||
969fe9b5 | 24 | @node Building Emacs |
a44af9f2 RS |
25 | @appendixsec Building Emacs |
26 | @cindex building Emacs | |
27 | @pindex temacs | |
28 | ||
29 | This section explains the steps involved in building the Emacs | |
30 | executable. You don't have to know this material to build and install | |
31 | Emacs, since the makefiles do all these things automatically. This | |
32 | information is pertinent to Emacs maintenance. | |
33 | ||
34 | Compilation of the C source files in the @file{src} directory | |
35 | produces an executable file called @file{temacs}, also called a | |
36 | @dfn{bare impure Emacs}. It contains the Emacs Lisp interpreter and I/O | |
37 | routines, but not the editing commands. | |
38 | ||
39 | @cindex @file{loadup.el} | |
40 | The command @w{@samp{temacs -l loadup}} uses @file{temacs} to create | |
41 | the real runnable Emacs executable. These arguments direct | |
42 | @file{temacs} to evaluate the Lisp files specified in the file | |
43 | @file{loadup.el}. These files set up the normal Emacs editing | |
574efc83 | 44 | environment, resulting in an Emacs that is still impure but no longer |
a44af9f2 RS |
45 | bare. |
46 | ||
47 | It takes a substantial time to load the standard Lisp files. Luckily, | |
48 | you don't have to do this each time you run Emacs; @file{temacs} can | |
574efc83 | 49 | dump out an executable program called @file{emacs} that has these files |
a44af9f2 RS |
50 | preloaded. @file{emacs} starts more quickly because it does not need to |
51 | load the files. This is the Emacs executable that is normally | |
52 | installed. | |
53 | ||
54 | To create @file{emacs}, use the command @samp{temacs -batch -l loadup | |
55 | dump}. The purpose of @samp{-batch} here is to prevent @file{temacs} | |
56 | from trying to initialize any of its data on the terminal; this ensures | |
57 | that the tables of terminal information are empty in the dumped Emacs. | |
58 | The argument @samp{dump} tells @file{loadup.el} to dump a new executable | |
59 | named @file{emacs}. | |
60 | ||
61 | Some operating systems don't support dumping. On those systems, you | |
62 | must start Emacs with the @samp{temacs -l loadup} command each time you | |
a890e1b0 RS |
63 | use it. This takes a substantial time, but since you need to start |
64 | Emacs once a day at most---or once a week if you never log out---the | |
65 | extra time is not too severe a problem. | |
a44af9f2 RS |
66 | |
67 | @cindex @file{site-load.el} | |
95260b26 | 68 | |
a44af9f2 | 69 | You can specify additional files to preload by writing a library named |
95260b26 GM |
70 | @file{site-load.el} that loads them. You may need to add a definition |
71 | ||
72 | @example | |
73 | #define SITELOAD_PURESIZE_EXTRA @var{n} | |
74 | @end example | |
75 | ||
76 | @noindent | |
77 | to make @var{n} added bytes of pure space to hold the additional files. | |
78 | (Try adding increments of 20000 until it is big enough.) However, the | |
79 | advantage of preloading additional files decreases as machines get | |
80 | faster. On modern machines, it is usually not advisable. | |
a44af9f2 | 81 | |
2a664e73 RS |
82 | After @file{loadup.el} reads @file{site-load.el}, it finds the |
83 | documentation strings for primitive and preloaded functions (and | |
568ffbee LT |
84 | variables) in the file @file{etc/DOC} where they are stored, by |
85 | calling @code{Snarf-documentation} (@pxref{Definition of | |
86 | Snarf-documentation,, Accessing Documentation}). | |
2a664e73 | 87 | |
a44af9f2 | 88 | @cindex @file{site-init.el} |
a890e1b0 | 89 | You can specify other Lisp expressions to execute just before dumping |
2a664e73 RS |
90 | by putting them in a library named @file{site-init.el}. This file is |
91 | executed after the documentation strings are found. | |
a44af9f2 | 92 | |
2a664e73 RS |
93 | If you want to preload function or variable definitions, there are |
94 | three ways you can do this and make their documentation strings | |
95 | accessible when you subsequently run Emacs: | |
96 | ||
97 | @itemize @bullet | |
98 | @item | |
99 | Arrange to scan these files when producing the @file{etc/DOC} file, | |
100 | and load them with @file{site-load.el}. | |
101 | ||
102 | @item | |
103 | Load the files with @file{site-init.el}, then copy the files into the | |
104 | installation directory for Lisp files when you install Emacs. | |
105 | ||
106 | @item | |
107 | Specify a non-@code{nil} value for | |
8241495d | 108 | @code{byte-compile-dynamic-docstrings} as a local variable in each of these |
2a664e73 RS |
109 | files, and load them with either @file{site-load.el} or |
110 | @file{site-init.el}. (This method has the drawback that the | |
111 | documentation strings take up space in Emacs all the time.) | |
112 | @end itemize | |
113 | ||
114 | It is not advisable to put anything in @file{site-load.el} or | |
115 | @file{site-init.el} that would alter any of the features that users | |
116 | expect in an ordinary unmodified Emacs. If you feel you must override | |
117 | normal features for your site, do it with @file{default.el}, so that | |
8241495d | 118 | users can override your changes if they wish. @xref{Startup Summary}. |
a44af9f2 RS |
119 | |
120 | @defun dump-emacs to-file from-file | |
121 | @cindex unexec | |
cb017dde | 122 | This function dumps the current state of Emacs into an executable file |
a44af9f2 RS |
123 | @var{to-file}. It takes symbols from @var{from-file} (this is normally |
124 | the executable file @file{temacs}). | |
125 | ||
cb017dde RS |
126 | If you want to use this function in an Emacs that was already dumped, |
127 | you must run Emacs with @samp{-batch}. | |
a44af9f2 RS |
128 | @end defun |
129 | ||
969fe9b5 | 130 | @node Pure Storage |
a44af9f2 RS |
131 | @appendixsec Pure Storage |
132 | @cindex pure storage | |
133 | ||
a890e1b0 RS |
134 | Emacs Lisp uses two kinds of storage for user-created Lisp objects: |
135 | @dfn{normal storage} and @dfn{pure storage}. Normal storage is where | |
8241495d | 136 | all the new data created during an Emacs session are kept; see the |
574efc83 RS |
137 | following section for information on normal storage. Pure storage is |
138 | used for certain data in the preloaded standard Lisp files---data that | |
139 | should never change during actual use of Emacs. | |
a44af9f2 RS |
140 | |
141 | Pure storage is allocated only while @file{temacs} is loading the | |
142 | standard preloaded Lisp libraries. In the file @file{emacs}, it is | |
574efc83 | 143 | marked as read-only (on operating systems that permit this), so that |
a44af9f2 RS |
144 | the memory space can be shared by all the Emacs jobs running on the |
145 | machine at once. Pure storage is not expandable; a fixed amount is | |
146 | allocated when Emacs is compiled, and if that is not sufficient for the | |
a890e1b0 RS |
147 | preloaded libraries, @file{temacs} crashes. If that happens, you must |
148 | increase the compilation parameter @code{PURESIZE} in the file | |
a44af9f2 RS |
149 | @file{src/puresize.h}. This normally won't happen unless you try to |
150 | preload additional libraries or add features to the standard ones. | |
151 | ||
152 | @defun purecopy object | |
8241495d RS |
153 | This function makes a copy in pure storage of @var{object}, and returns |
154 | it. It copies a string by simply making a new string with the same | |
568ffbee LT |
155 | characters, but without text properties, in pure storage. It |
156 | recursively copies the contents of vectors and cons cells. It does | |
157 | not make copies of other objects such as symbols, but just returns | |
158 | them unchanged. It signals an error if asked to copy markers. | |
a44af9f2 | 159 | |
c2cd5fb7 RS |
160 | This function is a no-op except while Emacs is being built and dumped; |
161 | it is usually called only in the file @file{emacs/lisp/loaddefs.el}, but | |
162 | a few packages call it just in case you decide to preload them. | |
a44af9f2 RS |
163 | @end defun |
164 | ||
165 | @defvar pure-bytes-used | |
a890e1b0 | 166 | The value of this variable is the number of bytes of pure storage |
a44af9f2 RS |
167 | allocated so far. Typically, in a dumped Emacs, this number is very |
168 | close to the total amount of pure storage available---if it were not, | |
169 | we would preallocate less. | |
170 | @end defvar | |
171 | ||
172 | @defvar purify-flag | |
a890e1b0 | 173 | This variable determines whether @code{defun} should make a copy of the |
a44af9f2 RS |
174 | function definition in pure storage. If it is non-@code{nil}, then the |
175 | function definition is copied into pure storage. | |
176 | ||
a890e1b0 | 177 | This flag is @code{t} while loading all of the basic functions for |
a44af9f2 | 178 | building Emacs initially (allowing those functions to be sharable and |
a890e1b0 RS |
179 | non-collectible). Dumping Emacs as an executable always writes |
180 | @code{nil} in this variable, regardless of the value it actually has | |
181 | before and after dumping. | |
a44af9f2 | 182 | |
a890e1b0 | 183 | You should not change this flag in a running Emacs. |
a44af9f2 RS |
184 | @end defvar |
185 | ||
969fe9b5 | 186 | @node Garbage Collection |
a44af9f2 RS |
187 | @appendixsec Garbage Collection |
188 | @cindex garbage collector | |
189 | ||
190 | @cindex memory allocation | |
191 | When a program creates a list or the user defines a new function (such | |
a890e1b0 RS |
192 | as by loading a library), that data is placed in normal storage. If |
193 | normal storage runs low, then Emacs asks the operating system to | |
a44af9f2 | 194 | allocate more memory in blocks of 1k bytes. Each block is used for one |
a890e1b0 RS |
195 | type of Lisp object, so symbols, cons cells, markers, etc., are |
196 | segregated in distinct blocks in memory. (Vectors, long strings, | |
197 | buffers and certain other editing types, which are fairly large, are | |
198 | allocated in individual blocks, one per object, while small strings are | |
199 | packed into blocks of 8k bytes.) | |
200 | ||
201 | It is quite common to use some storage for a while, then release it by | |
202 | (for example) killing a buffer or deleting the last pointer to an | |
a44af9f2 RS |
203 | object. Emacs provides a @dfn{garbage collector} to reclaim this |
204 | abandoned storage. (This name is traditional, but ``garbage recycler'' | |
205 | might be a more intuitive metaphor for this facility.) | |
206 | ||
a890e1b0 RS |
207 | The garbage collector operates by finding and marking all Lisp objects |
208 | that are still accessible to Lisp programs. To begin with, it assumes | |
209 | all the symbols, their values and associated function definitions, and | |
574efc83 | 210 | any data presently on the stack, are accessible. Any objects that can |
a890e1b0 RS |
211 | be reached indirectly through other accessible objects are also |
212 | accessible. | |
a44af9f2 | 213 | |
a890e1b0 | 214 | When marking is finished, all objects still unmarked are garbage. No |
a44af9f2 | 215 | matter what the Lisp program or the user does, it is impossible to refer |
a890e1b0 | 216 | to them, since there is no longer a way to reach them. Their space |
574efc83 RS |
217 | might as well be reused, since no one will miss them. The second |
218 | (``sweep'') phase of the garbage collector arranges to reuse them. | |
a44af9f2 | 219 | |
05aea714 | 220 | @c ??? Maybe add something describing weak hash tables here? |
95260b26 | 221 | |
a44af9f2 | 222 | @cindex free list |
a890e1b0 RS |
223 | The sweep phase puts unused cons cells onto a @dfn{free list} |
224 | for future allocation; likewise for symbols and markers. It compacts | |
225 | the accessible strings so they occupy fewer 8k blocks; then it frees the | |
574efc83 | 226 | other 8k blocks. Vectors, buffers, windows, and other large objects are |
a890e1b0 | 227 | individually allocated and freed using @code{malloc} and @code{free}. |
a44af9f2 RS |
228 | |
229 | @cindex CL note---allocate more storage | |
230 | @quotation | |
574efc83 | 231 | @b{Common Lisp note:} Unlike other Lisps, GNU Emacs Lisp does not |
a44af9f2 RS |
232 | call the garbage collector when the free list is empty. Instead, it |
233 | simply requests the operating system to allocate more storage, and | |
234 | processing continues until @code{gc-cons-threshold} bytes have been | |
235 | used. | |
236 | ||
237 | This means that you can make sure that the garbage collector will not | |
238 | run during a certain portion of a Lisp program by calling the garbage | |
239 | collector explicitly just before it (provided that portion of the | |
240 | program does not use so much space as to force a second garbage | |
241 | collection). | |
242 | @end quotation | |
243 | ||
244 | @deffn Command garbage-collect | |
a890e1b0 | 245 | This command runs a garbage collection, and returns information on |
a44af9f2 RS |
246 | the amount of space in use. (Garbage collection can also occur |
247 | spontaneously if you use more than @code{gc-cons-threshold} bytes of | |
248 | Lisp data since the previous garbage collection.) | |
249 | ||
a890e1b0 | 250 | @code{garbage-collect} returns a list containing the following |
a44af9f2 RS |
251 | information: |
252 | ||
a890e1b0 | 253 | @example |
a44af9f2 RS |
254 | @group |
255 | ((@var{used-conses} . @var{free-conses}) | |
256 | (@var{used-syms} . @var{free-syms}) | |
a890e1b0 | 257 | @end group |
969fe9b5 | 258 | (@var{used-miscs} . @var{free-miscs}) |
40d48fe9 | 259 | @var{used-string-chars} |
a44af9f2 | 260 | @var{used-vector-slots} |
f9f59935 | 261 | (@var{used-floats} . @var{free-floats}) |
40d48fe9 EZ |
262 | (@var{used-intervals} . @var{free-intervals}) |
263 | (@var{used-strings} . @var{free-strings})) | |
969fe9b5 RS |
264 | @end example |
265 | ||
266 | Here is an example: | |
267 | ||
268 | @example | |
a890e1b0 | 269 | @group |
a44af9f2 | 270 | (garbage-collect) |
f9f59935 RS |
271 | @result{} ((106886 . 13184) (9769 . 0) |
272 | (7731 . 4651) 347543 121628 | |
40d48fe9 EZ |
273 | (31 . 94) (1273 . 168) |
274 | (25474 . 3569)) | |
a44af9f2 | 275 | @end group |
a890e1b0 | 276 | @end example |
a44af9f2 RS |
277 | |
278 | Here is a table explaining each element: | |
279 | ||
280 | @table @var | |
281 | @item used-conses | |
282 | The number of cons cells in use. | |
283 | ||
284 | @item free-conses | |
285 | The number of cons cells for which space has been obtained from the | |
286 | operating system, but that are not currently being used. | |
287 | ||
288 | @item used-syms | |
289 | The number of symbols in use. | |
290 | ||
291 | @item free-syms | |
292 | The number of symbols for which space has been obtained from the | |
293 | operating system, but that are not currently being used. | |
294 | ||
969fe9b5 RS |
295 | @item used-miscs |
296 | The number of miscellaneous objects in use. These include markers and | |
297 | overlays, plus certain objects not visible to users. | |
a44af9f2 | 298 | |
969fe9b5 RS |
299 | @item free-miscs |
300 | The number of miscellaneous objects for which space has been obtained | |
301 | from the operating system, but that are not currently being used. | |
a44af9f2 RS |
302 | |
303 | @item used-string-chars | |
304 | The total size of all strings, in characters. | |
305 | ||
306 | @item used-vector-slots | |
307 | The total number of elements of existing vectors. | |
308 | ||
309 | @item used-floats | |
310 | @c Emacs 19 feature | |
311 | The number of floats in use. | |
312 | ||
313 | @item free-floats | |
314 | @c Emacs 19 feature | |
315 | The number of floats for which space has been obtained from the | |
316 | operating system, but that are not currently being used. | |
a9f0a989 RS |
317 | |
318 | @item used-intervals | |
319 | The number of intervals in use. Intervals are an internal | |
320 | data structure used for representing text properties. | |
321 | ||
322 | @item free-intervals | |
323 | The number of intervals for which space has been obtained | |
324 | from the operating system, but that are not currently being used. | |
40d48fe9 EZ |
325 | |
326 | @item used-strings | |
327 | The number of strings in use. | |
328 | ||
329 | @item free-strings | |
330 | The number of string headers for which the space was obtained from the | |
331 | operating system, but which are currently not in use. (A string | |
332 | object consists of a header and the storage for the string text | |
333 | itself; the latter is only allocated when the string is created.) | |
a44af9f2 RS |
334 | @end table |
335 | @end deffn | |
336 | ||
d64c55d8 RS |
337 | @defopt garbage-collection-messages |
338 | If this variable is non-@code{nil}, Emacs displays a message at the | |
339 | beginning and end of garbage collection. The default value is | |
340 | @code{nil}, meaning there are no such messages. | |
341 | @end defopt | |
342 | ||
e73c3ec4 RS |
343 | @defvar post-gc-hook |
344 | This is a normal hook that is run at the end of garbage collection. | |
345 | Garbage collection is inhibited while the hook functions run, so be | |
346 | careful writing them. | |
347 | @end defvar | |
348 | ||
a44af9f2 | 349 | @defopt gc-cons-threshold |
a890e1b0 | 350 | The value of this variable is the number of bytes of storage that must |
a44af9f2 | 351 | be allocated for Lisp objects after one garbage collection in order to |
a890e1b0 | 352 | trigger another garbage collection. A cons cell counts as eight bytes, |
a44af9f2 | 353 | a string as one byte per character plus a few bytes of overhead, and so |
a890e1b0 RS |
354 | on; space allocated to the contents of buffers does not count. Note |
355 | that the subsequent garbage collection does not happen immediately when | |
356 | the threshold is exhausted, but only the next time the Lisp evaluator is | |
a44af9f2 RS |
357 | called. |
358 | ||
f9f59935 | 359 | The initial threshold value is 400,000. If you specify a larger |
a44af9f2 RS |
360 | value, garbage collection will happen less often. This reduces the |
361 | amount of time spent garbage collecting, but increases total memory use. | |
574efc83 | 362 | You may want to do this when running a program that creates lots of |
a44af9f2 RS |
363 | Lisp data. |
364 | ||
a890e1b0 | 365 | You can make collections more frequent by specifying a smaller value, |
a44af9f2 RS |
366 | down to 10,000. A value less than 10,000 will remain in effect only |
367 | until the subsequent garbage collection, at which time | |
368 | @code{garbage-collect} will set the threshold back to 10,000. | |
369 | @end defopt | |
370 | ||
568ffbee | 371 | The value returned by @code{garbage-collect} describes the amount of |
969fe9b5 RS |
372 | memory used by Lisp data, broken down by data type. By contrast, the |
373 | function @code{memory-limit} provides information on the total amount of | |
374 | memory Emacs is currently using. | |
375 | ||
a44af9f2 RS |
376 | @c Emacs 19 feature |
377 | @defun memory-limit | |
378 | This function returns the address of the last byte Emacs has allocated, | |
379 | divided by 1024. We divide the value by 1024 to make sure it fits in a | |
380 | Lisp integer. | |
381 | ||
382 | You can use this to get a general idea of how your actions affect the | |
383 | memory usage. | |
384 | @end defun | |
385 | ||
5b2279a3 RS |
386 | @defun memory-use-counts |
387 | This returns a list of numbers that count the number of objects | |
388 | created in this Emacs session. Each of these counters increments for | |
389 | a certain kind of object. See the documentation string for details. | |
390 | @end defun | |
391 | ||
66c0f054 RS |
392 | @defvar gcs-done |
393 | This variable contains the total number of garbage collections | |
394 | done so far in this Emacs session. | |
f0514b34 | 395 | @end defvar |
66c0f054 RS |
396 | |
397 | @defvar gc-elapsed | |
398 | This variable contains the total number of seconds of elapsed time | |
399 | during garbage collection so far in this Emacs session, as a floating | |
400 | point number. | |
f0514b34 | 401 | @end defvar |
66c0f054 | 402 | |
969fe9b5 RS |
403 | @node Memory Usage |
404 | @section Memory Usage | |
405 | ||
406 | These functions and variables give information about the total amount | |
407 | of memory allocation that Emacs has done, broken down by data type. | |
408 | Note the difference between these and the values returned by | |
409 | @code{(garbage-collect)}; those count objects that currently exist, but | |
410 | these count the number or size of all allocations, including those for | |
411 | objects that have since been freed. | |
412 | ||
413 | @defvar cons-cells-consed | |
414 | The total number of cons cells that have been allocated so far | |
415 | in this Emacs session. | |
416 | @end defvar | |
417 | ||
418 | @defvar floats-consed | |
419 | The total number of floats that have been allocated so far | |
420 | in this Emacs session. | |
421 | @end defvar | |
422 | ||
423 | @defvar vector-cells-consed | |
424 | The total number of vector cells that have been allocated so far | |
425 | in this Emacs session. | |
426 | @end defvar | |
427 | ||
428 | @defvar symbols-consed | |
429 | The total number of symbols that have been allocated so far | |
430 | in this Emacs session. | |
431 | @end defvar | |
432 | ||
433 | @defvar string-chars-consed | |
434 | The total number of string characters that have been allocated so far | |
435 | in this Emacs session. | |
436 | @end defvar | |
437 | ||
438 | @defvar misc-objects-consed | |
439 | The total number of miscellaneous objects that have been allocated so | |
440 | far in this Emacs session. These include markers and overlays, plus | |
441 | certain objects not visible to users. | |
442 | @end defvar | |
443 | ||
444 | @defvar intervals-consed | |
445 | The total number of intervals that have been allocated so far | |
446 | in this Emacs session. | |
447 | @end defvar | |
448 | ||
40d48fe9 EZ |
449 | @defvar strings-consed |
450 | The total number of strings that have been allocated so far in this | |
451 | Emacs session. | |
452 | @end defvar | |
453 | ||
969fe9b5 | 454 | @node Writing Emacs Primitives |
a44af9f2 RS |
455 | @appendixsec Writing Emacs Primitives |
456 | @cindex primitive function internals | |
457 | ||
458 | Lisp primitives are Lisp functions implemented in C. The details of | |
459 | interfacing the C function so that Lisp can call it are handled by a few | |
460 | C macros. The only way to really understand how to write new C code is | |
461 | to read the source, but we can explain some things here. | |
462 | ||
463 | An example of a special form is the definition of @code{or}, from | |
464 | @file{eval.c}. (An ordinary function would have the same general | |
465 | appearance.) | |
466 | ||
467 | @cindex garbage collection protection | |
468 | @smallexample | |
469 | @group | |
470 | DEFUN ("or", For, Sor, 0, UNEVALLED, 0, | |
f1842270 RS |
471 | doc: /* Eval args until one of them yields non-nil, then return that value. |
472 | The remaining args are not evalled at all. | |
473 | If all args return nil, return nil. | |
a44af9f2 RS |
474 | @end group |
475 | @group | |
f1842270 | 476 | usage: (or CONDITIONS ...) */) |
a44af9f2 RS |
477 | (args) |
478 | Lisp_Object args; | |
479 | @{ | |
480 | register Lisp_Object val; | |
481 | Lisp_Object args_left; | |
482 | struct gcpro gcpro1; | |
483 | @end group | |
484 | ||
485 | @group | |
95260b26 | 486 | if (NILP (args)) |
a44af9f2 RS |
487 | return Qnil; |
488 | ||
489 | args_left = args; | |
490 | GCPRO1 (args_left); | |
491 | @end group | |
492 | ||
493 | @group | |
494 | do | |
495 | @{ | |
496 | val = Feval (Fcar (args_left)); | |
95260b26 | 497 | if (!NILP (val)) |
a44af9f2 RS |
498 | break; |
499 | args_left = Fcdr (args_left); | |
500 | @} | |
95260b26 | 501 | while (!NILP (args_left)); |
a44af9f2 RS |
502 | @end group |
503 | ||
504 | @group | |
505 | UNGCPRO; | |
506 | return val; | |
507 | @} | |
508 | @end group | |
509 | @end smallexample | |
510 | ||
511 | Let's start with a precise explanation of the arguments to the | |
a890e1b0 | 512 | @code{DEFUN} macro. Here is a template for them: |
a44af9f2 RS |
513 | |
514 | @example | |
515 | DEFUN (@var{lname}, @var{fname}, @var{sname}, @var{min}, @var{max}, @var{interactive}, @var{doc}) | |
516 | @end example | |
517 | ||
518 | @table @var | |
519 | @item lname | |
a890e1b0 RS |
520 | This is the name of the Lisp symbol to define as the function name; in |
521 | the example above, it is @code{or}. | |
a44af9f2 RS |
522 | |
523 | @item fname | |
524 | This is the C function name for this function. This is | |
525 | the name that is used in C code for calling the function. The name is, | |
526 | by convention, @samp{F} prepended to the Lisp name, with all dashes | |
527 | (@samp{-}) in the Lisp name changed to underscores. Thus, to call this | |
528 | function from C code, call @code{For}. Remember that the arguments must | |
529 | be of type @code{Lisp_Object}; various macros and functions for creating | |
530 | values of type @code{Lisp_Object} are declared in the file | |
531 | @file{lisp.h}. | |
532 | ||
533 | @item sname | |
534 | This is a C variable name to use for a structure that holds the data for | |
535 | the subr object that represents the function in Lisp. This structure | |
536 | conveys the Lisp symbol name to the initialization routine that will | |
537 | create the symbol and store the subr object as its definition. By | |
538 | convention, this name is always @var{fname} with @samp{F} replaced with | |
539 | @samp{S}. | |
540 | ||
541 | @item min | |
a890e1b0 RS |
542 | This is the minimum number of arguments that the function requires. The |
543 | function @code{or} allows a minimum of zero arguments. | |
a44af9f2 RS |
544 | |
545 | @item max | |
a890e1b0 RS |
546 | This is the maximum number of arguments that the function accepts, if |
547 | there is a fixed maximum. Alternatively, it can be @code{UNEVALLED}, | |
548 | indicating a special form that receives unevaluated arguments, or | |
549 | @code{MANY}, indicating an unlimited number of evaluated arguments (the | |
550 | equivalent of @code{&rest}). Both @code{UNEVALLED} and @code{MANY} are | |
551 | macros. If @var{max} is a number, it may not be less than @var{min} and | |
552 | it may not be greater than seven. | |
a44af9f2 RS |
553 | |
554 | @item interactive | |
555 | This is an interactive specification, a string such as might be used as | |
556 | the argument of @code{interactive} in a Lisp function. In the case of | |
557 | @code{or}, it is 0 (a null pointer), indicating that @code{or} cannot be | |
a890e1b0 RS |
558 | called interactively. A value of @code{""} indicates a function that |
559 | should receive no arguments when called interactively. | |
a44af9f2 RS |
560 | |
561 | @item doc | |
f1842270 RS |
562 | This is the documentation string. It uses C comment syntax rather |
563 | than C string syntax because comment syntax requires nothing special | |
564 | to include multiple lines. The @samp{doc:} identifies the comment | |
565 | that follows as the documentation string. The @samp{/*} and @samp{*/} | |
566 | delimiters that begin and end the comment are not part of the | |
567 | documentation string. | |
568 | ||
569 | If the last line of the documentation string begins with the keyword | |
570 | @samp{usage:}, the rest of the line is treated as the argument list | |
571 | for documentation purposes. This way, you can use different argument | |
572 | names in the documentation string from the ones used in the C code. | |
0a692803 DL |
573 | @samp{usage:} is required if the function has an unlimited number of |
574 | arguments. | |
f1842270 RS |
575 | |
576 | All the usual rules for documentation strings in Lisp code | |
577 | (@pxref{Documentation Tips}) apply to C code documentation strings | |
578 | too. | |
a44af9f2 RS |
579 | @end table |
580 | ||
a890e1b0 RS |
581 | After the call to the @code{DEFUN} macro, you must write the argument |
582 | name list that every C function must have, followed by ordinary C | |
583 | declarations for the arguments. For a function with a fixed maximum | |
584 | number of arguments, declare a C argument for each Lisp argument, and | |
574efc83 RS |
585 | give them all type @code{Lisp_Object}. When a Lisp function has no |
586 | upper limit on the number of arguments, its implementation in C actually | |
587 | receives exactly two arguments: the first is the number of Lisp | |
588 | arguments, and the second is the address of a block containing their | |
589 | values. They have types @code{int} and @w{@code{Lisp_Object *}}. | |
a44af9f2 RS |
590 | |
591 | Within the function @code{For} itself, note the use of the macros | |
592 | @code{GCPRO1} and @code{UNGCPRO}. @code{GCPRO1} is used to ``protect'' | |
593 | a variable from garbage collection---to inform the garbage collector that | |
594 | it must look in that variable and regard its contents as an accessible | |
595 | object. This is necessary whenever you call @code{Feval} or anything | |
596 | that can directly or indirectly call @code{Feval}. At such a time, any | |
597 | Lisp object that you intend to refer to again must be protected somehow. | |
598 | @code{UNGCPRO} cancels the protection of the variables that are | |
599 | protected in the current function. It is necessary to do this explicitly. | |
600 | ||
70bb4402 RS |
601 | It suffices to ensure that at least one pointer to each object is |
602 | GC-protected; as long as the object is not recycled, all pointers to | |
603 | it remain valid. So if you are sure that a local variable points to | |
604 | an object that will be preserved by some other pointer, that local | |
568ffbee LT |
605 | variable does not need a @code{GCPRO}. (Formerly, strings were an |
606 | exception to this rule; in older Emacs versions, every pointer to a | |
607 | string needed to be marked by GC.) | |
70bb4402 RS |
608 | |
609 | The macro @code{GCPRO1} protects just one local variable. If you | |
610 | want to protect two, use @code{GCPRO2} instead; repeating | |
611 | @code{GCPRO1} will not work. Macros, @code{GCPRO3}, @code{GCPRO4}, | |
612 | @code{GCPRO5}, and @code{GCPRO6} also exist. These macros implicitly | |
613 | use local variables such as @code{gcpro1}; you must declare these | |
614 | explicitly, with type @code{struct gcpro}. Thus, if you use | |
615 | @code{GCPRO2}, you must declare @code{gcpro1} and @code{gcpro2}. | |
a890e1b0 RS |
616 | Alas, we can't explain all the tricky details here. |
617 | ||
70bb4402 RS |
618 | Built-in functions that take a variable number of arguments actually |
619 | accept two arguments at the C level: the number of Lisp arguments, and | |
620 | a @code{Lisp_Object *} pointer to a C vector containing those Lisp | |
621 | arguments. This C vector may be part of a Lisp vector, but it need | |
568ffbee | 622 | not be. The responsibility for using @code{GCPRO} to protect the Lisp |
236a1914 RS |
623 | arguments from GC if necessary rests with the caller in this case, |
624 | since the caller allocated or found the storage for them. | |
70bb4402 | 625 | |
e610024b | 626 | You must not use C initializers for static or global variables unless |
05aea714 | 627 | the variables are never written once Emacs is dumped. These variables |
8241495d RS |
628 | with initializers are allocated in an area of memory that becomes |
629 | read-only (on certain operating systems) as a result of dumping Emacs. | |
630 | @xref{Pure Storage}. | |
e610024b RS |
631 | |
632 | Do not use static variables within functions---place all static | |
633 | variables at top level in the file. This is necessary because Emacs on | |
634 | some operating systems defines the keyword @code{static} as a null | |
635 | macro. (This definition is used because those systems put all variables | |
636 | declared static in a place that becomes read-only after dumping, whether | |
637 | they have initializers or not.) | |
77223f05 | 638 | |
a890e1b0 RS |
639 | Defining the C function is not enough to make a Lisp primitive |
640 | available; you must also create the Lisp symbol for the primitive and | |
641 | store a suitable subr object in its function cell. The code looks like | |
642 | this: | |
a44af9f2 RS |
643 | |
644 | @example | |
645 | defsubr (&@var{subr-structure-name}); | |
646 | @end example | |
647 | ||
648 | @noindent | |
a890e1b0 RS |
649 | Here @var{subr-structure-name} is the name you used as the third |
650 | argument to @code{DEFUN}. | |
651 | ||
652 | If you add a new primitive to a file that already has Lisp primitives | |
653 | defined in it, find the function (near the end of the file) named | |
654 | @code{syms_of_@var{something}}, and add the call to @code{defsubr} | |
655 | there. If the file doesn't have this function, or if you create a new | |
656 | file, add to it a @code{syms_of_@var{filename}} (e.g., | |
657 | @code{syms_of_myfile}). Then find the spot in @file{emacs.c} where all | |
658 | of these functions are called, and add a call to | |
659 | @code{syms_of_@var{filename}} there. | |
a44af9f2 | 660 | |
568ffbee | 661 | @anchor{Defining Lisp variables in C} |
8241495d | 662 | @vindex byte-boolean-vars |
574efc83 RS |
663 | The function @code{syms_of_@var{filename}} is also the place to define |
664 | any C variables that are to be visible as Lisp variables. | |
a890e1b0 RS |
665 | @code{DEFVAR_LISP} makes a C variable of type @code{Lisp_Object} visible |
666 | in Lisp. @code{DEFVAR_INT} makes a C variable of type @code{int} | |
667 | visible in Lisp with a value that is always an integer. | |
668 | @code{DEFVAR_BOOL} makes a C variable of type @code{int} visible in Lisp | |
8241495d RS |
669 | with a value that is either @code{t} or @code{nil}. Note that variables |
670 | defined with @code{DEFVAR_BOOL} are automatically added to the list | |
671 | @code{byte-boolean-vars} used by the byte compiler. | |
a44af9f2 | 672 | |
969fe9b5 | 673 | If you define a file-scope C variable of type @code{Lisp_Object}, |
8241495d | 674 | you must protect it from garbage-collection by calling @code{staticpro} |
969fe9b5 RS |
675 | in @code{syms_of_@var{filename}}, like this: |
676 | ||
677 | @example | |
678 | staticpro (&@var{variable}); | |
679 | @end example | |
680 | ||
a890e1b0 | 681 | Here is another example function, with more complicated arguments. |
969fe9b5 RS |
682 | This comes from the code in @file{window.c}, and it demonstrates the use |
683 | of macros and functions to manipulate Lisp objects. | |
a44af9f2 RS |
684 | |
685 | @smallexample | |
686 | @group | |
687 | DEFUN ("coordinates-in-window-p", Fcoordinates_in_window_p, | |
688 | Scoordinates_in_window_p, 2, 2, | |
689 | "xSpecify coordinate pair: \nXExpression which evals to window: ", | |
88510b17 | 690 | "Return non-nil if COORDINATES is in WINDOW.\n\ |
969fe9b5 RS |
691 | COORDINATES is a cons of the form (X . Y), X and Y being distances\n\ |
692 | ... | |
a44af9f2 RS |
693 | @end group |
694 | @group | |
969fe9b5 RS |
695 | If they are on the border between WINDOW and its right sibling,\n\ |
696 | `vertical-line' is returned.") | |
697 | (coordinates, window) | |
698 | register Lisp_Object coordinates, window; | |
a44af9f2 | 699 | @{ |
969fe9b5 | 700 | int x, y; |
a44af9f2 RS |
701 | @end group |
702 | ||
703 | @group | |
969fe9b5 RS |
704 | CHECK_LIVE_WINDOW (window, 0); |
705 | CHECK_CONS (coordinates, 1); | |
706 | x = XINT (Fcar (coordinates)); | |
707 | y = XINT (Fcdr (coordinates)); | |
a44af9f2 | 708 | @end group |
969fe9b5 | 709 | |
a44af9f2 | 710 | @group |
969fe9b5 RS |
711 | switch (coordinates_in_window (XWINDOW (window), &x, &y)) |
712 | @{ | |
713 | case 0: /* NOT in window at all. */ | |
714 | return Qnil; | |
a44af9f2 | 715 | @end group |
969fe9b5 | 716 | |
a44af9f2 | 717 | @group |
969fe9b5 RS |
718 | case 1: /* In text part of window. */ |
719 | return Fcons (make_number (x), make_number (y)); | |
a44af9f2 | 720 | @end group |
969fe9b5 | 721 | |
a44af9f2 | 722 | @group |
969fe9b5 RS |
723 | case 2: /* In mode line of window. */ |
724 | return Qmode_line; | |
a44af9f2 | 725 | @end group |
969fe9b5 | 726 | |
a44af9f2 | 727 | @group |
969fe9b5 RS |
728 | case 3: /* On right border of window. */ |
729 | return Qvertical_line; | |
730 | @end group | |
731 | ||
732 | @group | |
733 | default: | |
734 | abort (); | |
735 | @} | |
a44af9f2 RS |
736 | @} |
737 | @end group | |
738 | @end smallexample | |
739 | ||
a890e1b0 RS |
740 | Note that C code cannot call functions by name unless they are defined |
741 | in C. The way to call a function written in Lisp is to use | |
742 | @code{Ffuncall}, which embodies the Lisp function @code{funcall}. Since | |
743 | the Lisp function @code{funcall} accepts an unlimited number of | |
744 | arguments, in C it takes two: the number of Lisp-level arguments, and a | |
745 | one-dimensional array containing their values. The first Lisp-level | |
746 | argument is the Lisp function to call, and the rest are the arguments to | |
747 | pass to it. Since @code{Ffuncall} can call the evaluator, you must | |
748 | protect pointers from garbage collection around the call to | |
749 | @code{Ffuncall}. | |
750 | ||
751 | The C functions @code{call0}, @code{call1}, @code{call2}, and so on, | |
752 | provide handy ways to call a Lisp function conveniently with a fixed | |
753 | number of arguments. They work by calling @code{Ffuncall}. | |
a44af9f2 RS |
754 | |
755 | @file{eval.c} is a very good file to look through for examples; | |
756 | @file{lisp.h} contains the definitions for some important macros and | |
757 | functions. | |
758 | ||
0a692803 DL |
759 | If you define a function which is side-effect free, update the code |
760 | in @file{byte-opt.el} which binds @code{side-effect-free-fns} and | |
761 | @code{side-effect-and-error-free-fns} so that the compiler optimizer | |
762 | knows about it. | |
8241495d | 763 | |
969fe9b5 | 764 | @node Object Internals |
a44af9f2 RS |
765 | @appendixsec Object Internals |
766 | @cindex object internals | |
767 | ||
768 | GNU Emacs Lisp manipulates many different types of data. The actual | |
f9f59935 RS |
769 | data are stored in a heap and the only access that programs have to it |
770 | is through pointers. Pointers are thirty-two bits wide in most | |
a44af9f2 | 771 | implementations. Depending on the operating system and type of machine |
568ffbee LT |
772 | for which you compile Emacs, twenty-nine bits are used to address the |
773 | object, and the remaining three bits are used for the tag that | |
774 | identifies the object's type. | |
a44af9f2 | 775 | |
a890e1b0 RS |
776 | Because Lisp objects are represented as tagged pointers, it is always |
777 | possible to determine the Lisp data type of any object. The C data type | |
778 | @code{Lisp_Object} can hold any Lisp object of any data type. Ordinary | |
779 | variables have type @code{Lisp_Object}, which means they can hold any | |
780 | type of Lisp value; you can determine the actual data type only at run | |
781 | time. The same is true for function arguments; if you want a function | |
782 | to accept only a certain type of argument, you must check the type | |
783 | explicitly using a suitable predicate (@pxref{Type Predicates}). | |
a44af9f2 RS |
784 | @cindex type checking internals |
785 | ||
786 | @menu | |
787 | * Buffer Internals:: Components of a buffer structure. | |
788 | * Window Internals:: Components of a window structure. | |
789 | * Process Internals:: Components of a process structure. | |
790 | @end menu | |
791 | ||
969fe9b5 | 792 | @node Buffer Internals |
a44af9f2 RS |
793 | @appendixsubsec Buffer Internals |
794 | @cindex internals, of buffer | |
795 | @cindex buffer internals | |
796 | ||
797 | Buffers contain fields not directly accessible by the Lisp programmer. | |
798 | We describe them here, naming them by the names used in the C code. | |
799 | Many are accessible indirectly in Lisp programs via Lisp primitives. | |
800 | ||
95260b26 GM |
801 | Two structures are used to represent buffers in C. The |
802 | @code{buffer_text} structure contains fields describing the text of a | |
803 | buffer; the @code{buffer} structure holds other fields. In the case | |
804 | of indirect buffers, two or more @code{buffer} structures reference | |
805 | the same @code{buffer_text} structure. | |
806 | ||
807 | Here is a list of the @code{struct buffer_text} fields: | |
808 | ||
a44af9f2 | 809 | @table @code |
95260b26 | 810 | @item beg |
05aea714 | 811 | This field contains the actual address of the buffer contents. |
95260b26 | 812 | |
d7255d62 | 813 | @item gpt |
95260b26 | 814 | This holds the character position of the gap in the buffer. |
88510b17 | 815 | @xref{Buffer Gap}. |
95260b26 GM |
816 | |
817 | @item z | |
818 | This field contains the character position of the end of the buffer | |
819 | text. | |
820 | ||
821 | @item gpt_byte | |
822 | Contains the byte position of the gap. | |
823 | ||
824 | @item z_byte | |
825 | Holds the byte position of the end of the buffer text. | |
826 | ||
827 | @item gap_size | |
88510b17 | 828 | Contains the size of buffer's gap. @xref{Buffer Gap}. |
95260b26 GM |
829 | |
830 | @item modiff | |
831 | This field counts buffer-modification events for this buffer. It is | |
832 | incremented for each such event, and never otherwise changed. | |
833 | ||
834 | @item save_modiff | |
835 | Contains the previous value of @code{modiff}, as of the last time a | |
836 | buffer was visited or saved in a file. | |
88510b17 | 837 | |
95260b26 GM |
838 | @item overlay_modiff |
839 | Counts modifications to overlays analogous to @code{modiff}. | |
88510b17 | 840 | |
95260b26 GM |
841 | @item beg_unchanged |
842 | Holds the number of characters at the start of the text that are known | |
843 | to be unchanged since the last redisplay that finished. | |
88510b17 | 844 | |
95260b26 GM |
845 | @item end_unchanged |
846 | Holds the number of characters at the end of the text that are known to | |
847 | be unchanged since the last redisplay that finished. | |
88510b17 | 848 | |
95260b26 GM |
849 | @item unchanged_modified |
850 | Contains the value of @code{modiff} at the time of the last redisplay | |
851 | that finished. If this value matches @code{modiff}, | |
852 | @code{beg_unchanged} and @code{end_unchanged} contain no useful | |
853 | information. | |
88510b17 | 854 | |
95260b26 GM |
855 | @item overlay_unchanged_modified |
856 | Contains the value of @code{overlay_modiff} at the time of the last | |
857 | redisplay that finished. If this value matches @code{overlay_modiff}, | |
858 | @code{beg_unchanged} and @code{end_unchanged} contain no useful | |
859 | information. | |
88510b17 | 860 | |
95260b26 GM |
861 | @item markers |
862 | The markers that refer to this buffer. This is actually a single | |
863 | marker, and successive elements in its marker @code{chain} are the other | |
864 | markers referring to this buffer text. | |
a44af9f2 | 865 | |
95260b26 GM |
866 | @item intervals |
867 | Contains the interval tree which records the text properties of this | |
868 | buffer. | |
869 | @end table | |
870 | ||
871 | The fields of @code{struct buffer} are: | |
872 | ||
873 | @table @code | |
874 | @item next | |
875 | Points to the next buffer, in the chain of all buffers including killed | |
876 | buffers. This chain is used only for garbage collection, in order to | |
877 | collect killed buffers properly. Note that vectors, and most kinds of | |
878 | objects allocated as vectors, are all on one chain, but buffers are on a | |
879 | separate chain of their own. | |
880 | ||
881 | @item own_text | |
882 | This is a @code{struct buffer_text} structure. In an ordinary buffer, | |
883 | it holds the buffer contents. In indirect buffers, this field is not | |
884 | used. | |
885 | ||
886 | @item text | |
887 | This points to the @code{buffer_text} structure that is used for this | |
888 | buffer. In an ordinary buffer, this is the @code{own_text} field above. | |
889 | In an indirect buffer, this is the @code{own_text} field of the base | |
890 | buffer. | |
891 | ||
892 | @item pt | |
893 | Contains the character position of point in a buffer. | |
894 | ||
895 | @item pt_byte | |
896 | Contains the byte position of point in a buffer. | |
897 | ||
898 | @item begv | |
88510b17 | 899 | This field contains the character position of the beginning of the |
95260b26 GM |
900 | accessible range of text in the buffer. |
901 | ||
902 | @item begv_byte | |
88510b17 | 903 | This field contains the byte position of the beginning of the |
95260b26 GM |
904 | accessible range of text in the buffer. |
905 | ||
906 | @item zv | |
88510b17 | 907 | This field contains the character position of the end of the |
95260b26 GM |
908 | accessible range of text in the buffer. |
909 | ||
910 | @item zv_byte | |
88510b17 | 911 | This field contains the byte position of the end of the |
95260b26 GM |
912 | accessible range of text in the buffer. |
913 | ||
914 | @item base_buffer | |
915 | In an indirect buffer, this points to the base buffer. In an ordinary | |
916 | buffer, it is null. | |
917 | ||
918 | @item local_var_flags | |
919 | This field contains flags indicating that certain variables are local in | |
920 | this buffer. Such variables are declared in the C code using | |
921 | @code{DEFVAR_PER_BUFFER}, and their buffer-local bindings are stored in | |
922 | fields in the buffer structure itself. (Some of these fields are | |
923 | described in this table.) | |
a44af9f2 RS |
924 | |
925 | @item modtime | |
926 | This field contains the modification time of the visited file. It is | |
8241495d RS |
927 | set when the file is written or read. Before writing the buffer into a |
928 | file, this field is compared to the modification time of the file to see | |
929 | if the file has changed on disk. @xref{Buffer Modification}. | |
a44af9f2 RS |
930 | |
931 | @item auto_save_modified | |
932 | This field contains the time when the buffer was last auto-saved. | |
933 | ||
95260b26 GM |
934 | @item auto_save_failure_time |
935 | The time at which we detected a failure to auto-save, or -1 if we didn't | |
936 | have a failure. | |
937 | ||
a44af9f2 RS |
938 | @item last_window_start |
939 | This field contains the @code{window-start} position in the buffer as of | |
940 | the last time the buffer was displayed in a window. | |
941 | ||
95260b26 GM |
942 | @item clip_changed |
943 | This flag is set when narrowing changes in a buffer. | |
944 | ||
945 | @item prevent_redisplay_optimizations_p | |
88510b17 | 946 | this flag indicates that redisplay optimizations should not be used |
95260b26 GM |
947 | to display this buffer. |
948 | ||
a890e1b0 RS |
949 | @item undo_list |
950 | This field points to the buffer's undo list. @xref{Undo}. | |
a44af9f2 | 951 | |
95260b26 GM |
952 | @item name |
953 | The buffer name is a string that names the buffer. It is guaranteed to | |
954 | be unique. @xref{Buffer Names}. | |
955 | ||
956 | @item filename | |
957 | The name of the file visited in this buffer, or @code{nil}. | |
88510b17 | 958 | |
95260b26 GM |
959 | @item directory |
960 | The directory for expanding relative file names. | |
961 | ||
962 | @item save_length | |
963 | Length of the file this buffer is visiting, when last read or saved. | |
964 | This and other fields concerned with saving are not kept in the | |
965 | @code{buffer_text} structure because indirect buffers are never saved. | |
966 | ||
967 | @item auto_save_file_name | |
88510b17 | 968 | File name used for auto-saving this buffer. This is not in the |
95260b26 GM |
969 | @code{buffer_text} because it's not used in indirect buffers at all. |
970 | ||
971 | @item read_only | |
972 | Non-@code{nil} means this buffer is read-only. | |
973 | ||
974 | @item mark | |
975 | This field contains the mark for the buffer. The mark is a marker, | |
976 | hence it is also included on the list @code{markers}. @xref{The Mark}. | |
977 | ||
978 | @item local_var_alist | |
979 | This field contains the association list describing the buffer-local | |
980 | variable bindings of this buffer, not including the built-in | |
981 | buffer-local bindings that have special slots in the buffer object. | |
982 | (Those slots are omitted from this table.) @xref{Buffer-Local | |
983 | Variables}. | |
984 | ||
985 | @item major_mode | |
986 | Symbol naming the major mode of this buffer, e.g., @code{lisp-mode}. | |
987 | ||
988 | @item mode_name | |
989 | Pretty name of major mode, e.g., @code{"Lisp"}. | |
990 | ||
991 | @item mode_line_format | |
992 | Mode line element that controls the format of the mode line. If this | |
993 | is @code{nil}, no mode line will be displayed. | |
994 | ||
995 | @item header_line_format | |
88510b17 | 996 | This field is analoguous to @code{mode_line_format} for the mode |
95260b26 GM |
997 | line displayed at the top of windows. |
998 | ||
999 | @item keymap | |
1000 | This field holds the buffer's local keymap. @xref{Keymaps}. | |
1001 | ||
1002 | @item abbrev_table | |
1003 | This buffer's local abbrevs. | |
1004 | ||
1005 | @item syntax_table | |
a44af9f2 RS |
1006 | This field contains the syntax table for the buffer. @xref{Syntax Tables}. |
1007 | ||
95260b26 GM |
1008 | @item category_table |
1009 | This field contains the category table for the buffer. | |
1010 | ||
1011 | @item case_fold_search | |
1012 | The value of @code{case-fold-search} in this buffer. | |
1013 | ||
1014 | @item tab_width | |
1015 | The value of @code{tab-width} in this buffer. | |
1016 | ||
1017 | @item fill_column | |
1018 | The value of @code{fill-column} in this buffer. | |
1019 | ||
1020 | @item left_margin | |
1021 | The value of @code{left-margin} in this buffer. | |
1022 | ||
1023 | @item auto_fill_function | |
1024 | The value of @code{auto-fill-function} in this buffer. | |
1025 | ||
a44af9f2 RS |
1026 | @item downcase_table |
1027 | This field contains the conversion table for converting text to lower case. | |
969fe9b5 | 1028 | @xref{Case Tables}. |
a44af9f2 RS |
1029 | |
1030 | @item upcase_table | |
1031 | This field contains the conversion table for converting text to upper case. | |
969fe9b5 | 1032 | @xref{Case Tables}. |
a44af9f2 RS |
1033 | |
1034 | @item case_canon_table | |
1035 | This field contains the conversion table for canonicalizing text for | |
969fe9b5 | 1036 | case-folding search. @xref{Case Tables}. |
a44af9f2 RS |
1037 | |
1038 | @item case_eqv_table | |
1039 | This field contains the equivalence table for case-folding search. | |
969fe9b5 | 1040 | @xref{Case Tables}. |
a44af9f2 | 1041 | |
95260b26 GM |
1042 | @item truncate_lines |
1043 | The value of @code{truncate-lines} in this buffer. | |
a44af9f2 | 1044 | |
95260b26 GM |
1045 | @item ctl_arrow |
1046 | The value of @code{ctl-arrow} in this buffer. | |
a44af9f2 | 1047 | |
95260b26 GM |
1048 | @item selective_display |
1049 | The value of @code{selective-display} in this buffer. | |
a44af9f2 | 1050 | |
95260b26 GM |
1051 | @item selective_display_ellipsis |
1052 | The value of @code{selective-display-ellipsis} in this buffer. | |
a44af9f2 | 1053 | |
95260b26 GM |
1054 | @item minor_modes |
1055 | An alist of the minor modes of this buffer. | |
a890e1b0 | 1056 | |
95260b26 GM |
1057 | @item overwrite_mode |
1058 | The value of @code{overwrite_mode} in this buffer. | |
a890e1b0 | 1059 | |
95260b26 GM |
1060 | @item abbrev_mode |
1061 | The value of @code{abbrev-mode} in this buffer. | |
bfe721d1 | 1062 | |
95260b26 GM |
1063 | @item display_table |
1064 | This field contains the buffer's display table, or @code{nil} if it doesn't | |
1065 | have one. @xref{Display Tables}. | |
a890e1b0 | 1066 | |
95260b26 GM |
1067 | @item save_modified |
1068 | This field contains the time when the buffer was last saved, as an integer. | |
1069 | @xref{Buffer Modification}. | |
1070 | ||
1071 | @item mark_active | |
1072 | This field is non-@code{nil} if the buffer's mark is active. | |
a890e1b0 RS |
1073 | |
1074 | @item overlays_before | |
1075 | This field holds a list of the overlays in this buffer that end at or | |
1076 | before the current overlay center position. They are sorted in order of | |
1077 | decreasing end position. | |
1078 | ||
1079 | @item overlays_after | |
1080 | This field holds a list of the overlays in this buffer that end after | |
1081 | the current overlay center position. They are sorted in order of | |
1082 | increasing beginning position. | |
969fe9b5 | 1083 | |
95260b26 GM |
1084 | @item overlay_center |
1085 | This field holds the current overlay center position. @xref{Overlays}. | |
1086 | ||
969fe9b5 RS |
1087 | @item enable_multibyte_characters |
1088 | This field holds the buffer's local value of | |
1089 | @code{enable-multibyte-characters}---either @code{t} or @code{nil}. | |
95260b26 GM |
1090 | |
1091 | @item buffer_file_coding_system | |
1092 | The value of @code{buffer-file-coding-system} in this buffer. | |
1093 | ||
1094 | @item file_format | |
1095 | The value of @code{buffer-file-format} in this buffer. | |
1096 | ||
1097 | @item pt_marker | |
1098 | In an indirect buffer, or a buffer that is the base of an indirect | |
1099 | buffer, this holds a marker that records point for this buffer when the | |
1100 | buffer is not current. | |
1101 | ||
1102 | @item begv_marker | |
1103 | In an indirect buffer, or a buffer that is the base of an indirect | |
1104 | buffer, this holds a marker that records @code{begv} for this buffer | |
1105 | when the buffer is not current. | |
88510b17 | 1106 | |
95260b26 GM |
1107 | @item zv_marker |
1108 | In an indirect buffer, or a buffer that is the base of an indirect | |
1109 | buffer, this holds a marker that records @code{zv} for this buffer when | |
1110 | the buffer is not current. | |
1111 | ||
1112 | @item file_truename | |
1113 | The truename of the visited file, or @code{nil}. | |
1114 | ||
1115 | @item invisibility_spec | |
1116 | The value of @code{buffer-invisibility-spec} in this buffer. | |
1117 | ||
1118 | @item last_selected_window | |
1119 | This is the last window that was selected with this buffer in it, or @code{nil} | |
1120 | if that window no longer displays this buffer. | |
1121 | ||
1122 | @item display_count | |
1123 | This field is incremented each time the buffer is displayed in a window. | |
1124 | ||
1125 | @item left_margin_width | |
1126 | The value of @code{left-margin-width} in this buffer. | |
1127 | ||
1128 | @item right_margin_width | |
1129 | The value of @code{right-margin-width} in this buffer. | |
1130 | ||
1131 | @item indicate_empty_lines | |
1132 | Non-@code{nil} means indicate empty lines (lines with no text) with a | |
1133 | small bitmap in the fringe, when using a window system that can do it. | |
1134 | ||
1135 | @item display_time | |
1136 | This holds a time stamp that is updated each time this buffer is | |
1137 | displayed in a window. | |
1138 | ||
1139 | @item scroll_up_aggressively | |
1140 | The value of @code{scroll-up-aggressively} in this buffer. | |
88510b17 | 1141 | |
95260b26 GM |
1142 | @item scroll_down_aggressively |
1143 | The value of @code{scroll-down-aggressively} in this buffer. | |
a44af9f2 RS |
1144 | @end table |
1145 | ||
969fe9b5 | 1146 | @node Window Internals |
a44af9f2 RS |
1147 | @appendixsubsec Window Internals |
1148 | @cindex internals, of window | |
1149 | @cindex window internals | |
1150 | ||
1151 | Windows have the following accessible fields: | |
1152 | ||
1153 | @table @code | |
1154 | @item frame | |
a890e1b0 | 1155 | The frame that this window is on. |
a44af9f2 RS |
1156 | |
1157 | @item mini_p | |
a890e1b0 | 1158 | Non-@code{nil} if this window is a minibuffer window. |
a44af9f2 | 1159 | |
95260b26 GM |
1160 | @item parent |
1161 | Internally, Emacs arranges windows in a tree; each group of siblings has | |
1162 | a parent window whose area includes all the siblings. This field points | |
1163 | to a window's parent. | |
1164 | ||
1165 | Parent windows do not display buffers, and play little role in display | |
1166 | except to shape their child windows. Emacs Lisp programs usually have | |
1167 | no access to the parent windows; they operate on the windows at the | |
1168 | leaves of the tree, which actually display buffers. | |
1169 | ||
1170 | The following four fields also describe the window tree structure. | |
1171 | ||
1172 | @item hchild | |
1173 | In a window subdivided horizontally by child windows, the leftmost child. | |
1174 | Otherwise, @code{nil}. | |
1175 | ||
1176 | @item vchild | |
1177 | In a window subdivided vertically by child windows, the topmost child. | |
1178 | Otherwise, @code{nil}. | |
1179 | ||
1180 | @item next | |
1181 | The next sibling of this window. It is @code{nil} in a window that is | |
1182 | the rightmost or bottommost of a group of siblings. | |
1183 | ||
1184 | @item prev | |
1185 | The previous sibling of this window. It is @code{nil} in a window that | |
1186 | is the leftmost or topmost of a group of siblings. | |
1187 | ||
1188 | @item left | |
1189 | This is the left-hand edge of the window, measured in columns. (The | |
1190 | leftmost column on the screen is @w{column 0}.) | |
1191 | ||
1192 | @item top | |
1193 | This is the top edge of the window, measured in lines. (The top line on | |
1194 | the screen is @w{line 0}.) | |
1195 | ||
1196 | @item height | |
1197 | The height of the window, measured in lines. | |
1198 | ||
1199 | @item width | |
1200 | The width of the window, measured in columns. This width includes the | |
1201 | scroll bar and fringes, and/or the separator line on the right of the | |
1202 | window (if any). | |
1203 | ||
a44af9f2 | 1204 | @item buffer |
574efc83 | 1205 | The buffer that the window is displaying. This may change often during |
a44af9f2 RS |
1206 | the life of the window. |
1207 | ||
95260b26 GM |
1208 | @item start |
1209 | The position in the buffer that is the first character to be displayed | |
1210 | in the window. | |
a44af9f2 RS |
1211 | |
1212 | @item pointm | |
1213 | @cindex window point internals | |
a890e1b0 | 1214 | This is the value of point in the current buffer when this window is |
a44af9f2 RS |
1215 | selected; when it is not selected, it retains its previous value. |
1216 | ||
a890e1b0 RS |
1217 | @item force_start |
1218 | If this flag is non-@code{nil}, it says that the window has been | |
1219 | scrolled explicitly by the Lisp program. This affects what the next | |
1220 | redisplay does if point is off the screen: instead of scrolling the | |
1221 | window to show the text around point, it moves point to a location that | |
1222 | is on the screen. | |
1223 | ||
95260b26 | 1224 | @item frozen_window_start_p |
88510b17 | 1225 | This field is set temporarily to 1 to indicate to redisplay that |
95260b26 GM |
1226 | @code{start} of this window should not be changed, even if point |
1227 | gets invisible. | |
1228 | ||
1229 | @item start_at_line_beg | |
1230 | Non-@code{nil} means current value of @code{start} was the beginning of a line | |
1231 | when it was chosen. | |
1232 | ||
1233 | @item too_small_ok | |
1234 | Non-@code{nil} means don't delete this window for becoming ``too small''. | |
1235 | ||
1236 | @item height_fixed_p | |
1237 | This field is temporarily set to 1 to fix the height of the selected | |
1238 | window when the echo area is resized. | |
1239 | ||
1240 | @item use_time | |
1241 | This is the last time that the window was selected. The function | |
1242 | @code{get-lru-window} uses this field. | |
1243 | ||
1244 | @item sequence_number | |
1245 | A unique number assigned to this window when it was created. | |
1246 | ||
a890e1b0 | 1247 | @item last_modified |
95260b26 | 1248 | The @code{modiff} field of the window's buffer, as of the last time |
a890e1b0 RS |
1249 | a redisplay completed in this window. |
1250 | ||
95260b26 GM |
1251 | @item last_overlay_modified |
1252 | The @code{overlay_modiff} field of the window's buffer, as of the last | |
1253 | time a redisplay completed in this window. | |
1254 | ||
a890e1b0 | 1255 | @item last_point |
95260b26 GM |
1256 | The buffer's value of point, as of the last time a redisplay completed |
1257 | in this window. | |
a890e1b0 | 1258 | |
95260b26 GM |
1259 | @item last_had_star |
1260 | A non-@code{nil} value means the window's buffer was ``modified'' when the | |
1261 | window was last updated. | |
a44af9f2 | 1262 | |
95260b26 GM |
1263 | @item vertical_scroll_bar |
1264 | This window's vertical scroll bar. | |
a44af9f2 | 1265 | |
95260b26 GM |
1266 | @item left_margin_width |
1267 | The width of the left margin in this window, or @code{nil} not to | |
1268 | specify it (in which case the buffer's value of @code{left-margin-width} | |
1269 | is used. | |
a890e1b0 | 1270 | |
95260b26 GM |
1271 | @item right_margin_width |
1272 | Likewise for the right margin. | |
a890e1b0 | 1273 | |
13ede7fc | 1274 | @ignore |
95260b26 GM |
1275 | @item last_mark_x |
1276 | @item last_mark_y | |
1277 | ???Not used. | |
1278 | @end ignore | |
a44af9f2 | 1279 | |
95260b26 GM |
1280 | @item window_end_pos |
1281 | This is computed as @code{z} minus the buffer position of the last glyph | |
1282 | in the current matrix of the window. The value is only valid if | |
1283 | @code{window_end_valid} is not @code{nil}. | |
a44af9f2 | 1284 | |
95260b26 GM |
1285 | @item window_end_bytepos |
1286 | The byte position corresponding to @code{window_end_pos}. | |
a890e1b0 | 1287 | |
95260b26 GM |
1288 | @item window_end_vpos |
1289 | The window-relative vertical position of the line containing | |
1290 | @code{window_end_pos}. | |
a44af9f2 | 1291 | |
95260b26 GM |
1292 | @item window_end_valid |
1293 | This field is set to a non-@code{nil} value if @code{window_end_pos} is truly | |
1294 | valid. This is @code{nil} if nontrivial redisplay is preempted since in that | |
1295 | case the display that @code{window_end_pos} was computed for did not get | |
1296 | onto the screen. | |
1297 | ||
1298 | @item redisplay_end_trigger | |
1299 | If redisplay in this window goes beyond this buffer position, it runs | |
1300 | run the @code{redisplay-end-trigger-hook}. | |
1301 | ||
13ede7fc | 1302 | @ignore |
95260b26 GM |
1303 | @item orig_height |
1304 | @item orig_top | |
1305 | ??? Are temporary storage areas. | |
1306 | @end ignore | |
1307 | ||
1308 | @item cursor | |
1309 | A structure describing where the cursor is in this window. | |
1310 | ||
1311 | @item last_cursor | |
1312 | The value of @code{cursor} as of the last redisplay that finished. | |
1313 | ||
1314 | @item phys_cursor | |
1315 | A structure describing where the cursor of this window physically is. | |
1316 | ||
1317 | @item phys_cursor_type | |
1318 | The type of cursor that was last displayed on this window. | |
1319 | ||
1320 | @item phys_cursor_on_p | |
1321 | This field is non-zero if the cursor is physically on. | |
1322 | ||
1323 | @item cursor_off_p | |
1324 | Non-zero means the cursor in this window is logically on. | |
1325 | ||
1326 | @item last_cursor_off_p | |
1327 | This field contains the value of @code{cursor_off_p} as of the time of | |
1328 | the last redisplay. | |
1329 | ||
1330 | @item must_be_updated_p | |
1331 | This is set to 1 during redisplay when this window must be updated. | |
1332 | ||
a44af9f2 | 1333 | @item hscroll |
a890e1b0 | 1334 | This is the number of columns that the display in the window is scrolled |
a44af9f2 RS |
1335 | horizontally to the left. Normally, this is 0. |
1336 | ||
95260b26 GM |
1337 | @item vscroll |
1338 | Vertical scroll amount, in pixels. Normally, this is 0. | |
1339 | ||
1340 | @item dedicated | |
1341 | Non-@code{nil} if this window is dedicated to its buffer. | |
a44af9f2 RS |
1342 | |
1343 | @item display_table | |
a890e1b0 RS |
1344 | The window's display table, or @code{nil} if none is specified for it. |
1345 | ||
1346 | @item update_mode_line | |
1347 | Non-@code{nil} means this window's mode line needs to be updated. | |
1348 | ||
1349 | @item base_line_number | |
1350 | The line number of a certain position in the buffer, or @code{nil}. | |
1351 | This is used for displaying the line number of point in the mode line. | |
1352 | ||
1353 | @item base_line_pos | |
1354 | The position in the buffer for which the line number is known, or | |
1355 | @code{nil} meaning none is known. | |
1356 | ||
1357 | @item region_showing | |
1358 | If the region (or part of it) is highlighted in this window, this field | |
1359 | holds the mark position that made one end of that region. Otherwise, | |
1360 | this field is @code{nil}. | |
95260b26 GM |
1361 | |
1362 | @item column_number_displayed | |
1363 | The column number currently displayed in this window's mode line, or @code{nil} | |
1364 | if column numbers are not being displayed. | |
1365 | ||
1366 | @item current_matrix | |
1367 | A glyph matrix describing the current display of this window. | |
1368 | ||
1369 | @item desired_matrix | |
1370 | A glyph matrix describing the desired display of this window. | |
a44af9f2 RS |
1371 | @end table |
1372 | ||
969fe9b5 | 1373 | @node Process Internals |
a44af9f2 RS |
1374 | @appendixsubsec Process Internals |
1375 | @cindex internals, of process | |
1376 | @cindex process internals | |
1377 | ||
1378 | The fields of a process are: | |
1379 | ||
1380 | @table @code | |
1381 | @item name | |
1382 | A string, the name of the process. | |
1383 | ||
1384 | @item command | |
1385 | A list containing the command arguments that were used to start this | |
1386 | process. | |
1387 | ||
1388 | @item filter | |
1389 | A function used to accept output from the process instead of a buffer, | |
1390 | or @code{nil}. | |
1391 | ||
1392 | @item sentinel | |
1393 | A function called whenever the process receives a signal, or @code{nil}. | |
1394 | ||
1395 | @item buffer | |
1396 | The associated buffer of the process. | |
1397 | ||
1398 | @item pid | |
ad800164 | 1399 | An integer, the Unix process @acronym{ID}. |
a44af9f2 RS |
1400 | |
1401 | @item childp | |
1402 | A flag, non-@code{nil} if this is really a child process. | |
1403 | It is @code{nil} for a network connection. | |
1404 | ||
a44af9f2 | 1405 | @item mark |
574efc83 RS |
1406 | A marker indicating the position of the end of the last output from this |
1407 | process inserted into the buffer. This is often but not always the end | |
1408 | of the buffer. | |
a44af9f2 RS |
1409 | |
1410 | @item kill_without_query | |
a890e1b0 RS |
1411 | If this is non-@code{nil}, killing Emacs while this process is still |
1412 | running does not ask for confirmation about killing the process. | |
1413 | ||
1414 | @item raw_status_low | |
1415 | @itemx raw_status_high | |
1416 | These two fields record 16 bits each of the process status returned by | |
1417 | the @code{wait} system call. | |
1418 | ||
1419 | @item status | |
1420 | The process status, as @code{process-status} should return it. | |
1421 | ||
1422 | @item tick | |
1423 | @itemx update_tick | |
1424 | If these two fields are not equal, a change in the status of the process | |
1425 | needs to be reported, either by running the sentinel or by inserting a | |
1426 | message in the process buffer. | |
1427 | ||
1428 | @item pty_flag | |
ad800164 | 1429 | Non-@code{nil} if communication with the subprocess uses a @acronym{PTY}; |
a890e1b0 RS |
1430 | @code{nil} if it uses a pipe. |
1431 | ||
1432 | @item infd | |
1433 | The file descriptor for input from the process. | |
1434 | ||
1435 | @item outfd | |
1436 | The file descriptor for output to the process. | |
1437 | ||
1438 | @item subtty | |
1439 | The file descriptor for the terminal that the subprocess is using. (On | |
1440 | some systems, there is no need to record this, so the value is | |
1441 | @code{nil}.) | |
bfe721d1 KH |
1442 | |
1443 | @item tty_name | |
1444 | The name of the terminal that the subprocess is using, | |
1445 | or @code{nil} if it is using pipes. | |
95260b26 GM |
1446 | |
1447 | @item decode_coding_system | |
1448 | Coding-system for decoding the input from this process. | |
1449 | ||
1450 | @item decoding_buf | |
1451 | A working buffer for decoding. | |
1452 | ||
1453 | @item decoding_carryover | |
1454 | Size of carryover in decoding. | |
1455 | ||
1456 | @item encode_coding_system | |
1457 | Coding-system for encoding the output to this process. | |
1458 | ||
1459 | @item encoding_buf | |
a39c2e0d | 1460 | A working buffer for encoding. |
95260b26 GM |
1461 | |
1462 | @item encoding_carryover | |
1463 | Size of carryover in encoding. | |
1464 | ||
1465 | @item inherit_coding_system_flag | |
1466 | Flag to set @code{coding-system} of the process buffer from the | |
1467 | coding system used to decode process output. | |
a44af9f2 | 1468 | @end table |
ab5796a9 MB |
1469 | |
1470 | @ignore | |
1471 | arch-tag: 4b2c33bc-d7e4-43f5-bc20-27c0db52a53e | |
1472 | @end ignore |