From fd2ac1b21abfb5155c16559fdcf390d87a1db6ec Mon Sep 17 00:00:00 2001
From: Anthony Scemama <scemama@irsamc.ups-tlse.fr>
Date: Wed, 27 Aug 2014 14:15:02 +0200
Subject: [PATCH] ezfio_array_of_list now return an ezfio_array

---
 src/ezfio.ml | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/ezfio.ml b/src/ezfio.ml
index 537883e..a098460 100644
--- a/src/ezfio.ml
+++ b/src/ezfio.ml
@@ -273,7 +273,10 @@ let ezfio_array_of_list ~rank ~dim ~data =
       (Ezfio_data data,rest) 
   in    
   let (result,_) = read_nd data rank in
-  result
+  { rank= rank;
+    dim=  dim;
+    data=result;
+  }
 ;;