diff options
| author | Erik Naggum | 1996-01-09 02:21:31 +0000 |
|---|---|---|
| committer | Erik Naggum | 1996-01-09 02:21:31 +0000 |
| commit | 54ee42dd61458c3bae404a08d4a4da1b619525fc (patch) | |
| tree | 2fd219200d8dd4ee5e69321a6a6219316f4a6436 /src/alloc.c | |
| parent | 9391b69806801ea8cfdf977fd1c4fdc5d0081d8a (diff) | |
| download | emacs-54ee42dd61458c3bae404a08d4a4da1b619525fc.tar.gz emacs-54ee42dd61458c3bae404a08d4a4da1b619525fc.zip | |
(Fmake_symbol): Harmonize arguments with documentation.
Diffstat (limited to 'src/alloc.c')
| -rw-r--r-- | src/alloc.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/alloc.c b/src/alloc.c index e911dfce35c..00a03e850d8 100644 --- a/src/alloc.c +++ b/src/alloc.c | |||
| @@ -870,13 +870,13 @@ init_symbol () | |||
| 870 | DEFUN ("make-symbol", Fmake_symbol, Smake_symbol, 1, 1, 0, | 870 | DEFUN ("make-symbol", Fmake_symbol, Smake_symbol, 1, 1, 0, |
| 871 | "Return a newly allocated uninterned symbol whose name is NAME.\n\ | 871 | "Return a newly allocated uninterned symbol whose name is NAME.\n\ |
| 872 | Its value and function definition are void, and its property list is nil.") | 872 | Its value and function definition are void, and its property list is nil.") |
| 873 | (str) | 873 | (name) |
| 874 | Lisp_Object str; | 874 | Lisp_Object name; |
| 875 | { | 875 | { |
| 876 | register Lisp_Object val; | 876 | register Lisp_Object val; |
| 877 | register struct Lisp_Symbol *p; | 877 | register struct Lisp_Symbol *p; |
| 878 | 878 | ||
| 879 | CHECK_STRING (str, 0); | 879 | CHECK_STRING (name, 0); |
| 880 | 880 | ||
| 881 | if (symbol_free_list) | 881 | if (symbol_free_list) |
| 882 | { | 882 | { |