在Antr中为while循环和逻辑语句实现IF Else

时间:2020-04-14 19:32:54

标签: antlr

我是ANTLR的新手,我正在尝试实现if-else,for,while循环和逻辑符号,但是我不能这样做。谁能帮我这个?下面是我所做的。

grammar BasForCCAL;
@header {
package basforccal;
import java.util.HashMap;
import java.util.Scanner;
}
@lexer::header{
package basforccal;
}
@members{
        String programName;
        HashMap memory = new HashMap();
        public void checkName(String endName){
            if(!endName.equals(programName)){
            System.out.println("Wrong Program name in end of the program");
            }
        }
}
program : start programbody end;
start   :'PROGRAM' ID {programName = $ID.text ; System.out.println("Checking program :"+$ID.text);};
programbody
    :   (devcar|ID'='(expr|CHAR)| ctrlStmt)*;
devcar  :   initInt var1|
            intFloat var1|
            intChar var1 ;
initInt :   'INT'
     ;
intFloat
    :   'FLOAT'
    ;
intChar:     'CHAR';  
var1    : idname (',' var1)* ;
idname  :    ID {Integer v = (Integer)memory.get($ID.text);
                if(v!=null) 
                    {System.err.println("Error: "+$ID.text+" already defined line:"+$ID.getLine());}
                else
                    {memory.put($ID.text,new Integer('1'));}
                 }
    ;
expr 
    :   (multExpr |'('expr')')
    (   '+' multExpr 
    |   '-' multExpr 
    |   '/' multExpr 
    |   '*' multExpr
    )*
    ;

logiExpr
    :   expr relOpr expr;

relOpr 
    :      '<' 
    |       '>' 
    |       '<>' 
    |       '<=' 
    |       '>=' 
    ;
ctrlStmt
    :   'IF''('logiExpr')' 'THEN' (stat)+ 'ENDIF' 
    |       'WHILE''('logiExpr')' 'DO' (stat)+ 'ENDDO' 
    |       'FOR' ID '=' expr  'TO' expr 'LOOP' stat+ 'ENDLOOP';
stat
    :   ctrlStmt|multExpr
        |   ID '=' (expr|CHAR);
multExpr 
    :    ID  {
    Integer v = (Integer)memory.get($ID.text);
    if ( v!=null ){}
    else System.err.println("undefined variable "+$ID.text);
    }
    |    INT
    |    FLOAT
    ; 
end
    : 'END' ID '.' {checkName($ID.text);};

我的Java代码进行检查。

import org.antlr.runtime.ANTLRFileStream;
import org.antlr.runtime.CommonTokenStream;
import org.antlr.runtime.RecognitionException;
import java.io.IOException;
public class AntlrParser {
    public static  void main(String args[]) throws IOException, RecognitionException {
    basforccal.BasForCCALLexer lexer = new basforccal.BasForCCALLexer(new ANTLRFileStream(args[0]));
    CommonTokenStream token = new CommonTokenStream(lexer);
    basforccal.BasForCCALParser parser = new basforccal.BasForCCALParser(token);
    parser.program();
    }
}

下面是我要使用Java代码检查的文件(prog1.bfcc)中的程序。

PROGRAM TESTIF
FLOAT   A,B,C
A=1.0
C=1.0
IF(A>1.0)THEN
    B=2.0
ENDIF
IF(B*C<=10)THEN
    IF(A>0.0)THEN
       C=5.0
    ENDIF
ENDIF=
IF(3=4)THEN
    A=1.0
    B=2.0
    C=3.0
ENDIF
END TESTIF.

下面是我从JAVA检查该错误时遇到的错误。

Checking program :TESTIF
C:\Users\vivek\IdeaProjects\BasForCCal\prog1.bfcc line 16:4 mismatched input '=' expecting set null
Process finished with exit code 0

1 个答案:

答案 0 :(得分:0)

您输入的内容中有ENDIF=,看起来很可疑。它可能应该是:ENDIF,不带=。这就是错误消息试图告诉您的内容。

此外,您的输入中包含IF(3=4)THEN,但是您的relOpr不包含=运算符。您可能应该添加到它:

relOpr
    :       '='
    |       '<'
    |       '>'
    |       '<>'
    |       '<='
    |       '>='
    ;