changeset 57858 | 39d9c7f175e0 |
parent 56438 | 7f6b2634d853 |
child 57927 | f14c1248d064 |
--- a/src/Pure/Isar/attrib.ML Mon Aug 04 19:47:25 2014 +0200 +++ b/src/Pure/Isar/attrib.ML Tue Aug 05 11:06:36 2014 +0200 @@ -292,7 +292,7 @@ in fun partial_evaluation ctxt facts = - (facts, Context.Proof ctxt) |-> + (facts, Context.Proof (Context_Position.not_really ctxt)) |-> fold_map (fn ((b, more_atts), fact) => fn context => let val (fact', (decls, context')) =