Alexander_KS/SAPFOR
4
2
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fdvm updated

Browse Source
This commit is contained in:
ALEXks
2025-03-06 20:07:20 +03:00
parent 0b594f7c2a
commit ab294fbeb2
16 changed files with 4417 additions and 4424 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
dvm/fdvm/trunk/parser/fspf.gram
View File

@@ -33,7 +33,15 @@ characteristic_list: characteristic
;
characteristic: needkeyword SPF_CODE_COVERAGE
{ $$ = make_llnd(fi,SPF_CODE_COVERAGE_OP,LLNULL,LLNULL,SMNULL);}
{ $$ = make_llnd(fi,SPF_CODE_COVERAGE_OP,LLNULL,LLNULL,SMNULL);}
| needkeyword SPF_WEIGHT LEFTPAR DP_CONSTANT RIGHTPAR
{
PTR_LLND w;
w = make_llnd(fi,DOUBLE_VAL, LLNULL, LLNULL, SMNULL);
w->entry.string_val = copys(yytext);
w->type = global_double;
$$ = make_llnd(fi,SPF_WEIGHT_OP,w,LLNULL,SMNULL);
}
;
opt_clause_apply_fragment:

8764
dvm/fdvm/trunk/parser/gram1.tab.c
View File

File diff suppressed because it is too large Load Diff

9
dvm/fdvm/trunk/parser/gram1.tab.h
View File

@@ -401,8 +401,9 @@ extern int yydebug;
SPF_MERGE = 354,
SPF_COVER = 355,
SPF_PROCESS_PRIVATE = 356,
BINARY_OP = 359,
UNARY_OP = 360
SPF_WEIGHT = 357,
BINARY_OP = 360,
UNARY_OP = 361
};
#endif
@@ -411,7 +412,7 @@ extern int yydebug;
union YYSTYPE
{
#line 439 "gram1.y" /* yacc.c:1909 */
#line 440 "gram1.y" /* yacc.c:1909 */
int token;
char charv;
@@ -423,7 +424,7 @@ union YYSTYPE
PTR_HASH hash_entry;
PTR_LABEL label;
#line 427 "gram1.tab.h" /* yacc.c:1909 */
#line 428 "gram1.tab.h" /* yacc.c:1909 */
};
typedef union YYSTYPE YYSTYPE;

11
dvm/fdvm/trunk/parser/gram1.y
View File

@@ -354,6 +354,7 @@
%token SPF_MERGE 354
%token SPF_COVER 355
%token SPF_PROCESS_PRIVATE 356
%token SPF_WEIGHT 357
%{
#include <string.h>
@@ -8029,7 +8030,15 @@ characteristic_list: characteristic
;
characteristic: needkeyword SPF_CODE_COVERAGE
{ $$ = make_llnd(fi,SPF_CODE_COVERAGE_OP,LLNULL,LLNULL,SMNULL);}
{ $$ = make_llnd(fi,SPF_CODE_COVERAGE_OP,LLNULL,LLNULL,SMNULL);}
| needkeyword SPF_WEIGHT LEFTPAR DP_CONSTANT RIGHTPAR
{
PTR_LLND w;
w = make_llnd(fi,DOUBLE_VAL, LLNULL, LLNULL, SMNULL);
w->entry.string_val = copys(yytext);
w->type = global_double;
$$ = make_llnd(fi,SPF_WEIGHT_OP,w,LLNULL,SMNULL);
}
;
opt_clause_apply_fragment:

1
dvm/fdvm/trunk/parser/lexfdvm.c
View File

@@ -610,6 +610,7 @@ struct Keylist keys[] = {
{"varlist", VARLIST},
{"virtual", VIRTUAL},
{"wait", WAIT},
{"weight", SPF_WEIGHT},
{"wgt_block", WGT_BLOCK},
{"where", WHERE},
{"while", WHILE},

1
dvm/fdvm/trunk/parser/tag
View File

@@ -624,4 +624,5 @@
#define SPF_COVER_OP 972 /* SAPFOR */
#define SPF_MERGE_OP 973 /* SAPFOR */
#define SPF_PROCESS_PRIVATE_OP 974 /* SAPFOR */
#define SPF_WEIGHT_OP 975 /* SAPFOR */

3
dvm/fdvm/trunk/parser/tag.h
View File

@@ -239,7 +239,7 @@ script using "tag". Run make tag.h to regenerate this file */
tag [ DVM_TEMPLATE_CREATE_DIR ] = "DVM_TEMPLATE_CREATE_DIR";
tag [ DVM_TEMPLATE_DELETE_DIR ] = "DVM_TEMPLATE_DELETE_DIR";
tag [ PRIVATE_AR_DECL ] = "PRIVATE_AR_DECL";
/***************** variant tags for low level nodes ********************/
tag [ INT_VAL ] = "INT_VAL";
@@ -626,4 +626,5 @@ script using "tag". Run make tag.h to regenerate this file */
tag [ SPF_COVER_OP ] = "SPF_COVER_OP";
tag [ SPF_MERGE_OP ] = "SPF_MERGE_OP";
tag [ SPF_PROCESS_PRIVATE_OP ] = "SPF_PROCESS_PRIVATE_OP";
tag [ SPF_WEIGHT_OP ] = "SPF_WEIGHT_OP";

1
dvm/fdvm/trunk/parser/tokdefs.h
View File

@@ -354,3 +354,4 @@
#define SPF_MERGE 354
#define SPF_COVER 355
#define SPF_PROCESS_PRIVATE 356
#define SPF_WEIGHT 357

1
dvm/fdvm/trunk/parser/tokens
View File

@@ -354,3 +354,4 @@ SPF_UNROLL
SPF_MERGE
SPF_COVER
SPF_PROCESS_PRIVATE
SPF_WEIGHT