Files
rocm-systems/source/lib/rocprofiler-sdk/counters/parser/parser.y
T
Jonathan R. Madsen 4d5b71b0e7 Update logging (#838)
* Update logging

* Remove unused function

* Fix lib/rocprofiler-sdk/hsa/pc_sampling.cpp logging compilation

* Fix logging FLAGS_vmodule string leak and numerical log level

* Update logging

* Update glog submodule

* Leak fixes

* format
2024-05-20 15:38:18 -05:00

102 строки
3.2 KiB
Plaintext

%parse-param {RawAST** result}
%code requires {
#include "raw_ast.hpp"
using namespace rocprofiler::counters;
#define YYDEBUG 1
}
%{
#include <stdexcept>
#include <stdio.h>
#include <string>
#include "raw_ast.hpp"
int yyparse(rocprofiler::counters::RawAST** result);
int yylex(void);
void yyerror(rocprofiler::counters::RawAST**, const char *s) { ROCP_ERROR << s; }
%}
/* declare tokens */
%token ADD SUB MUL DIV ABS EQUALS
%token OP CP O_SQ C_SQ COLON
%token EOL
/* set associativity rules for operand tokens */
%right EQUALS
%left ADD SUB
%left MUL DIV
%nonassoc '|' UMINUS CM
/*declare data types*/
%union {
RawAST* a; /* For ast node */
LinkedList* ll; /* For linked list node */
int64_t d;
char* s;
}
%token NUMBER RANGE /* set data type for numbers */
%token NAME /* set data type for variables and user-defined functions */
%token REDUCE SELECT /* set data type for special functions */
%type <a> exp /* set data type for expressions */
%type <s> NAME
%type <d> NUMBER
%type <ll> reduce_dim_args select_dim_args
%nonassoc LOWER_THAN_ELSE
%nonassoc ELSE
// %token <pos_int> POS_INTEGER
%%
top:
exp { *result = $1;};
exp: NUMBER { $$ = new RawAST(NUMBER_NODE, $1); }
| exp ADD exp { $$ = new RawAST(ADDITION_NODE, {$1, $3}); }
| exp SUB exp { $$ = new RawAST(SUBTRACTION_NODE, {$1, $3}); }
| exp MUL exp { $$ = new RawAST(MULTIPLY_NODE, {$1, $3}); }
| exp DIV exp { $$ = new RawAST(DIVIDE_NODE, {$1, $3}); }
| OP exp CP { $$ = $2; }
| NAME { $$ = new RawAST(REFERENCE_NODE, $1);
free($1);
}
| REDUCE OP exp CM NAME CP {
$$ = new RawAST(REDUCE_NODE, $3, $5, NULL);
free($5);
}
| REDUCE OP exp CM NAME CM O_SQ reduce_dim_args C_SQ CP {
$$ = new RawAST(REDUCE_NODE, $3, $5, $8);
free($5);
}
| SELECT OP exp CM O_SQ select_dim_args C_SQ CP {
$$ = new RawAST(SELECT_NODE, $3, $6);
}
;
reduce_dim_args: NAME { $$ = new LinkedList($1, NULL);
free($1);
}
| NAME CM reduce_dim_args { $$ = new LinkedList($1, $3);
free($1);
}
;
select_dim_args: NAME EQUALS NUMBER { $$ = new LinkedList($1, $3, NULL);
free($1);
}
| NAME EQUALS NUMBER CM select_dim_args { $$ = new LinkedList($1, $3, $5);
free($1);
}
;
%%