Convert JS array to OCaml array

dfinity · Oct 17, 2022 · 2883120 · 2883120
1 parent 7ca05ce
commit 2883120
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/js/common.ml b/src/js/common.ml
@@ -61,7 +61,7 @@ let js_run list source =
   ignore (Pipeline.run_stdin_from_file list (Js.to_string source))
 
 let js_viper filenames =
-  let result = Pipeline.viper_files (filenames |> Array.to_list |> List.map Js.to_string) in
+  let result = Pipeline.viper_files (Js.to_array filenames |> Array.to_list |> List.map Js.to_string) in
   js_result result (fun s ->
     Js.some (Js.string s)
   )