Question

我正在尝试编写一个解析器，它应该将Prolog列表（例如[1,2,3,4]）解析到相应的Scala列表中。我使用Scalas解析组合器来编写解析器。

到目前为止，我的解析器看起来像这样：

class PListParser extends JavaTokenParsers{
    def list:Parser[List[Any]] = "[" ~> listArgs <~ "]"
    def listArgs:Parser[List[Any]] = list | repsep(args, ",")
    def args:Parser[String] = "(.)*".r
}

是否有可能将前两个解析器的类型参数转换为更具体的？类似于任意维度但具有相同底层类型的嵌套列表的一般参数。

Answer 1

我认为它应该是树，这是嵌套到任意深度的列表的正确结构

sealed trait Tree[A]
case class Leaf[A](value: A) extends Tree[A] {
  override def toString: String = value.toString
}
case class Node[A](items: List[Tree[A]]) extends Tree[A] {
  override def toString: String = "Node(" + items.mkString(", ") + ")"
}

（根据需要使用toString，但我认为默认版本太冗长了）

然后，修改你的语法（+解析方法，只需在REPL上轻松测试）

object PrologListParser extends JavaTokenParsers{
    def list:Parser[Tree[String]] = "[" ~> listArgs <~ "]"
    def listArgs:Parser[Tree[String]] = repsep(list | args, ",") ^^ {Node(_)}
    def args:Parser[Tree[String]] = """([^,\[\]])*""".r ^^ {Leaf(_)}
    def parse(s: String): ParseResult[Tree[String]] = parse(list, s)
}


PrologListParser.parse("[a, b, [c, [d, e], f, [g], h], [i, j], k]")

res0：PrologList.ParseResult [Tree [String]] = [1.42]解析：节点（a，b，节点（c，节点（d，e），f，节点（g），h），节点（i ，j），k）

Answer 2

（未经测试）

sealed trait PrologTerm

case class PInt(i: Integer) extends PrologTerm { 
  override def toString = i.toString 
}
case class PAtom(s: String) extends PrologTerm { 
  override def toString = s.toString 
}
case class PComplex(f: PAtom, args: List[PrologTerm]) extends PrologTerm {
  override def toString = f.toString+"("+args.mkString(", ")+")"
}
case class PList(items: List[PrologTerm]) extends PrologTerm {
  override def toString = "["+items.mkString(", ")+"]"
}

object PrologListParser extends JavaTokenParsers {
  def term : Parser[PrologTerm] = int | complex | atom | list
  def int : Parser[PInt] = wholeNumber ^^ {s => PInt(s.toInt)}
  def complex : Parser[PComplex] = 
    (atom ~ ("(" ~> repsep(term, ",") <~ ")")) ^^ {case f ~ args => PAtom(f, args)}
  def atom : Parser[PAtom] = "[a-z][a-zA-Z_]*".r ^^ {PAtom(_)}
  def list : Parser[PList] = ("[" ~> repsep(term, ",") <~ "]") ^^ {PList(_)}
}

嵌套列表的常规类型参数

2 个答案: