aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorStefan Monnier2003-04-17 21:49:09 +0000
committerStefan Monnier2003-04-17 21:49:09 +0000
commit92cc28b2f89d83fbcd712450abfbf4e138d2e06f (patch)
treeec753fc7aabf4c641d732ec32e2c385d65bb1a23 /src
parent52ad5ecc6c464a57eb4ecf35fd5aa72275e25dfb (diff)
downloademacs-92cc28b2f89d83fbcd712450abfbf4e138d2e06f.tar.gz
emacs-92cc28b2f89d83fbcd712450abfbf4e138d2e06f.zip
(Fmake_byte_code): Improve the `usage' string.
Diffstat (limited to 'src')
-rw-r--r--src/alloc.c4
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,
2436stack size, (optional) doc string, and (optional) interactive spec. 2436stack size, (optional) doc string, and (optional) interactive spec.
2437The first four arguments are required; at most six have any 2437The first four arguments are required; at most six have any
2438significance. 2438significance.
2439usage: (make-byte-code &rest ELEMENTS) */) 2439usage: (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