src/Pure/Isar/local_theory.ML
changeset 25289 3d332d8a827c
parent 25120 23fbc38f6432
child 25381 c100bf5bd6b8
equal deleted inserted replaced
25288:6e0c8dd213df 25289:3d332d8a827c
    39   val target_morphism: local_theory -> morphism
    39   val target_morphism: local_theory -> morphism
    40   val target_naming: local_theory -> NameSpace.naming
    40   val target_naming: local_theory -> NameSpace.naming
    41   val target_name: local_theory -> bstring -> string
    41   val target_name: local_theory -> bstring -> string
    42   val init: string -> operations -> Proof.context -> local_theory
    42   val init: string -> operations -> Proof.context -> local_theory
    43   val restore: local_theory -> local_theory
    43   val restore: local_theory -> local_theory
    44   val reinit: local_theory -> theory -> local_theory
    44   val reinit: local_theory -> local_theory
    45   val exit: local_theory -> Proof.context
    45   val exit: local_theory -> Proof.context
    46 end;
    46 end;
    47 
    47 
    48 structure LocalTheory: LOCAL_THEORY =
    48 structure LocalTheory: LOCAL_THEORY =
    49 struct
    49 struct
    65     local_theory -> (bstring * thm list) list * local_theory,
    65     local_theory -> (bstring * thm list) list * local_theory,
    66   type_syntax: declaration -> local_theory -> local_theory,
    66   type_syntax: declaration -> local_theory -> local_theory,
    67   term_syntax: declaration -> local_theory -> local_theory,
    67   term_syntax: declaration -> local_theory -> local_theory,
    68   declaration: declaration -> local_theory -> local_theory,
    68   declaration: declaration -> local_theory -> local_theory,
    69   target_naming: local_theory -> NameSpace.naming,
    69   target_naming: local_theory -> NameSpace.naming,
    70   reinit: local_theory -> theory -> local_theory,
    70   reinit: local_theory -> local_theory,
    71   exit: local_theory -> Proof.context};
    71   exit: local_theory -> Proof.context};
    72 
    72 
    73 datatype lthy = LThy of
    73 datatype lthy = LThy of
    74  {theory_prefix: string,
    74  {theory_prefix: string,
    75   operations: operations,
    75   operations: operations,