Skip to content

Commit

Permalink
fix libirmin: shared library compilation + lwt test hangs
Browse files Browse the repository at this point in the history
  • Loading branch information
art-w committed Sep 5, 2024
1 parent 0fd47cc commit 7a45a57
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 13 deletions.
17 changes: 5 additions & 12 deletions src/libirmin/lib/dune
Original file line number Diff line number Diff line change
Expand Up @@ -7,25 +7,18 @@

(executable
(name libirmin)
(package libirmin)
(public_name libirmin)
(libraries libirmin_bindings)
(modes
(native shared_object)
native)
(modes shared_object)
(modules libirmin irmin_bindings)
(foreign_stubs
(language c)
(names irmin)))
(names irmin))
(flags
(:standard -w -unused-var-strict -ccopt "-Wl,-znow")))

(install
(package libirmin)
(section lib)
(files
(irmin.h as include/irmin.h)
(libirmin.so as lib/libirmin.so)))

(env
(dev
(flags
(:standard -w -unused-var-strict))))
(libirmin%{ext_dll} as lib/libirm%{ext_dll})))
2 changes: 1 addition & 1 deletion src/libirmin/util.ml
Original file line number Diff line number Diff line change
Expand Up @@ -49,7 +49,7 @@ module Make (I : Cstubs_inverted.INTERNAL) = struct
match Lwt.poll x with
| Some x -> x
| None ->
let () = Lwt_engine.iter true in
let () = Lwt_engine.iter false in
run x

module Root = struct
Expand Down

0 comments on commit 7a45a57

Please sign in to comment.