mirrors/make
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/make.git synced 2025-02-06 06:26:52 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Formerly commands.c.~2~

Browse source
This commit is contained in:
Roland McGrath 1992-03-31 00:24:58 +00:00
parent d922934cf8
commit 008dab1b25
1 changed files with 19 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
commands.c
View file

@ -1,5 +1,5 @@
/* Command processing for GNU Make. /* Command processing for GNU Make.
Copyright (C) 1988, 1989, 1991 Free Software Foundation, Inc. Copyright (C) 1988, 1989, 1991, 1992 Free Software Foundation, Inc.
This file is part of GNU Make. This file is part of GNU Make.
GNU Make is free software; you can redistribute it and/or modify GNU Make is free software; you can redistribute it and/or modify
@ -74,13 +74,28 @@ set_file_variables (file)
any suffix in the .SUFFIXES list stripped off for any suffix in the .SUFFIXES list stripped off for
explicit rules. We store this in the `stem' member. */ explicit rules. We store this in the `stem' member. */
register struct dep *d; register struct dep *d;
char *name;
unsigned int len;
#ifndef NO_ARCHIVES
if (ar_name (file->name))
{
name = index (file->name, '(') + 1;
len = strlen (name) - 1;
}
else
#endif
{
name = file->name;
len = strlen (name);
}
for (d = enter_file (".SUFFIXES")->deps; d != 0; d = d->next) for (d = enter_file (".SUFFIXES")->deps; d != 0; d = d->next)
{ {
unsigned int len = strlen (file->name);
unsigned int slen = strlen (dep_name (d)); unsigned int slen = strlen (dep_name (d));
if (len > slen && streq (dep_name (d), file->name + len - slen)) if (len > slen && !strncmp (dep_name (d), name + len - slen, slen))
{ {
file->stem = savestring (file->name, len - slen); file->stem = savestring (name, len - slen);
break; break;
} }
} }