Skip to content

Commit 47b9410

Browse files
committed
objinfo: print cm[x]a extra C object, options and dlls in the cli order.
Follow up to ocaml#4949. Closes ocaml#9276.
1 parent 45d480a commit 47b9410

File tree

2 files changed

+7
-3
lines changed

2 files changed

+7
-3
lines changed

Changes

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -88,6 +88,10 @@ Working version
8888

8989
### Tools:
9090

91+
- #9276: objinfo: cm[x]a print extra C options, objects and dlls in
92+
the order given on the cli. Follow up to #4949.
93+
(Daniel Bünzli, review by Gabriel Scherer)
94+
9195
- #463: objinfo: better errors on object files coming
9296
from a different (older or newer), incompatible compiler version.
9397
(Gabriel Scherer, review by Gabriel Radanne and Damien Doligez)

tools/objinfo.ml

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -87,10 +87,10 @@ let print_cma_infos (lib : Cmo_format.library) =
8787
(* PR#4949: print in linking order *)
8888
List.iter print_spaced_string (List.rev lib.lib_ccobjs);
8989
printf "\nExtra C options:";
90-
List.iter print_spaced_string lib.lib_ccopts;
90+
List.iter print_spaced_string (List.rev lib.lib_ccopts);
9191
printf "\n";
9292
print_string "Extra dynamically-loaded libraries:";
93-
List.iter print_spaced_string lib.lib_dllibs;
93+
List.iter print_spaced_string (List.rev lib.lib_dllibs);
9494
printf "\n";
9595
List.iter print_cmo_infos lib.lib_units
9696

@@ -179,7 +179,7 @@ let print_cmxa_infos (lib : Cmx_format.library_infos) =
179179
printf "Extra C object files:";
180180
List.iter print_spaced_string (List.rev lib.lib_ccobjs);
181181
printf "\nExtra C options:";
182-
List.iter print_spaced_string lib.lib_ccopts;
182+
List.iter print_spaced_string (List.rev lib.lib_ccopts);
183183
printf "\n";
184184
List.iter print_cmx_infos lib.lib_units
185185

0 commit comments

Comments
 (0)