|
@@ -509,7 +509,7 @@ and parse_fun_param = parser
|
|
|
| [< name, _ = any_ident; t = parse_type_opt; c = parse_fun_param_value >] -> (name,false,t,c)
|
|
|
|
|
|
and parse_fun_param_value = parser
|
|
|
- | [< '(Binop OpAssign,_); e = expr >] -> Some e
|
|
|
+ | [< '(Binop OpAssign,_); e = toplevel_expr >] -> Some e
|
|
|
| [< >] -> None
|
|
|
|
|
|
and parse_fun_param_type = parser
|