equal
deleted
inserted
replaced
145 in |
145 in |
146 thy |
146 thy |
147 |> Sign.local_path |
147 |> Sign.local_path |
148 |> Sign.map_naming (Name_Space.set_theory_name name) |
148 |> Sign.map_naming (Name_Space.set_theory_name name) |
149 |> apply_wrappers wrappers |
149 |> apply_wrappers wrappers |
150 |> tap (Syntax.join_syntax o Sign.syn_of) |
150 |> tap (Syntax.force_syntax o Sign.syn_of) |
151 end; |
151 end; |
152 |
152 |
153 fun end_theory thy = |
153 fun end_theory thy = |
154 thy |> apply_wrappers (end_wrappers thy) |> Context.finish_thy; |
154 thy |> apply_wrappers (end_wrappers thy) |> Context.finish_thy; |
155 |
155 |