10
0
mirror of https://gitlab.com/scemama/EZFIO.git synced 2024-11-19 04:22:25 +01:00

Fixed EZFIO.ml

This commit is contained in:
Anthony Scemama 2018-07-27 14:39:32 +02:00
parent 8e20da23d5
commit 93cfb0ec92

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