forgot this file in last commit

git-svn-id: http://caml.inria.fr/svn/ocaml/branches/gadts@10735 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Jacques Le Normand 2010-10-21 07:24:46 +00:00
parent 304dba8a0f
commit 61d816352c
1 changed files with 1 additions and 1 deletions

View File

@ -67,7 +67,7 @@ let add_opt add_fn bv = function
None -> ()
| Some x -> add_fn bv x
let add_type_declaration bv td = (* GAH: no idea if this is correct *)
let add_type_declaration bv td =
List.iter
(fun (ty1, ty2, _) -> add_type bv ty1; add_type bv ty2)
td.ptype_cstrs;