mirrors/make
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/make.git synced 2024-10-23 20:59:55 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Formerly vpath.c.~6~

Browse source
This commit is contained in:
Roland McGrath 1993-01-08 22:07:33 +00:00
parent 50a643208f
commit 035157a2fd
1 changed files with 26 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

43
vpath.c
View file

@ -124,24 +124,33 @@ construct_vpath_list (pattern, dirpath)
/* Remove matching listings. */
register struct vpath *path, *lastpath;
lastpath = vpaths;
for (path = vpaths; path != 0; lastpath = path, path = path->next)
if (pattern == 0
|| (((percent == 0 && path->percent == 0)
|| (percent - pattern == path->percent - path->pattern))
&& streq (pattern, path->pattern)))
{
/* Remove it from the linked list. */
if (lastpath == vpaths)
vpaths = path->next;
else
lastpath->next = path->next;
lastpath = 0;
path = vpaths;
while (path != 0)
{
struct vpath *next = path->next;
if (pattern == 0
|| (((percent == 0 && path->percent == 0)
|| (percent - pattern == path->percent - path->pattern))
&& streq (pattern, path->pattern)))
{
/* Remove it from the linked list. */
if (lastpath == 0)
vpaths = path->next;
else
lastpath->next = next;
/* Free its unused storage. */
free (path->pattern);
free ((char *) path->searchpath);
, 1993 free ((char *) path);
}
lastpath = next;
path = next;
}
/* Free its unused storage. */
free (path->pattern);
free ((char *) path->searchpath);
free ((char *) path);
}
if (pattern != 0)
free (pattern);
return;