forgot this file in last commit
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/gadts@10735 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02master
parent
304dba8a0f
commit
61d816352c
|
@ -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;
|
||||
|
|
Loading…
Reference in New Issue