From 1f3cff91f6762b0f47f41025b5e2c5ac942479ba Mon Sep 17 00:00:00 2001 From: Roy Frostig Date: Thu, 24 Jun 2010 08:23:17 -0700 Subject: [PATCH] Remove bogus FIXME. --- src/boot/me/type.ml | 1 - 1 file changed, 1 deletion(-) diff --git a/src/boot/me/type.ml b/src/boot/me/type.ml index 2dd271443b0..a1bc886bf4d 100644 --- a/src/boot/me/type.ml +++ b/src/boot/me/type.ml @@ -1215,7 +1215,6 @@ let process_crate (cx:ctxt) (crate:Ast.crate) : unit = let tag_tv = ref TYSPEC_all in unify_ty tag_ty tag_tv; unify_tyvars expected tag_tv; - (* FIXME check arity here? *) List.iter begin fun slot ->