author | wenzelm |
Fri, 09 Aug 2019 20:33:05 +0200 | |
changeset 70495 | aaafff824632 |
parent 70494 | 41108e3e9ca5 |
child 70496 | be29e6fe82d8 |
--- a/src/Pure/proofterm.ML Fri Aug 09 17:14:49 2019 +0200 +++ b/src/Pure/proofterm.ML Fri Aug 09 20:33:05 2019 +0200 @@ -1794,7 +1794,7 @@ | mk_cnstrts env _ _ vTs (prf as Oracle (_, prop, opTs)) = mk_cnstrts_atom env vTs prop opTs prf | mk_cnstrts env _ _ vTs (Hyp t) = (t, Hyp t, [], env, vTs) - | mk_cnstrts _ _ _ _ _ = error "reconstruct_proof: minimal proof object" + | mk_cnstrts _ _ _ _ MinProof = error "reconstruct_proof: minimal proof object" in mk_cnstrts env [] [] Symtab.empty cprf end;