Fixed EZFIO.ml

This commit is contained in:
Anthony Scemama 2018-07-27 14:39:32 +02:00
parent 8e20da23d5
commit 93cfb0ec92
1 changed files with 1 additions and 1 deletions

View File

@ -380,7 +380,7 @@ let read_array type_conversion group name : 'a ezfio_array =
Ezfio_item (Array.init nmax (fun i->
let buffer = trim (input_line in_channel) in
try type_conversion buffer with
| Failure s -> failwith (s^": "^buffer))
| Failure s -> failwith (s^": "^buffer)))
in
(* Read multi-dimensional arrays *)
let rec read_nd = function