diff options
| author | Stefan Monnier | 2003-04-17 21:49:09 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2003-04-17 21:49:09 +0000 |
| commit | 92cc28b2f89d83fbcd712450abfbf4e138d2e06f (patch) | |
| tree | ec753fc7aabf4c641d732ec32e2c385d65bb1a23 /src | |
| parent | 52ad5ecc6c464a57eb4ecf35fd5aa72275e25dfb (diff) | |
| download | emacs-92cc28b2f89d83fbcd712450abfbf4e138d2e06f.tar.gz emacs-92cc28b2f89d83fbcd712450abfbf4e138d2e06f.zip | |
(Fmake_byte_code): Improve the `usage' string.
Diffstat (limited to 'src')
| -rw-r--r-- | src/alloc.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/alloc.c b/src/alloc.c index 4dcc5b49825..73d1b034137 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -2436,7 +2436,7 @@ The arguments should be the arglist, bytecode-string, constant vector, | |||
| 2436 | stack size, (optional) doc string, and (optional) interactive spec. | 2436 | stack size, (optional) doc string, and (optional) interactive spec. |
| 2437 | The first four arguments are required; at most six have any | 2437 | The first four arguments are required; at most six have any |
| 2438 | significance. | 2438 | significance. |
| 2439 | usage: (make-byte-code &rest ELEMENTS) */) | 2439 | usage: (make-byte-code ARGLIST BYTE-CODE CONSTANTS DEPTH &optional DOCSTRING INTERACTIVE-SPEC &rest ELEMENTS) */) |
| 2440 | (nargs, args) | 2440 | (nargs, args) |
| 2441 | register int nargs; | 2441 | register int nargs; |
| 2442 | Lisp_Object *args; | 2442 | Lisp_Object *args; |
| @@ -3701,6 +3701,8 @@ check_gcpros () | |||
| 3701 | for (p = gcprolist; p; p = p->next) | 3701 | for (p = gcprolist; p; p = p->next) |
| 3702 | for (i = 0; i < p->nvars; ++i) | 3702 | for (i = 0; i < p->nvars; ++i) |
| 3703 | if (!survives_gc_p (p->var[i])) | 3703 | if (!survives_gc_p (p->var[i])) |
| 3704 | /* FIXME: It's not necessarily a bug. It might just be that the | ||
| 3705 | GCPRO is unnecessary or should release the object sooner. */ | ||
| 3704 | abort (); | 3706 | abort (); |
| 3705 | } | 3707 | } |
| 3706 | 3708 | ||