Mercurial > emacs

comparison src/eval.c @ 47026:bacfdb9ae69d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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.