diff options
| author | Tom Tromey | 2013-01-05 19:36:45 -0700 |
|---|---|---|
| committer | Tom Tromey | 2013-01-05 19:36:45 -0700 |
| commit | e078a23febca14bc919c5806670479c395e3253e (patch) | |
| tree | e9e4ed91feef744d525264c31974c3ed00146bcd /src/alloc.c | |
| parent | 63d535c829a930207b64fe733228f15a554644b1 (diff) | |
| parent | 7a2657fa3bedbd977f4e11fe030cb4a210c04ab4 (diff) | |
| download | emacs-e078a23febca14bc919c5806670479c395e3253e.tar.gz emacs-e078a23febca14bc919c5806670479c395e3253e.zip | |
merge from trunk
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/alloc.c b/src/alloc.c index d091a9cdf55..c2b2a4c1ed7 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -1,7 +1,7 @@ | |||
| 1 | /* Storage allocation and gc for GNU Emacs Lisp interpreter. | 1 | /* Storage allocation and gc for GNU Emacs Lisp interpreter. |
| 2 | 2 | ||
| 3 | Copyright (C) 1985-1986, 1988, 1993-1995, 1997-2012 | 3 | Copyright (C) 1985-1986, 1988, 1993-1995, 1997-2013 Free Software |
| 4 | Free Software Foundation, Inc. | 4 | Foundation, Inc. |
| 5 | 5 | ||
| 6 | This file is part of GNU Emacs. | 6 | This file is part of GNU Emacs. |
| 7 | 7 | ||
| @@ -4726,12 +4726,12 @@ valid_pointer_p (void *p) | |||
| 4726 | #endif | 4726 | #endif |
| 4727 | } | 4727 | } |
| 4728 | 4728 | ||
| 4729 | /* Return 2 if OBJ is a killed or special buffer object. | 4729 | /* Return 2 if OBJ is a killed or special buffer object, 1 if OBJ is a |
| 4730 | Return 1 if OBJ is a valid lisp object. | 4730 | valid lisp object, 0 if OBJ is NOT a valid lisp object, or -1 if we |
| 4731 | Return 0 if OBJ is NOT a valid lisp object. | 4731 | cannot validate OBJ. This function can be quite slow, so its primary |
| 4732 | Return -1 if we cannot validate OBJ. | 4732 | use is the manual debugging. The only exception is print_object, where |
| 4733 | This function can be quite slow, | 4733 | we use it to check whether the memory referenced by the pointer of |
| 4734 | so it should only be used in code for manual debugging. */ | 4734 | Lisp_Save_Value object contains valid objects. */ |
| 4735 | 4735 | ||
| 4736 | int | 4736 | int |
| 4737 | valid_lisp_object_p (Lisp_Object obj) | 4737 | valid_lisp_object_p (Lisp_Object obj) |