equal
deleted
inserted
replaced
170 val option = |
170 val option = |
171 name ~ opt(keyword("=") ~! name ^^ { case _ ~ x => x }) ^^ { case x ~ y => (x, y) } |
171 name ~ opt(keyword("=") ~! name ^^ { case _ ~ x => x }) ^^ { case x ~ y => (x, y) } |
172 val options = keyword("[") ~> repsep(option, keyword(",")) <~ keyword("]") |
172 val options = keyword("[") ~> repsep(option, keyword(",")) <~ keyword("]") |
173 |
173 |
174 val theories = |
174 val theories = |
175 keyword(THEORIES) ~! ((options | success(Nil)) ~ rep1(theory_name)) ^^ |
175 keyword(THEORIES) ~! ((options | success(Nil)) ~ rep(theory_name)) ^^ |
176 { case _ ~ (x ~ y) => (x, y) } |
176 { case _ ~ (x ~ y) => (x, y) } |
177 |
177 |
178 ((command(SESSION) ~! session_name) ^^ { case _ ~ x => x }) ~ |
178 ((command(SESSION) ~! session_name) ^^ { case _ ~ x => x }) ~ |
179 (keyword("(") ~! (rep1(name) <~ keyword(")")) ^^ { case _ ~ x => x } | success(Nil)) ~ |
179 (keyword("(") ~! (rep1(name) <~ keyword(")")) ^^ { case _ ~ x => x } | success(Nil)) ~ |
180 (keyword(IN) ~! path ^^ { case _ ~ x => x } | success(".")) ~ |
180 (keyword(IN) ~! path ^^ { case _ ~ x => x } | success(".")) ~ |