diff options
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/src/alloc.c b/src/alloc.c index 7803ccdc976..d1d6323f905 100644 --- a/src/alloc.c +++ b/src/alloc.c @@ -2177,7 +2177,7 @@ compact_small_strings (void) } -DEFUE ("make-string", Fmake_string, Smake_string, 2, 2, 0, +DEFUN ("make-string", Fmake_string, Smake_string, 2, 2, 0, doc: /* Return a newly created string of length LENGTH, with INIT in each element. LENGTH must be an integer. INIT must be an integer that represents a character. */) @@ -2225,7 +2225,7 @@ INIT must be an integer that represents a character. */) } -DEFUE ("make-bool-vector", Fmake_bool_vector, Smake_bool_vector, 2, 2, 0, +DEFUN ("make-bool-vector", Fmake_bool_vector, Smake_bool_vector, 2, 2, 0, doc: /* Return a new bool-vector of length LENGTH, using INIT for each element. LENGTH must be a number. INIT matters only in whether it is t or nil. */) (Lisp_Object length, Lisp_Object init) @@ -2613,7 +2613,7 @@ free_cons (struct Lisp_Cons *ptr) cons_free_list = ptr; } -DEFUE ("cons", Fcons, Scons, 2, 2, 0, +DEFUN ("cons", Fcons, Scons, 2, 2, 0, doc: /* Create a new cons, give it CAR and CDR as components, and return it. */) (Lisp_Object car, Lisp_Object cdr) { @@ -2706,7 +2706,7 @@ list5 (Lisp_Object arg1, Lisp_Object arg2, Lisp_Object arg3, Lisp_Object arg4, L } -DEFUE ("list", Flist, Slist, 0, MANY, 0, +DEFUN ("list", Flist, Slist, 0, MANY, 0, doc: /* Return a newly created list with specified arguments as elements. Any number of arguments, even zero arguments, are allowed. usage: (list &rest OBJECTS) */) @@ -2724,7 +2724,7 @@ usage: (list &rest OBJECTS) */) } -DEFUE ("make-list", Fmake_list, Smake_list, 2, 2, 0, +DEFUN ("make-list", Fmake_list, Smake_list, 2, 2, 0, doc: /* Return a newly created list of length LENGTH, with each element being INIT. */) (register Lisp_Object length, Lisp_Object init) { @@ -2900,7 +2900,7 @@ allocate_process (void) } -DEFUE ("make-vector", Fmake_vector, Smake_vector, 2, 2, 0, +DEFUN ("make-vector", Fmake_vector, Smake_vector, 2, 2, 0, doc: /* Return a newly created vector of length LENGTH, with each element being INIT. See also the function `vector'. */) (register Lisp_Object length, Lisp_Object init) @@ -2922,7 +2922,7 @@ See also the function `vector'. */) } -DEFUE ("vector", Fvector, Svector, 0, MANY, 0, +DEFUN ("vector", Fvector, Svector, 0, MANY, 0, doc: /* Return a newly created vector with specified arguments as elements. Any number of arguments, even zero arguments, are allowed. usage: (vector &rest OBJECTS) */) @@ -2941,7 +2941,7 @@ usage: (vector &rest OBJECTS) */) } -DEFUE ("make-byte-code", Fmake_byte_code, Smake_byte_code, 4, MANY, 0, +DEFUN ("make-byte-code", Fmake_byte_code, Smake_byte_code, 4, MANY, 0, doc: /* Create a byte-code object with specified arguments as elements. The arguments should be the ARGLIST, bytecode-string BYTE-CODE, constant vector CONSTANTS, maximum stack size DEPTH, (optional) DOCSTRING, @@ -3036,7 +3036,7 @@ init_symbol (void) } -DEFUE ("make-symbol", Fmake_symbol, Smake_symbol, 1, 1, 0, +DEFUN ("make-symbol", Fmake_symbol, Smake_symbol, 1, 1, 0, doc: /* Return a newly allocated uninterned symbol whose name is NAME. Its value and function definition are void, and its property list is nil. */) (Lisp_Object name) @@ -3199,7 +3199,7 @@ make_save_value (void *pointer, int integer) return val; } -DEFUE ("make-marker", Fmake_marker, Smake_marker, 0, 0, 0, +DEFUN ("make-marker", Fmake_marker, Smake_marker, 0, 0, 0, doc: /* Return a newly allocated marker which does not point at any place. */) (void) { @@ -3928,7 +3928,7 @@ static int max_live, max_zombies; static double avg_live; -DEFUE ("gc-status", Fgc_status, Sgc_status, 0, 0, "", +DEFUN ("gc-status", Fgc_status, Sgc_status, 0, 0, "", doc: /* Show information about live and zombie objects. */) (void) { @@ -4743,7 +4743,7 @@ make_pure_vector (EMACS_INT len) } -DEFUE ("purecopy", Fpurecopy, Spurecopy, 1, 1, 0, +DEFUN ("purecopy", Fpurecopy, Spurecopy, 1, 1, 0, doc: /* Make a copy of object OBJ in pure storage. Recursively copies contents of vectors and cons cells. Does not copy symbols. Copies strings without text properties. */) @@ -4837,7 +4837,7 @@ inhibit_garbage_collection (void) } -DEFUE ("garbage-collect", Fgarbage_collect, Sgarbage_collect, 0, 0, "", +DEFUN ("garbage-collect", Fgarbage_collect, Sgarbage_collect, 0, 0, "", doc: /* Reclaim storage for Lisp objects no longer needed. Garbage collection happens automatically if you cons more than `gc-cons-threshold' bytes of Lisp data since previous garbage collection. |