src/Pure/Isar/expression.ML
changeset 29217 a1c992fb3184
parent 29215 f98862eb0591
child 29221 918687637307
child 29239 0a64c3418347
child 29247 95d3a82857e5
equal deleted inserted replaced
29216:528e68bea04d 29217:a1c992fb3184
   484       prep false true context raw_import raw_elems [];
   484       prep false true context raw_import raw_elems [];
   485     (* Declare parameters and imported facts *)
   485     (* Declare parameters and imported facts *)
   486     val context' = context |>
   486     val context' = context |>
   487       ProofContext.add_fixes_i fixed |> snd |>
   487       ProofContext.add_fixes_i fixed |> snd |>
   488       fold NewLocale.activate_local_facts deps;
   488       fold NewLocale.activate_local_facts deps;
   489     val ((elems', _), _) = activate elems (ProofContext.set_stmt true context');
   489     val (elems', _) = activate elems (ProofContext.set_stmt true context');
   490   in ((fixed, deps, elems'), (parms, spec, defs)) end;
   490   in ((fixed, deps, elems'), (parms, spec, defs)) end;
   491 
   491 
   492 in
   492 in
   493 
   493 
   494 fun read_declaration x = prep_declaration read_full_context_statement Element.activate x;
   494 fun read_declaration x = prep_declaration read_full_context_statement Element.activate x;