changeset 18837 | 577438cc653e |
parent 18169 | 45def66f86cb |
child 18870 | 020e242c02a0 |
--- a/src/Pure/ROOT.ML Sun Jan 29 19:23:43 2006 +0100 +++ b/src/Pure/ROOT.ML Sun Jan 29 19:23:44 2006 +0100 @@ -90,6 +90,10 @@ setmp proofs 1 use "proof_general.ML"; use_thy "Pure"; structure Pure = struct val thy = theory "Pure" end; + +Context.add_setup + (Theory.del_modesyntax Syntax.default_mode Syntax.appl_syntax #> + Theory.add_syntax Syntax.applC_syntax); use_thy "CPure"; structure CPure = struct val thy = theory "CPure" end; (*final ML setup*)