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