add a common place for cflags for tests

yallop · May 17, 2019 · 78cad0b · 78cad0b
1 parent 12dcf2e
commit 78cad0b
Show file tree

Hide file tree

Showing 2 changed files with 23 additions and 0 deletions.
diff --git a/tests/config/dune b/tests/config/dune
@@ -0,0 +1,10 @@
+(executable
+ (name test_config)
+ (libraries dune.configurator))
+
+(rule
+  (targets test-cflags)
+  (deps test_config.exe)
+  (action (run %{exe:test_config.exe}
+    -integers-dir %{lib:integers:ocaml_integers.h}
+    -ctypes-dir   %{lib:ctypes:ctypes_cstubs_internals.h})))
diff --git a/tests/config/test_config.ml b/tests/config/test_config.ml
@@ -0,0 +1,13 @@
+module C = Configurator.V1
+
+let () =
+  let ifile = ref "" in
+  let cfile = ref "" in
+  let args = [
+    "-integers-dir", Arg.Set_string ifile, "location of ocaml_integers.h";
+    "-ctypes-dir", Arg.Set_string cfile, "location of ctypes_cstubs_internals.h"] in
+  C.main ~args ~name:"ctypes-tests" (fun _c ->
+    let idir = ["-I";Filename.dirname !ifile] in
+    let cdir = ["-I";Filename.dirname !cfile] in
+    C.Flags.write_lines "test-cflags" (idir @ cdir)
+  )