From 6ee16b588d53d4148343ceb11ce2167e174536fc Mon Sep 17 00:00:00 2001 From: Graydon Hoare Date: Wed, 30 Jun 2010 00:55:53 -0700 Subject: [PATCH] Fix error-message typo. --- src/boot/me/semant.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/boot/me/semant.ml b/src/boot/me/semant.ml index cb11991fd93..cc1c3321e2d 100644 --- a/src/boot/me/semant.ml +++ b/src/boot/me/semant.ml @@ -1099,7 +1099,7 @@ let project_type | (_,_) -> bug () "unhandled form of lval-ext in Semant." - "project_slot: %a indexed by %a" + "project_ty: %a indexed by %a" Ast.sprintf_ty base_ty Ast.sprintf_lval_component comp ;;