Port to dune

Signed-off-by: Rudi Grinberg <[email protected]>

Author: rgrinberg

dune-project

@@ -0,0 +1,2 @@
+(lang dune 1.0)
+(name ctypes)

src/configure/dune

@@ -0,0 +1,14 @@
+(library
+ (name extract_from_c)
+ (modules extract_from_c)
+ (libraries str))
+
+(executable
+ (name gen_c_primitives)
+ (libraries extract_from_c)
+ (modules gen_c_primitives))
+
+(executable
+ (name gen_libffi_abi)
+ (libraries extract_from_c)
+ (modules gen_libffi_abi))

src/configure/jbuild

@@ -1,7 +1,5 @@
-(jbuild_version 1)
-
 (library
- ((name ctypes_stubs)
-  (public_name ctypes.stubs)
-  (wrapped false)
-  (libraries (ctypes))))
+ (name ctypes_stubs)
+ (public_name ctypes.stubs)
+ (wrapped false)
+ (libraries ctypes))

src/cstubs/jbuild

@@ -1,8 +1,6 @@
-open Base
-open Stdio
+module C = Configurator.V1
 
 let () =
-  let module C = Configurator in
   C.main ~name:"ffi" (fun c ->
       let default : C.Pkg_config.package_conf = {
         libs = ["-lffi"];

src/ctypes-foreign-base/config/discover.ml

@@ -0,0 +1,3 @@
+(executable
+ (name discover)
+ (libraries dune.configurator))

src/ctypes-foreign-base/config/dune

@@ -0,0 +1,21 @@
+(rule
+ (action (copy# "dl_stubs.c.%{read:backend.sexp}" dl_stubs.c)))
+
+(rule
+ (action (copy# "dl.ml.%{read:backend.sexp}" dl.ml)))
+
+(rule
+ (with-stdout-to libffi_abi.ml (run ../configure/gen_libffi_abi.exe)))
+
+(library
+ (name ctypes_foreign_base)
+ (public_name ctypes.foreign.base)
+ (wrapped false)
+ (libraries ctypes)
+ (c_library_flags (:include c_library_flags.sexp))
+ (c_flags (:include c_flags.sexp))
+ (c_names dl_stubs ffi_call_stubs ffi_type_stubs))
+
+(rule
+ (targets c_flags.sexp c_library_flags.sexp backend.sexp)
+ (action (run ./config/discover.exe)))

src/ctypes-foreign-base/config/jbuild

@@ -0,0 +1,6 @@
+(library
+ (name ctypes_foreign_threaded)
+ (public_name ctypes.foreign.threaded)
+ (wrapped false)
+ (libraries ctypes.foreign.base threads)
+ (c_names foreign_threaded_stubs))

src/ctypes-foreign-base/dune

@@ -1,7 +1,5 @@
-(jbuild_version 1)
-
 (library
- ((name ctypes_foreign_unthreaded)
-  (public_name ctypes.foreign.unthreaded)
-  (wrapped false)
-  (libraries (ctypes.foreign.base))))
+ (name ctypes_foreign_unthreaded)
+ (public_name ctypes.foreign.unthreaded)
+ (wrapped false)
+ (libraries ctypes.foreign.base))

src/ctypes-foreign-base/jbuild

@@ -1,19 +1,17 @@
-(jbuild_version 1)
-
 (rule
  (with-stdout-to ctypes_primitives.ml (run ../configure/gen_c_primitives.exe)))
 
 (library
- ((name ctypes)
-  (public_name ctypes)
-  (wrapped false)
-  (libraries (bigarray bytes integers))
-  (c_names
-   (complex_stubs
-    ctypes_bigarrays
-    ctypes_roots
-    ldouble_stubs
-    managed_buffer_stubs
-    posix_types_stubs
-    raw_pointer_stubs
-    type_info_stubs))))
+ (name ctypes)
+ (public_name ctypes)
+ (wrapped false)
+ (libraries bigarray bytes integers)
+ (c_names
+  complex_stubs
+  ctypes_bigarrays
+  ctypes_roots
+  ldouble_stubs
+  managed_buffer_stubs
+  posix_types_stubs
+  raw_pointer_stubs
+  type_info_stubs))