changeset 74232 | 1091880266e5 |
parent 74200 | 17090e27aae9 |
child 74248 | ea9f2cb22e50 |
--- a/src/Pure/goal.ML Sat Sep 04 20:01:43 2021 +0200 +++ b/src/Pure/goal.ML Sat Sep 04 21:25:08 2021 +0200 @@ -120,7 +120,7 @@ val fixes = map (Thm.cterm_of ctxt) xs; val tfrees = fold Term.add_tfrees (prop :: As) []; - val tfrees_set = fold (Symtab.insert_set o #1) tfrees Symtab.empty; + val tfrees_set = Symtab.build (fold (Symtab.insert_set o #1) tfrees); val instT = map (fn (a, S) => (((a, 0), S), Thm.ctyp_of ctxt (TFree (a, S)))) tfrees; val global_prop =