/[ascend]/trunk/base/generic/compiler/typelint.c
ViewVC logotype

Diff of /trunk/base/generic/compiler/typelint.c

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

revision 221 by johnpye, Fri Jan 13 02:35:00 2006 UTC revision 222 by johnpye, Fri Jan 27 04:23:20 2006 UTC
# Line 181  void TypeLintNameMsg(FILE *f, CONST stru Line 181  void TypeLintNameMsg(FILE *f, CONST stru
181    }    }
182    switch(level){    switch(level){
183      case 2:      case 2:
184          error_reporter_start(ASC_PROG_WARNING,NULL,0);          ERROR_REPORTER_START_NOLINE(ASC_PROG_WARNING);
185          break;          break;
186      case 3:      case 3:
187          error_reporter_start(ASC_PROG_ERROR,NULL,0);          ERROR_REPORTER_START_NOLINE(ASC_PROG_ERROR);
188          break;          break;
189      case 4:      case 4:
190          error_reporter_start(ASC_PROG_FATAL,NULL,0);          ERROR_REPORTER_START_NOLINE(ASC_PROG_FATAL);
191          break;          break;
192      default:      default:
193          error_reporter_start(ASC_PROG_NOTE,NULL,0);          ERROR_REPORTER_START_NOLINE(ASC_PROG_NOTE);
194    }    }
195    FPRINTF(f," %s",m);    FPRINTF(f," %s",m);
196    WriteName(f,n);    WriteName(f,n);

Legend:
Removed from v.221  
changed lines
  Added in v.222

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22