equal
deleted
inserted
replaced
17 val xthm: (Facts.ref * Attrib.src list) parser |
17 val xthm: (Facts.ref * Attrib.src list) parser |
18 val xthms1: (Facts.ref * Attrib.src list) list parser |
18 val xthms1: (Facts.ref * Attrib.src list) list parser |
19 val name_facts: (Attrib.binding * (Facts.ref * Attrib.src list) list) list parser |
19 val name_facts: (Attrib.binding * (Facts.ref * Attrib.src list) list) list parser |
20 val constdecl: (binding * string option * mixfix) parser |
20 val constdecl: (binding * string option * mixfix) parser |
21 val constdef: ((binding * string option * mixfix) option * (Attrib.binding * string)) parser |
21 val constdef: ((binding * string option * mixfix) option * (Attrib.binding * string)) parser |
|
22 val includes: (xstring * Position.T) list parser |
22 val locale_mixfix: mixfix parser |
23 val locale_mixfix: mixfix parser |
23 val locale_fixes: (binding * string option * mixfix) list parser |
24 val locale_fixes: (binding * string option * mixfix) list parser |
24 val locale_insts: (string option list * (Attrib.binding * string) list) parser |
25 val locale_insts: (string option list * (Attrib.binding * string) list) parser |
25 val class_expression: string list parser |
26 val class_expression: string list parser |
26 val locale_expression: bool -> Expression.expression parser |
27 val locale_expression: bool -> Expression.expression parser |
76 |
77 |
77 val constdef = Scan.option constdecl -- (opt_thm_name ":" -- Parse.prop); |
78 val constdef = Scan.option constdecl -- (opt_thm_name ":" -- Parse.prop); |
78 |
79 |
79 |
80 |
80 (* locale and context elements *) |
81 (* locale and context elements *) |
|
82 |
|
83 val includes = Parse.$$$ "includes" |-- Parse.!!! (Scan.repeat1 (Parse.position Parse.xname)); |
81 |
84 |
82 val locale_mixfix = |
85 val locale_mixfix = |
83 Parse.$$$ "(" -- Parse.$$$ "structure" -- Parse.!!! (Parse.$$$ ")") >> K Structure || |
86 Parse.$$$ "(" -- Parse.$$$ "structure" -- Parse.!!! (Parse.$$$ ")") >> K Structure || |
84 Parse.mixfix; |
87 Parse.mixfix; |
85 |
88 |