Mercurial > emacs
comparison src/lread.c @ 39857:6235c0f8e52c
(substitute_object_recurse): Use traverse_intervals_noorder.
(syms_of_lread) <Vafter_load_alist>: Update docstring.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Fri, 12 Oct 2001 22:07:35 +0000 |
parents | 2a3f4d2a5ccc |
children | 579177964efa |
comparison
equal
deleted
inserted
replaced
39856:3fb9aba0cbd4 | 39857:6235c0f8e52c |
---|---|
2478 substitute_in_interval contains part of the logic. */ | 2478 substitute_in_interval contains part of the logic. */ |
2479 | 2479 |
2480 INTERVAL root_interval = XSTRING (subtree)->intervals; | 2480 INTERVAL root_interval = XSTRING (subtree)->intervals; |
2481 Lisp_Object arg = Fcons (object, placeholder); | 2481 Lisp_Object arg = Fcons (object, placeholder); |
2482 | 2482 |
2483 traverse_intervals (root_interval, 1, 0, | 2483 traverse_intervals_noorder (root_interval, |
2484 &substitute_in_interval, arg); | 2484 &substitute_in_interval, arg); |
2485 | 2485 |
2486 return subtree; | 2486 return subtree; |
2487 } | 2487 } |
2488 | 2488 |
2489 /* Other types don't recurse any further. */ | 2489 /* Other types don't recurse any further. */ |
3561 When `load' is run and the file-name argument is FILENAME,\n\ | 3561 When `load' is run and the file-name argument is FILENAME,\n\ |
3562 the FORMS in the corresponding element are executed at the end of loading.\n\n\ | 3562 the FORMS in the corresponding element are executed at the end of loading.\n\n\ |
3563 FILENAME must match exactly! Normally FILENAME is the name of a library,\n\ | 3563 FILENAME must match exactly! Normally FILENAME is the name of a library,\n\ |
3564 with no directory specified, since that is how `load' is normally called.\n\ | 3564 with no directory specified, since that is how `load' is normally called.\n\ |
3565 An error in FORMS does not undo the load,\n\ | 3565 An error in FORMS does not undo the load,\n\ |
3566 but does prevent execution of the rest of the FORMS."); | 3566 but does prevent execution of the rest of the FORMS.\n\ |
3567 FILENAME can also be a symbol (a feature) and FORMS are then executed\n\ | |
3568 when the corresponding call to `provide' is made."); | |
3567 Vafter_load_alist = Qnil; | 3569 Vafter_load_alist = Qnil; |
3568 | 3570 |
3569 DEFVAR_LISP ("load-history", &Vload_history, | 3571 DEFVAR_LISP ("load-history", &Vload_history, |
3570 "Alist mapping source file names to symbols and features.\n\ | 3572 "Alist mapping source file names to symbols and features.\n\ |
3571 Each alist element is a list that starts with a file name,\n\ | 3573 Each alist element is a list that starts with a file name,\n\ |