diff options
| author | Dmitry Antipov <dmantipov@yandex.ru> | 2014-09-01 20:05:43 +0400 |
|---|---|---|
| committer | Dmitry Antipov <dmantipov@yandex.ru> | 2014-09-01 20:05:43 +0400 |
| commit | 50e9e580077869b2f2ced5916299bade6b4f4efd (patch) | |
| tree | 911756b76f580c119c080770ff895e6955f0be95 /src/charset.c | |
| parent | 203fb3639ace0e05284d9be5aa5c3d63701f33a4 (diff) | |
| download | emacs-50e9e580077869b2f2ced5916299bade6b4f4efd.tar.gz | |
Avoid extra calls to strlen in filesystem I/O routines.
* fileio.c (Fexpand_file_name): Avoid calls to strlen if
the length of 'newdir' is known or may be precalculated.
(file_accessible_directory_p): Prefer to pass Lisp_Object,
not 'char *', and so use precalculated length.
(Ffile_accessible_directory_p):
* callproc.c (encode_current_directory, init_callproc):
* charset.c (init_charset):
* lread.c (load_path_check, load_path_default): Adjust users.
* lisp.h (file_accessible_directory_p): Tweak prototype.
Diffstat (limited to 'src/charset.c')
| -rw-r--r-- | src/charset.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/charset.c b/src/charset.c index 341ac356aff..6964208137b 100644 --- a/src/charset.c +++ b/src/charset.c @@ -2298,7 +2298,7 @@ init_charset (void) { Lisp_Object tempdir; tempdir = Fexpand_file_name (build_string ("charsets"), Vdata_directory); - if (! file_accessible_directory_p (SSDATA (tempdir))) + if (! file_accessible_directory_p (tempdir)) { /* This used to be non-fatal (dir_warning), but it should not happen, and if it does sooner or later it will cause some |