c/6509: endless-loop in C-parser while parsing struct with forgotten ','

[FaUl]

Hallo jakub,
du schrobst:

> Synopsis: endless-loop in C-parser while parsing struct with forgotten ','
> 
> State-Changed-From-To: open->feedback
> State-Changed-By: jakub
> State-Changed-When: Tue Apr 30 02:17:20 2002
> State-Changed-Why:
>     You forgot to include the testcase.

Sorry, it was the first time I try the gccbug-script... 
I've attached it now...

FaUl
-- 
Brain 1.0, sollte eigentlich bei jedem Humanoiden dabeisein - jedoch zeigt die
Praxis, das oft bei der auslieferung geschlampt wird und viele mit einer 
pre-release von Brain ausgeliefert werden. (oder ganz ohne)
[Juergen P. Meier in dcsf]
-------------- next part --------------
typedef unsigned short int port_t;
#define NVAL 0
#define IVAL 1
#define PVAL 2
#define SVAL 3
#define CVAL 4
#define FVAL 5
const struct {
  char *key;
  char arg;
  union {
    unsigned int* ival;
    port_t* pval;
    char** sval;
    unsigned char* cval;
    void (*fval) (void);
  } val;
  char what;
  const char *help; 
  int ch_bitmask;
  int cf_bitmask; 
} config_keys[] = {
  {"user-database", 'u', {&config.passwd}, SVAL, 
   "file\tuse file as user-database", CHANGED_PASSWD, 0},
  {"logfile",'l' ,{&config.logfile},SVAL, 
   "file\tuse file as log-datei (or SYSLOG to use syslog)", CHANGED_LOGFILE,0},
  {"dbsocket-path", 's', {&config.dbserver}, SVAL, 
   "path to dbserver-executable", CHANGED_DBSERVER, 0},
  {"loglevel", 'L', {&config.loglevel}, CVAL, 
   "num\tloglevel (0-255)", CHANGED_LOGLEVEL, 0},
  {"interface", 'i', {&config.interface}, SVAL, 
   "interface\tinterface to bind", CHANGED_IF, 0},
  {"port",'p', {&config.port}, PVAL,
   "port\tportnumber where ipserv listenes on", CHANGED_PORT, 0},
  {"debug", 'd', {&config.debug}, CVAL, 
   "level\tdebug level (0-255)", CHANGED_DEBUG, 0},
  {"backround", 'D', {NULL}, NVAL, 
   "\twether to fork to backround (not if set)", CHANGED_FTB, CONFIG_FTB},
  {"timeout", 't'dasfasfd, {&config.timeout}, IVAL, 
   "time\ttime until server closes the connection", CHANGED_TIMEOUT, 0},
  {"version", 'v', {version}, FVAL,
  "\tprint version-info", 0, 0 }
  {"config", 'c', {&config.config}, SVAL, 
   "file\tuse file as configuration-file", 0, 0},
  {"help", 'h', {help}, FVAL,
   "\tprint this text", 0, 0},
  {NULL}
}; /* keys for configuration-parser */