projects
/
chise
/
xemacs-chise.git.1
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
XEmacs 21.2-b2
[chise/xemacs-chise.git.1]
/
src
/
lread.c
diff --git
a/src/lread.c
b/src/lread.c
index
9c0fa8b
..
98516f0
100644
(file)
--- a/
src/lread.c
+++ b/
src/lread.c
@@
-91,9
+91,6
@@
int load_warn_when_source_only;
/* Whether Fload_internal() should ignore .elc files when no suffix is given */
int load_ignore_elc_files;
/* Whether Fload_internal() should ignore .elc files when no suffix is given */
int load_ignore_elc_files;
-/* Directory in which the sources were found. */
-Lisp_Object Vsource_directory;
-
/* Search path for files to be loaded. */
Lisp_Object Vload_path;
/* Search path for files to be loaded. */
Lisp_Object Vload_path;
@@
-796,10
+793,11
@@
encoding detection or end-of-line detection.
if (purify_flag && noninteractive)
{
if (EQ (last_file_loaded, file))
if (purify_flag && noninteractive)
{
if (EQ (last_file_loaded, file))
- message_append (" (%d)", purespace_usage() - pure_usage);
+ message_append (" (%ld)",
+ (unsigned long) (purespace_usage() - pure_usage));
else
else
- message ("Loading %s ...done (%d)", XSTRING_DATA (file),
- purespace_usage() - pure_usage);
+ message ("Loading %s ...done (%ld)", XSTRING_DATA (file),
+ (unsigned long) (purespace_usage() - pure_usage));
}
/*#endif / * DEBUG_XEMACS */
}
/*#endif / * DEBUG_XEMACS */
@@
-3153,12
+3151,6
@@
This is useful when the file being loaded is a temporary copy.
*/ );
load_force_doc_strings = 0;
*/ );
load_force_doc_strings = 0;
- DEFVAR_LISP ("source-directory", &Vsource_directory /*
-Directory in which XEmacs sources were found when XEmacs was built.
-You cannot count on them to still be there!
-*/ );
- Vsource_directory = Qnil;
-
/* See read_escape(). */
#if 0
/* Used to be named `puke-on-fsf-keys' */
/* See read_escape(). */
#if 0
/* Used to be named `puke-on-fsf-keys' */