1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
Index: gauche/src/gen-staticinit.scm
===================================================================
--- gauche.orig/src/gen-staticinit.scm
+++ gauche/src/gen-staticinit.scm
@@ -164,8 +164,8 @@
$ path-sans-extension partial-path)])
(list modname partial-path file)))
(delete-duplicates
- (glob (list (build-path (top-srcdir) (cdr p))
- (build-path (top-builddir) (cdr p)))))))
+ (sort (glob (list (build-path (top-srcdir) (cdr p))
+ (build-path (top-builddir) (cdr p))))))))
;; Classify scheme files
;; scms : ((module partial-path path) ...)
|
