From 10a377cd2de2fad827a67739e6aa2f43b7df86af Mon Sep 17 00:00:00 2001 From: letouzey Date: Thu, 14 Mar 2013 16:43:13 +0000 Subject: Typo in an error message git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16303 85f007b7-540e-0410-9357-904b9bb8a0f7 --- pretyping/reductionops.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pretyping/reductionops.ml b/pretyping/reductionops.ml index 1396f91d4f..732001fde6 100644 --- a/pretyping/reductionops.ml +++ b/pretyping/reductionops.ml @@ -623,7 +623,7 @@ let clos_norm_flags flgs env sigma t = norm_val (create_clos_infos ~evars:(safe_evar_value sigma) flgs env) (inject t) - with e when is_anomaly e -> error "Tried to normalized ill-typed term" + with e when is_anomaly e -> error "Tried to normalize ill-typed term" let nf_beta = clos_norm_flags Closure.beta empty_env let nf_betaiota = clos_norm_flags Closure.betaiota empty_env -- cgit v1.2.3