Mercurial > emacs
comparison src/eval.c @ 47026:bacfdb9ae69d
Fix last change.
author | Andreas Schwab <schwab@suse.de> |
---|---|
date | Sat, 24 Aug 2002 18:35:58 +0000 |
parents | d2259df6cb09 |
children | 8faa4c711a1a |
comparison
equal
deleted
inserted
replaced
47025:324b87cc6fdf | 47026:bacfdb9ae69d |
---|---|
1 /* Evaluator for GNU Emacs Lisp interpreter. | 1 /* Evaluator for GNU Emacs Lisp interpreter. |
2 Copyright (C) 1985, 86, 87, 93, 94, 95, 99, 2000, 2001 | 2 Copyright (C) 1985, 86, 87, 93, 94, 95, 99, 2000, 2001, 2002 |
3 Free Software Foundation, Inc. | 3 Free Software Foundation, Inc. |
4 | 4 |
5 This file is part of GNU Emacs. | 5 This file is part of GNU Emacs. |
6 | 6 |
7 GNU Emacs is free software; you can redistribute it and/or modify | 7 GNU Emacs is free software; you can redistribute it and/or modify |
781 } | 781 } |
782 else | 782 else |
783 /* Simple (defvar <var>) should not count as a definition at all. | 783 /* Simple (defvar <var>) should not count as a definition at all. |
784 It could get in the way of other definitions, and unloading this | 784 It could get in the way of other definitions, and unloading this |
785 package could try to make the variable unbound. */ | 785 package could try to make the variable unbound. */ |
786 | 786 ; |
787 | |
787 return sym; | 788 return sym; |
788 } | 789 } |
789 | 790 |
790 DEFUN ("defconst", Fdefconst, Sdefconst, 2, UNEVALLED, 0, | 791 DEFUN ("defconst", Fdefconst, Sdefconst, 2, UNEVALLED, 0, |
791 doc: /* Define SYMBOL as a constant variable. | 792 doc: /* Define SYMBOL as a constant variable. |