scala dsl 解析器：rep、opt 和正则表达式

Question

学习如何使用 scala DSL:s 和相当多的示例效果很好。 然而，我陷入了一件非常简单的事情：

我正在解析一种语言，该语言在行尾之前都有“--”作为注释。

单行使用以下命令可以正常工作：

    def comment: Parser[Comment] = """--.*$""".r ^^ { case c => Comment(c) }

但是当连接多行时，我会收到错误。

我尝试了几种变体，但以下感觉很简单：

    def commentblock: Parser[List[Comment]] = opt(rep(comment)) ^^ {
    case Some(x) => { x }
    case None => { List() }
}

当使用两个连续的注释行运行测试时，我收到错误。

测试用例：

--Test Comment
--Test Line 2

错误：

java.lang.AssertionError: Parse error: [1.1] failure: string matching regex `--.*$' expected but `-' found

关于如何解决此问题有什么想法吗？

下面的完整代码：

    import scala.util.parsing.combinator._

abstract class A
case class Comment(comment:String) extends A

object TstParser extends JavaTokenParsers {
    override def skipWhitespace = true;

    def comment: Parser[Comment] = """--.*$""".r ^^ { case c => Comment(c) }

    def commentblock: Parser[List[Comment]] = opt(rep(comment)) ^^ {
        case Some(x) => { x }
        case None => { List() }
    }

    def parse(text : String) = {
        parseAll(commentblock, text)
    }
}

class TestParser {
    import org.junit._, Assert._

    @Test def testComment() = {
        val y = Asn1Parser.parseAll(Asn1Parser.comment, "--Test Comment")
        assertTrue("Parse error: " + y, y.successful)
        val y2 = Asn1Parser.parseAll(Asn1Parser.commentblock, 
"""--Test Comment
--Test Line 2
""")
        assertTrue("Parse error: " + y2, y2.successful)
    }

}

Answer 1

不熟悉 Scala，但在 Java 中，正则表达式 --.*$ 匹配：

• --  两个连字符；
• .*  后跟除换行符之外的零个或多个字符；
• $    后面是输入的结尾（不一定是行的结尾！）。

因此，您可以尝试：

def comment: Parser[Comment] = """--.*""".r ^^ { case c => Comment(c) }

甚至：

def comment: Parser[Comment] = """--[^\r\n]*""".r ^^ { case c => Comment(c) }

请注意，在这两种情况下，换行符都会保留在原处，并且不会被您的注释“规则”“消耗”。