CR: add type annotation

ocsigen · Sep 4, 2024 · 1e40d0d · 1e40d0d
1 parent 27d2ccd
commit 1e40d0d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/js_of_ocaml/typed_array.ml b/lib/js_of_ocaml/typed_array.ml
@@ -105,7 +105,7 @@ external to_genarray :
      ('typed_array, 'bigarray, 'elt) typedArray t
   -> ('bigarray, 'elt, Bigarray.c_layout) Bigarray.Genarray.t = "caml_ba_from_typed_array"
 
-let from_genarray _ a = from_genarray_impl a
+let from_genarray (_ : ('typed_array, 'bigarray, 'elt) kind) a = from_genarray_impl a
 
 let int8Array = Js.Unsafe.global##._Int8Array