From 93cfb0ec9287e8f67d3d29e96db48593e832b9a8 Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Fri, 27 Jul 2018 14:39:32 +0200
Subject: [PATCH] Fixed EZFIO.ml

---
 src/ezfio.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ezfio.ml b/src/ezfio.ml
index 23a8337..a0bc0bd 100644
--- a/src/ezfio.ml
+++ b/src/ezfio.ml
@@ -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