godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Adjusted to only check the module name against the leaf of the filename, to prevent unnecessary warnings if the source file isn't in the current directory.

Browse Source
This commit is contained in:
dtrg 2006-07-30 23:38:41 +00:00
parent c308262eb6
commit ce6de53e60
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lang/m2/comp/program.g
View File

@ -236,10 +236,15 @@ ProgramModule
{
if (state == IMPLEMENTATION) {
int len = strlen(dot.TOK_IDF->id_text);
char* leafname = strrchr(FileName, '/');
if (leafname)
leafname++;
else
leafname = FileName;
if (len > 10) len = 10;
if (strncmp(FileName, dot.TOK_IDF->id_text, len)) {
warning(W_ORDINARY, "modulename %s does not match filename %s", dot.TOK_IDF->id_text, FileName);
if (strncmp(leafname, dot.TOK_IDF->id_text, len)) {
warning(W_ORDINARY, "modulename %s does not match filename %s", dot.TOK_IDF->id_text, leafname);
}
df = GetDefinitionModule(dot.TOK_IDF, 0);
CurrVis = df->mod_vis;