1

我在一个实用程序中解析 CoCo/R 语法以自动化 CoCo -> ANTLR 翻译。核心的 ANTLR 语法是：

rule '=' expression '.' ;

expression
     : term ('|' term)*
         -> ^( OR_EXPR term term* )
     ;
term
     : (factor (factor)*)? ;

factor
     : symbol
     | '(' expression ')'
         -> ^( GROUPED_EXPR expression )
     | '[' expression']'
         -> ^( OPTIONAL_EXPR expression)
     | '{' expression '}'
         -> ^( SEQUENCE_EXPR expression)
     ;

symbol
     : IF_ACTION
     | ID (ATTRIBUTES)?
     | STRINGLITERAL
     ;

我的问题是这样的结构：

CS = { ExternAliasDirective }
         { UsingDirective }
         EOF .

CS 会产生一个带有 OR_EXPR 节点的 AST，尽管没有“|” 人物实际出现。我确定这是由于表达式的定义，但我看不到任何其他方式来编写规则。

我确实对此进行了实验以解决歧义。

// explicitly test for the presence of an '|' character
expression
@init { bool ored = false; }
     : term {ored = (input.LT(1).Type == OR); } (OR term)*
         ->  {ored}? ^(OR_EXPR term term*)
         ->            ^(LIST term term*)

它有效，但黑客强化了我的信念，即一些根本性的问题是错误的。

非常感谢任何提示。

4

2 回答 2

4

你的规则：

expression
  : term ('|' term)*
      -> ^( OR_EXPR term term* )
  ;

总是导致重写规则创建一个根类型为 的树OR_EXPR。您可以像这样创建“子重写规则”：

expression
  :  (term -> REWRITE_RULE_X) ('|' term -> ^(REWRITE_RULE_Y))*
  ;

为了解决语法中的歧义，最简单的方法是启用全局回溯，这可以在options { ... }语法部分中完成。

快速演示：

grammar CocoR;

options {
  output=AST;
  backtrack=true;
}

tokens {
  RULE;
  GROUP;
  SEQUENCE;
  OPTIONAL;
  OR;
  ATOMS;
}

parse
  :  rule EOF -> rule
  ;

rule
  :  ID '=' expr* '.' -> ^(RULE ID expr*)
  ;

expr
  :  (a=atoms -> $a) ('|' b=atoms -> ^(OR $expr $b))*
  ;

atoms
  :  atom+ -> ^(ATOMS atom+)
  ;

atom
  :  ID
  |  '(' expr ')' -> ^(GROUP expr)
  |  '{' expr '}' -> ^(SEQUENCE expr)
  |  '[' expr ']' -> ^(OPTIONAL expr)
  ;

ID
  :  ('a'..'z' | 'A'..'Z') ('a'..'z' | 'A'..'Z' | '0'..'9')*
  ;

Space
  :  (' ' | '\t' | '\r' | '\n') {skip();}
  ;

输入：

CS = { ExternAliasDirective }
     { UsingDirective }
     EOF .

产生 AST：

在此处输入图像描述

和输入：

foo = a | b ({c} | d [e f]) .

产生：

在此处输入图像描述

测试这个的类：

import org.antlr.runtime.*;
import org.antlr.runtime.tree.*;
import org.antlr.stringtemplate.*;

public class Main {
    public static void main(String[] args) throws Exception {
        /*
        String source = 
                "CS = { ExternAliasDirective } \n" +
                "{ UsingDirective }            \n" + 
                "EOF .                           ";
        */
        String source = "foo = a | b ({c} | d [e f]) .";
        ANTLRStringStream in = new ANTLRStringStream(source);
        CocoRLexer lexer = new CocoRLexer(in);
        CommonTokenStream tokens = new CommonTokenStream(lexer);
        CocoRParser parser = new CocoRParser(tokens);
        CocoRParser.parse_return returnValue = parser.parse();
        CommonTree tree = (CommonTree)returnValue.getTree();
        DOTTreeGenerator gen = new DOTTreeGenerator();
        StringTemplate st = gen.toDOT(tree);
        System.out.println(st);
    }
}

并使用此类产生的输出，我使用以下网站创建 AST 图像： http: //graph.gafol.net/

高温高压

编辑

要考虑OR表达式中的 epsilon（空字符串），您可以尝试以下操作（快速测试！）：

expr
  :  (a=atoms -> $a) ( ( '|' b=atoms -> ^(OR $expr $b)
                       | '|'         -> ^(OR $expr NOTHING)
                       )
                     )*
  ;

解析源：

foo = a | b | .

进入以下AST：

在此处输入图像描述

于 2011-03-02T18:42:01.673 回答
0

for 的产生expression式明确表示它只能返回一个OR_EXPR节点。您可以尝试以下方法：

expression
     : 
     term
     |
     term ('|' term)+
         -> ^( OR_EXPR term term* )
     ;

再往下，你可以使用：

term
     : factor*;
于 2011-03-02T17:40:40.513 回答