Whitespace.

This commit is contained in:
Graydon Hoare 2010-06-28 19:21:09 -07:00
parent 5abc483d9a
commit bd059a354d

View File

@ -906,7 +906,7 @@ let pattern_resolving_visitor
* are only looking at the fact that it's a tag-like type at all, and
* asking for its arity, it doesn't matter that the possibly parametric
* tag type has its parameters unbound here. *)
let tag_ty =
let tag_ty =
fn_output_ty (Hashtbl.find cx.ctxt_all_item_types tag_ctor_id)
in
begin