zmajeed / ebnfparser Goto Github PK

<ampersand> ::=
    &

<binary digit> ::=
    0
  | 1

<program activity>
  ::=
    <session activity>
  | <transaction activity>

//
// EBNF to be viewd at
//    (IPV6) https://www.bottlecaps.de/rr/ui
//    (IPV4) https://rr.red-dove.com/ui
//
// Copy and paste this at one of the urls shown above in the 'Edit Grammar' tab
// then click the 'View Diagram' tab.
//
//From: https://github.com/zmajeed/ebnfparser/blob/main/docs/gqlgrammar.quotedliterals.txt
/************************************************************************************************
This file is a "digital artifact" that contains the grammar specified by "ISO_IEC" 39075.

This grammar may be used by implementers of GQL-implementations when generating parsers for the
"GQL" language.
************************************************************************************************/

GQL_program ::=
    program_activity ( session_close_command )?
  | session_close_command
...

auto fname = "gqlgrammar.quotedliterals.txt";
auto txt = readfile(fname);

auto fixOpt = function(txt){return txt.gsub("%[ ([^%[%]]+) %]", "( %1 )?");}
auto fixGroup = function(txt){return txt.gsub("{ ([^{}]+) }", "( %1 )");}

//txt = txt.replace("> ::=", "> :");
txt = txt.gsub("<(%w[%w- ].-)>", function(m){ return m.gsub("[- ]", "_");});
auto txt2 = fixOpt(txt);
while(txt != txt2) {
	txt = txt2;
	txt2 = fixOpt(txt);
}

txt2 = fixGroup(txt);
while(txt != txt2) {
	txt = txt2;
	txt2 = fixGroup(txt);
}

txt = txt.replace("!!", "//");
txt = txt.replace("...", "+");
txt = txt.replace("\"\\\"\"", "'\"'");
txt = txt.gsub("(%w)/(%w)", "%1_%2");
//txt = txt.gsub("0[xob]", "\"%1\"");
txt = txt.gsub("(%u[%u_]+)(%s)", "\"%1\"%2");
txt = txt.gsub("(%u+%d+)(%s)", "\"%1\"%2"); //INT8, FLOAT32, ...
//txt = txt.replace("\n\n", "\n  ;\n\n");

print(txt);

<separator> ::=
    { <comment>
  | <whitespace> }...