/[gnats]/gnats/gnats/fconfig.y
ViewVC logotype

Diff of /gnats/gnats/fconfig.y

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.35 by pdm, Sat Dec 8 20:21:20 2001 UTC revision 1.36 by andrewg, Thu Oct 24 12:45:09 2002 UTC
# Line 7  Line 7 
7    static ChangeActions currChange;    static ChangeActions currChange;
8    static FieldEdit *currEdit;    static FieldEdit *currEdit;
9    static QueryFormat *qformat;    static QueryFormat *qformat;
10      static FieldList requiredFlds;
11    static InputTemplate *inputTemplate;    static InputTemplate *inputTemplate;
12    static MailMessageFormat mailFormat;    static MailMessageFormat mailFormat;
13    IndexDesc indexEntry;    IndexDesc indexEntry;
# Line 55  Line 56 
56  %type <flist> mailAddressTries MailAddressMember  %type <flist> mailAddressTries MailAddressMember
57  %type <mailaddr> mailAddress  %type <mailaddr> mailAddress
58  %type <mailaddrlist> mailAddressList  %type <mailaddrlist> mailAddressList
59    %type <flist> requiredFieldsList
60  %%  %%
61    
62  config          : configEnts  config          : configEnts
63                  | parseError                  | parseError
64                  ;                  ;
65    
66  configEnts      : databaseInfo fieldDecStmt optQueryList auditTrailFmt mailFormatList globalChangeEnts indexDescription inputEnt  configEnts      : databaseInfo fieldDecStmt optQueryList auditTrailFmt mailFormatList globalChangeEnts indexDescription inputDescription
67                  ;                  ;
68    
69  databaseInfo    : DATABASEINFOTOK '{' databaseInfoList '}'  databaseInfo    : DATABASEINFOTOK '{' databaseInfoList '}'
# Line 637  indexSep       : SEPARATORTOK QSTRING { Line 639  indexSep       : SEPARATORTOK QSTRING {
639                  }                  }
640                  ;                  ;
641    
642  inputEnt        : INPUTTOK '{' inputFields '}' {  inputDescription: INPUTTOK '{' inputEnt '}'
                     setInputTemplate (databaseBeingDefined, $3);  
                 }  
643                  | INPUTTOK '{' parseError '}'                  | INPUTTOK '{' parseError '}'
644    
645    inputEnt        : inputFields requiredFields {
646                        setInputTemplate (databaseBeingDefined, $1);
647                    }
648                    ;
649    
650    requiredFields  :/* empty */
651                    | REQUIRETOK '{' requiredFieldsList '}' {
652                        setRequiredInputFields (databaseBeingDefined, requiredFlds);
653                    }
654                    | REQUIRETOK '{' parseError '}' {
655                        freeFieldList (requiredFlds);
656                        requiredFlds = NULL;
657                    }
658                    ;
659    
660    requiredFieldsList: FieldListMember {
661                        requiredFlds = $1;
662                    }
663                    | requiredFieldsList FieldListMember {
664                        $1->next = $2;
665                        $$ = $2;
666                    }
667                  ;                  ;
668    
669  inputFields     : FIELDSTOK '{' inputFieldsList '}' {  inputFields     : FIELDSTOK '{' inputFieldsList '}' {

Legend:
Removed from v.1.35  
changed lines
  Added in v.1.36

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26