]> ocean-lang.org Git - ocean/blobdiff - csrc/oceani.mdc
parsergen: remove line_like information.
[ocean] / csrc / oceani.mdc
index ab6abe91f67156e03a0e81926897d320e652b04a..0e6cebeb30b511853746129d4ebd3dcfa8522852 100644 (file)
@@ -151,8 +151,8 @@ structures can be used.
        ## core functions
 
        #include <getopt.h>
-       static char Usage[] = "Usage: oceani --trace --print --noexec --brackets"
-                             "--section=SectionName prog.ocn\n";
+       static char Usage[] =
+               "Usage: oceani --trace --print --noexec --brackets --section=SectionName prog.ocn\n";
        static const struct option long_options[] = {
                {"trace",     0, NULL, 't'},
                {"print",     0, NULL, 'p'},
@@ -2029,7 +2029,7 @@ function will be needed.
        $*fieldlist
        FieldBlock -> Open FieldList } ${ $0 = $<2; }$
                | Open SimpleFieldList } ${ $0 = $<2; }$
-               | : FieldList $$NEWLINE ${ $0 = $<2; }$
+               | : FieldList ${ $0 = $<2; }$
 
        FieldList -> FieldLines ${ $0 = $<1; }$
                | Newlines FieldLines ${ $0 = $<2; }$
@@ -3058,7 +3058,7 @@ is in-place.
        Block -> Open Statementlist Close ${ $0 = $<2; }$
                | Open SimpleStatements } ${ $0 = reorder_bilist($<2); }$
                | : SimpleStatements ${ $0 = reorder_bilist($<2); }$
-               | : Statementlist $$OUT ${ $0 = $<2; }$
+               | : Statementlist ${ $0 = $<2; }$
 
        Statementlist -> ComplexStatements ${ $0 = reorder_bilist($<1); }$
                | Newlines ComplexStatements ${ $0 = reorder_bilist($<2); }$
@@ -3563,7 +3563,7 @@ defined.
        case Xcond_statement: free_cond_statement(cast(cond_statement, e)); break;
 
 ###### ComplexStatement Grammar
-       | CondStatement $$NEWLINE ${ $0 = $<1; }$
+       | CondStatement ${ $0 = $<1; }$
 
 ###### Grammar
 
@@ -4011,7 +4011,7 @@ searching through for the Nth constant for decreasing N.
 
        DeclareConstant -> const Open ConstList Close
                | const Open SimpleConstList }
-               | const : ConstList $$NEWLINE
+               | const : ConstList
                | const SimpleConstList NEWLINE
 
        ConstList -> ConstLines