Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
8 changes: 5 additions & 3 deletions libgixpp/gix_esql_parser.yy
Original file line number Diff line number Diff line change
Expand Up @@ -115,7 +115,8 @@ static std::string to_std_string(connect_to_info_t *i) { if (i) { char buffer [3
%token LINKAGEEND
%token LOCALSTORAGEBEGIN "Begin of LOCAL-STORAGE SECTION"
%token LOCALSTORAGEEND "End of LOCAL-STORAGE SECTION"
%token FD
%token FD "FILE description (FD)"
%token SD "SORT description (SD)"
%token FILEBEGIN "Begin of FILE SECTION"
%token FILEEND "End of FILE SECTION"
%token PROCEDURE_DIVISION "PROCEDURE DIVISION"
Expand Down Expand Up @@ -837,14 +838,15 @@ FILEEND {
}
;

fd_def:
file_def:
FD token_list PERIOD {}
|SD token_list PERIOD {}
;


sqlvariantstate_list:
%empty
|sqlvariantstate_list fd_def
|sqlvariantstate_list file_def
|sqlvariantstate_list incfile
|sqlvariantstate_list includesql
|sqlvariantstate_list declaresql
Expand Down
4 changes: 2 additions & 2 deletions libgixpp/gix_esql_scanner.ll
Original file line number Diff line number Diff line change
Expand Up @@ -1245,7 +1245,7 @@ SUBSYSTEM "SQL"|"CICS"|"DLI"
return yy::gix_esql_parser::make_WORKINGEND(loc);
}

"FD" {
("FD"|"SD") {
if (driver->data_division_section == DD_SECTION_FS) {
__yy_push_state(FD_STATE);
}
Expand Down Expand Up @@ -1605,4 +1605,4 @@ yy::gix_esql_parser::symbol_type __MAKE_TOKEN(char *s, yy::location loc)
subquery_level -= sq_sub;
}
return yy::gix_esql_parser::make_TOKEN(s, loc);
}
}