| changeset 67649 | 1e1782c1aedf | 
| parent 67631 | b7d90c4a3897 | 
| child 69593 | 3dda49e08b9d | 
--- a/src/HOL/Tools/lin_arith.ML Sat Feb 17 20:03:37 2018 +0100 +++ b/src/HOL/Tools/lin_arith.ML Sun Feb 18 15:05:21 2018 +0100 @@ -87,7 +87,7 @@ fun get_splits ctxt = #splits (get_arith_data ctxt) - |> map (Thm.transfer (Proof_Context.theory_of ctxt)); + |> map (Thm.transfer' ctxt); fun add_split thm = Lin_Arith_Data.map (fn {splits, inj_consts, discrete} => {splits = update Thm.eq_thm_prop (Thm.trim_context thm) splits,