diff options
| author | Richard M. Stallman | 1994-03-05 20:39:07 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-03-05 20:39:07 +0000 |
| commit | 3f872b675a1c21775d763c0359fed2cb13756daa (patch) | |
| tree | 89e8e616a795a657d8f76ae7de0ac941ed3bf062 /src/alloc.c | |
| parent | 829d872be9d2b6da73a0facea5f3b33beede4b7c (diff) | |
| download | emacs-3f872b675a1c21775d763c0359fed2cb13756daa.tar.gz emacs-3f872b675a1c21775d763c0359fed2cb13756daa.zip | |
(ARRAY_MARK_FLAG): Definition moved to lisp.h.
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/src/alloc.c b/src/alloc.c index 2ced2717cdc..402bc9486ef 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -1190,28 +1190,6 @@ struct backtrace | |||
| 1190 | /* if nargs is UNEVALLED, args points to slot holding list of unevalled args */ | 1190 | /* if nargs is UNEVALLED, args points to slot holding list of unevalled args */ |
| 1191 | char evalargs; | 1191 | char evalargs; |
| 1192 | }; | 1192 | }; |
| 1193 | |||
| 1194 | /* Two flags that are set during GC in the `size' component | ||
| 1195 | of a string or vector. On some machines, these flags | ||
| 1196 | are defined by the m- file to be different bits. */ | ||
| 1197 | |||
| 1198 | /* On vector, means it has been marked. | ||
| 1199 | On string size field or a reference to a string, | ||
| 1200 | means not the last reference in the chain. */ | ||
| 1201 | |||
| 1202 | #ifndef ARRAY_MARK_FLAG | ||
| 1203 | #define ARRAY_MARK_FLAG ((MARKBIT >> 1) & ~MARKBIT) | ||
| 1204 | #endif /* no ARRAY_MARK_FLAG */ | ||
| 1205 | |||
| 1206 | /* Any slot that is a Lisp_Object can point to a string | ||
| 1207 | and thus can be put on a string's reference-chain | ||
| 1208 | and thus may need to have its ARRAY_MARK_FLAG set. | ||
| 1209 | This includes the slots whose markbits are used to mark | ||
| 1210 | the containing objects. */ | ||
| 1211 | |||
| 1212 | #if ARRAY_MARK_FLAG == MARKBIT | ||
| 1213 | you lose | ||
| 1214 | #endif | ||
| 1215 | 1193 | ||
| 1216 | /* Garbage collection! */ | 1194 | /* Garbage collection! */ |
| 1217 | 1195 | ||