diff options
| author | Pierre-Marie Pédrot | 2020-05-08 12:25:16 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2020-05-08 12:25:16 +0200 |
| commit | 8c13e5b6fe8ddb6bb78bfbe47a9ec190ec377872 (patch) | |
| tree | 1960c8e413a219e1b002ce963f3a40bae57e62d1 /plugins | |
| parent | e4bfbdfc4b4944d6e6d702eb732bce24f962e67f (diff) | |
| parent | d14a43f7acb982b054185545b5c02820244fc240 (diff) | |
Merge PR #12121: Fixes #11903 and warns about non truly-recursive (co)fixpoints
Ack-by: Zimmi48
Reviewed-by: ppedrot
Diffstat (limited to 'plugins')
| -rw-r--r-- | plugins/funind/gen_principle.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/funind/gen_principle.ml b/plugins/funind/gen_principle.ml index 07f578d2a8..c53dcc7edd 100644 --- a/plugins/funind/gen_principle.ml +++ b/plugins/funind/gen_principle.ml @@ -159,7 +159,7 @@ let recompute_binder_list fixpoint_exprl = fixpoint_exprl in let (_, _, _, typel), _, ctx, _ = - ComFixpoint.interp_fixpoint ~cofix:false fixl + ComFixpoint.interp_fixpoint ~check_recursivity:false ~cofix:false fixl in let constr_expr_typel = with_full_print |