We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
2 parents 0041aaa + e7fb3dc commit 5544fb9Copy full SHA for 5544fb9
safechecker-plugin/src/g_metarocq_safechecker.mlg
@@ -75,7 +75,7 @@ let retypecheck_term_dependencies ~opaque_access env gr =
75
in
76
let st = Conv_oracle.get_transp_state (Environ.oracle (Global.env())) in
77
let deps = Assumptions.assumptions ~add_opaque:true ~add_transparent:true opaque_access
78
- st gr (fst (UnivGen.fresh_global_instance env gr)) in
+ st [gr] in
79
let process_object k _ty =
80
let open Printer in
81
match k with
0 commit comments