$OpenBSD: patch-files_ml,v 1.1 2019/09/18 17:49:36 chrisz Exp $

Index: files.ml
--- files.ml.orig
+++ files.ml
@@ -722,7 +722,7 @@ let get_files_in_directory dir =
   with End_of_file ->
     dirh.System.closedir ()
   end;
-  Sort.list (<) !files
+  List.sort String.compare !files
 
 let ls dir pattern =
   Util.convertUnixErrorsToTransient
