Mercurial > emacs
comparison src/lread.c @ 61623:eac490378ade
(Vloads_in_progress): Static.
author | Lute Kamstra <lute@gnu.org> |
---|---|
date | Mon, 18 Apr 2005 10:21:37 +0000 |
parents | 02c939955b7a |
children | f1b7fe92d96a 042f282a2ed7 e1fbb019c538 |
comparison
equal
deleted
inserted
replaced
61622:aef105b11011 | 61623:eac490378ade |
---|---|
1 /* Lisp parsing and input streams. | 1 /* Lisp parsing and input streams. |
2 Copyright (C) 1985, 1986, 1987, 1988, 1989, 1993, 1994, 1995, 1997, 1998, | 2 Copyright (C) 1985, 1986, 1987, 1988, 1989, 1993, 1994, 1995, 1997, 1998, |
3 1999, 2000, 2001, 2003, 2004 Free Software Foundation, Inc. | 3 1999, 2000, 2001, 2003, 2004, 2005 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 |
8 it under the terms of the GNU General Public License as published by | 8 it under the terms of the GNU General Public License as published by |
87 Lisp_Object Qinhibit_file_name_operation; | 87 Lisp_Object Qinhibit_file_name_operation; |
88 | 88 |
89 extern Lisp_Object Qevent_symbol_element_mask; | 89 extern Lisp_Object Qevent_symbol_element_mask; |
90 extern Lisp_Object Qfile_exists_p; | 90 extern Lisp_Object Qfile_exists_p; |
91 | 91 |
92 /* non-zero if inside `load' */ | 92 /* non-zero iff inside `load' */ |
93 int load_in_progress; | 93 int load_in_progress; |
94 | 94 |
95 /* Directory in which the sources were found. */ | 95 /* Directory in which the sources were found. */ |
96 Lisp_Object Vsource_directory; | 96 Lisp_Object Vsource_directory; |
97 | 97 |
191 static int new_backquote_flag; | 191 static int new_backquote_flag; |
192 | 192 |
193 /* A list of file names for files being loaded in Fload. Used to | 193 /* A list of file names for files being loaded in Fload. Used to |
194 check for recursive loads. */ | 194 check for recursive loads. */ |
195 | 195 |
196 Lisp_Object Vloads_in_progress; | 196 static Lisp_Object Vloads_in_progress; |
197 | 197 |
198 /* Non-zero means load dangerous compiled Lisp files. */ | 198 /* Non-zero means load dangerous compiled Lisp files. */ |
199 | 199 |
200 int load_dangerous_libraries; | 200 int load_dangerous_libraries; |
201 | 201 |