petite amelioration de List.sort
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@3234 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02master
parent
21fd21f35f
commit
88980b7eef
|
@ -208,7 +208,7 @@ let array_to_list_in_place a =
|
|||
end
|
||||
end
|
||||
in
|
||||
loop [] l l
|
||||
loop [] (l-1000) l
|
||||
;;
|
||||
|
||||
let stable_sort cmp l =
|
||||
|
|
Loading…
Reference in New Issue