From 8c640a262969ef44cd8bc0e0abe95e2a54f4c3f5 Mon Sep 17 00:00:00 2001 From: Marcos Magueta Date: Thu, 5 Mar 2026 23:42:15 -0300 Subject: ocaml re-migration --- lib/core_functions.ml | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 lib/core_functions.ml (limited to 'lib/core_functions.ml') diff --git a/lib/core_functions.ml b/lib/core_functions.ml new file mode 100644 index 0000000..083e0cf --- /dev/null +++ b/lib/core_functions.ml @@ -0,0 +1,11 @@ +module Types = Types_generated + +module Functions (F : Ctypes.FOREIGN) = struct + open F + + let compute_hash = + foreign "compute_hash" + (F.(@->) (Ctypes.ptr Ctypes.char) + (F.(@->) Ctypes.string (F.returning Ctypes.void))) + +end -- cgit v1.2.3