procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(MARKBIT): Update comment.

Browse source
This commit is contained in:
Stefan Monnier 2003-06-27 22:53:35 +00:00
parent 3ef06d12cd
commit 00baad70aa
1 changed files with 3 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
src/lisp.h
View file

@ -261,21 +261,14 @@ LISP_MAKE_RVALUE (Lisp_Object o)
/* Two flags that are set during GC. On some machines, these flags
are defined differently by the m- file. */
/* This is set in the car of a cons and in the plist slot of a symbol
to indicate it is marked. Likewise in the plist slot of an interval,
the chain slot of a marker, the type slot of a float, and the name
slot of a buffer.
In strings, this bit in the size field indicates that the string
is a "large" one, one which was separately malloc'd
rather than being part of a string block. */
/* This is set in the car of a cons to indicate it is marked.
Likewise in the type slot of a float and in the size slot of strings. */
#ifndef MARKBIT
#define MARKBIT ((EMACS_INT) ((EMACS_UINT) 1 << (VALBITS + GCTYPEBITS)))
#endif /*MARKBIT */
/* In the size word of a vector, this bit means the vector has been marked.
In the size word of a large string, likewise. */
/* In the size word of a vector, this bit means the vector has been marked. */
#ifndef ARRAY_MARK_FLAG
#define ARRAY_MARK_FLAG ((MARKBIT >> 1) & ~MARKBIT)