From 32b768c62eada16d07453b63fd4bdabfebed0d05 Mon Sep 17 00:00:00 2001 From: herbelin Date: Sun, 14 Sep 2003 10:26:19 +0000 Subject: Bug PR#324 git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4398 85f007b7-540e-0410-9357-904b9bb8a0f7 --- lib/util.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib') diff --git a/lib/util.ml b/lib/util.ml index d6e160efd7..4d86f04f51 100644 --- a/lib/util.ml +++ b/lib/util.ml @@ -401,7 +401,7 @@ let array_tl v = let array_last v = match Array.length v with - | 0 -> failwith "aray_last" + | 0 -> failwith "array_last" | n -> v.(pred n) let array_cons e v = Array.append [|e|] v -- cgit v1.2.3