Add -luuid

Signed-off-by: Etienne Millon <me@emillon.org>
ocaml · Jul 20, 2022 · cba3bfc · cba3bfc
1 parent 965f45c
commit cba3bfc
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 5 deletions.
diff --git a/boot/libs.ml b/boot/libs.ml
@@ -63,8 +63,8 @@ let link_flags =
     ; "-cclib"
     ; "-framework CoreServices"
     ])
-  ; ("win32", [ "-cclib"; "-lshell32"; "-cclib"; "-lole32" ])
-  ; ("win64", [ "-cclib"; "-lshell32"; "-cclib"; "-lole32" ])
-  ; ("mingw32", [ "-cclib"; "-lshell32"; "-cclib"; "-lole32" ])
-  ; ("mingw64", [ "-cclib"; "-lshell32"; "-cclib"; "-lole32" ])
+  ; ("win32", [ "-cclib"; "-lshell32"; "-cclib"; "-lole32" ; "-cclib"; "-luuid" ])
+  ; ("win64", [ "-cclib"; "-lshell32"; "-cclib"; "-lole32" ; "-cclib"; "-luuid" ])
+  ; ("mingw32", [ "-cclib"; "-lshell32"; "-cclib"; "-lole32"; "-cclib"; "-luuid" ])
+  ; ("mingw64", [ "-cclib"; "-lshell32"; "-cclib"; "-lole32"; "-cclib"; "-luuid" ])
   ]
diff --git a/otherlibs/xdg/gen_flags/gen_flags.ml b/otherlibs/xdg/gen_flags/gen_flags.ml
@@ -1,4 +1,4 @@
 let () =
   match Sys.argv.(1) with
-  | "Win32" -> print_endline "(-lshell32 -lole32)"
+  | "Win32" -> print_endline "(-lshell32 -lole32 -luuid)"
   | _ -> print_endline "()"