X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/a891a827a9bad83d44164ffdd7b28f070c439e46..d8214dc258396483f72533504515a4e1d1b3deef:/interpretor/aux.ml

diff --git a/interpretor/aux.ml b/interpretor/aux.ml
index 3bc11a6..fccb904 100644
--- a/interpretor/aux.ml
+++ b/interpretor/aux.ml
@@ -18,4 +18,4 @@ let array_map3 = fun f -> fun a -> fun b -> fun c ->
   let n2 = Array.length b in
   let n3 = Array.length c in
   if n1 = n2 && n1 = n3 then Array.init n1 (fun i -> f a.(i) b.(i) c.(i))
-  else raise (Invalid_argument "Array.map2 size not matched.");;
+  else raise (Invalid_argument "Array.map3 size not matched.");;