diff options
| author | Stefan Monnier | 2012-05-15 16:20:18 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2012-05-15 16:20:18 -0400 |
| commit | 9660f5fc84e148f54f704a86710c0e9287a1769c (patch) | |
| tree | 97b96d4695beb1b204017400e313b8776fb59859 /src | |
| parent | 033cdda60a729ab105dc98923348e70066af7d30 (diff) | |
| download | emacs-9660f5fc84e148f54f704a86710c0e9287a1769c.tar.gz emacs-9660f5fc84e148f54f704a86710c0e9287a1769c.zip | |
* src/lread.c (init_obarray): Declare Qt and Qnil as special.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 4 | ||||
| -rw-r--r-- | src/lread.c | 4 |
2 files changed, 7 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 2d20f13dced..484df557e6e 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2012-05-15 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * lread.c (init_obarray): Declare Qt and Qnil as special. | ||
| 4 | |||
| 1 | 2012-05-14 Glenn Morris <rgm@gnu.org> | 5 | 2012-05-14 Glenn Morris <rgm@gnu.org> |
| 2 | 6 | ||
| 3 | * nsterm.m (ns_init_paths): Fix typo ("libexec" not "lib-exec"). | 7 | * nsterm.m (ns_init_paths): Fix typo ("libexec" not "lib-exec"). |
diff --git a/src/lread.c b/src/lread.c index 50465fd01e8..6b657f61ed0 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -24,7 +24,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 24 | #include <sys/stat.h> | 24 | #include <sys/stat.h> |
| 25 | #include <sys/file.h> | 25 | #include <sys/file.h> |
| 26 | #include <errno.h> | 26 | #include <errno.h> |
| 27 | #include <limits.h> /* for CHAR_BIT */ | 27 | #include <limits.h> /* For CHAR_BIT. */ |
| 28 | #include <setjmp.h> | 28 | #include <setjmp.h> |
| 29 | #include "lisp.h" | 29 | #include "lisp.h" |
| 30 | #include "intervals.h" | 30 | #include "intervals.h" |
| @@ -3990,10 +3990,12 @@ init_obarray (void) | |||
| 3990 | /* XSYMBOL (Qnil)->function = Qunbound; */ | 3990 | /* XSYMBOL (Qnil)->function = Qunbound; */ |
| 3991 | SET_SYMBOL_VAL (XSYMBOL (Qnil), Qnil); | 3991 | SET_SYMBOL_VAL (XSYMBOL (Qnil), Qnil); |
| 3992 | XSYMBOL (Qnil)->constant = 1; | 3992 | XSYMBOL (Qnil)->constant = 1; |
| 3993 | XSYMBOL (Qnil)->declared_special = 1; | ||
| 3993 | XSYMBOL (Qnil)->plist = Qnil; | 3994 | XSYMBOL (Qnil)->plist = Qnil; |
| 3994 | 3995 | ||
| 3995 | Qt = intern_c_string ("t"); | 3996 | Qt = intern_c_string ("t"); |
| 3996 | SET_SYMBOL_VAL (XSYMBOL (Qt), Qt); | 3997 | SET_SYMBOL_VAL (XSYMBOL (Qt), Qt); |
| 3998 | XSYMBOL (Qnil)->declared_special = 1; | ||
| 3997 | XSYMBOL (Qt)->constant = 1; | 3999 | XSYMBOL (Qt)->constant = 1; |
| 3998 | 4000 | ||
| 3999 | /* Qt is correct even if CANNOT_DUMP. loadup.el will set to nil at end. */ | 4001 | /* Qt is correct even if CANNOT_DUMP. loadup.el will set to nil at end. */ |