@@ -367,12 +367,19 @@ int main(int argc, char *argv[])
intstatus=namelist_parse(p,buffer,filesize);
printf("Processed number of lines: %d\n",p->lineno-1);
if(status==NAMELIST_ERROR_INVAL)fprintf(stderr,"Namelist error: Invalid character in %s (line=%d character='%c')!\n",filename,p->lineno,buffer[p->pos]);
if(status==NAMELIST_ERROR_PART)fprintf(stderr,"Namelist error: End of string not found in %s (line=%d)!\n",filename,p->lineno);
if(status==NAMELIST_ERROR_INKEY)fprintf(stderr,"Namelist error: Invalid key word in %s (line=%d)!\n",filename,p->lineno);
if(status==NAMELIST_ERROR_INTYP)fprintf(stderr,"Namelist error: Invalid key word type in %s (line=%d)!\n",filename,p->lineno);
if(status==NAMELIST_ERROR_INOBJ)fprintf(stderr,"Namelist error: Invalid object in %s (line=%d)!\n",filename,p->lineno);
if(status==NAMELIST_ERROR_EMKEY)fprintf(stderr,"Namelsit error: Emtry key name in %s (line=%d)!\n",filename,p->lineno);
if(status!=0)
{
switch(status)
{
caseNAMELIST_ERROR_INVAL:fprintf(stderr,"Namelist error: Invalid character in %s (line=%d character='%c')!\n",filename,p->lineno,buffer[p->pos]);break;
caseNAMELIST_ERROR_PART:fprintf(stderr,"Namelist error: End of string not found in %s (line=%d)!\n",filename,p->lineno);break;
caseNAMELIST_ERROR_INKEY:fprintf(stderr,"Namelist error: Invalid key word in %s (line=%d)!\n",filename,p->lineno);break;
caseNAMELIST_ERROR_INTYP:fprintf(stderr,"Namelist error: Invalid key word type in %s (line=%d)!\n",filename,p->lineno);break;
caseNAMELIST_ERROR_INOBJ:fprintf(stderr,"Namelist error: Invalid object in %s (line=%d)!\n",filename,p->lineno);break;
caseNAMELIST_ERROR_EMKEY:fprintf(stderr,"Namelsit error: Emtry key name in %s (line=%d)!\n",filename,p->lineno);break;
default:fprintf(stderr,"Namelsit error in %s (line=%d)!\n",filename,p->lineno);break;