MPR#7248: have ocamldep interpret -open arguments in left-to-right order

Compilers and tools consistently assume that (_ list ref) in Cflags
are prepended to, and reverse them before usage. This one was
forgotten.
master
Gabriel Scherer 2016-05-06 12:03:58 -04:00
parent 0936e075bf
commit cc69cbf31c
3 changed files with 4 additions and 1 deletions

View File

@ -62,6 +62,7 @@ Stephen Dolan <stedolan>
Junsong Li <lijunsong@mantis>
Junsong Li <ljs.darkfish@gmail.com>
Christophe Raffali <craff@mantis>
Anton Bachin <antron@mantis>
# These contributors prefer to be referred to pseudonymously
<whitequark@mantis> <whitequark@mantis>

View File

@ -23,6 +23,8 @@ OCaml 4.04.0:
- GPR#452: Make the output of ocamldep more stable
(Alain Frisch)
- MPR#7248: have ocamldep interpret -open arguments in left-to-right order
(Gabriel Scherer, report by Anton Bachin)
### Standard library:

View File

@ -293,7 +293,7 @@ let read_parse_and_extract parse_function extract_function def magic
List.fold_left
(fun bv modname ->
Depend.open_module bv (Longident.Lident modname))
!module_map !Clflags.open_modules
!module_map ((* PR#7248 *) List.rev !Clflags.open_modules)
in
let r = extract_function bound_vars ast in
Pparse.remove_preprocessed input_file;