summaryrefslogtreecommitdiff
path: root/src/dired.c
diff options
context:
space:
mode:
authorPo Lu <luangruo@yahoo.com>2024-05-26 11:50:13 +0800
committerPo Lu <luangruo@yahoo.com>2024-05-26 11:50:45 +0800
commit74ceb6922c621cf48a2c9f6e6622133b522252ab (patch)
tree6a472eee069d100796ff7e06b2d57c276b259262 /src/dired.c
parent2a12f39ffe87b0b2885d9b7e92962eeed3c8029e (diff)
downloademacs-74ceb6922c621cf48a2c9f6e6622133b522252ab.tar.gz
emacs-74ceb6922c621cf48a2c9f6e6622133b522252ab.tar.bz2
emacs-74ceb6922c621cf48a2c9f6e6622133b522252ab.zip
Address compilation errors and warnings on x86 Solaris 10 systems
* doc/misc/ede.texi (Extending EDE): * doc/misc/flymake.texi (Top, Using Flymake): Insert punctuation after xrefs. * lisp/emacs-lisp/loaddefs-gen.el (loaddefs-generate): Print number of files being scraped. * src/dired.c (directory_files_internal): * src/eval.c (Fmake_interpreted_closure, Fdefvaralias): * src/fns.c (Fassoc): Work around optimizer failures.
Diffstat (limited to 'src/dired.c')
-rw-r--r--src/dired.c7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/dired.c b/src/dired.c
index bfbacf70917..37a9cad992f 100644
--- a/src/dired.c
+++ b/src/dired.c
@@ -351,8 +351,11 @@ directory_files_internal (Lisp_Object directory, Lisp_Object full,
specpdl_ptr = specpdl_ref_to_ptr (count);
if (NILP (nosort))
- list = CALLN (Fsort, Fnreverse (list),
- attrs ? Qfile_attributes_lessp : Qstring_lessp);
+ {
+ Lisp_Object ordered = Fnreverse (list);
+ list = CALLN (Fsort, ordered,
+ attrs ? Qfile_attributes_lessp : Qstring_lessp);
+ }
(void) directory_volatile;
return list;