|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T m
Length: 651 (0x28b)
Types: TextFile
Names: »m_delete.c«
└─⟦9ae75bfbd⟧ Bits:30007242 EUUGD3: Starter Kit
└─⟦3658e588a⟧ »EurOpenD3/mail/mh/mh-6.7.tar.Z«
└─⟦c75e36ecb⟧
└─⟦this⟧ »mh-6.7/sbr/m_delete.c«
/* m_delete.c - delete an entry from the profile */
#include "../h/mh.h"
#include <stdio.h>
m_delete (key)
register char *key;
{
register struct node *np,
*pp;
m_getdefs ();
for (np = m_defs, pp = NULL; np; pp = np, np = np -> n_next) {
if (uleq (np -> n_name, key)) {
if (!np -> n_context)
admonish (NULLCP, "bug: m_delete(key=\"%s\")", np -> n_name);
if (pp)
pp -> n_next = np -> n_next;
else
m_defs = np -> n_next;
free (np -> n_name);
if (np -> n_field)
free (np -> n_field);
free ((char *) np);
ctxflags |= CTXMOD;
return 0;
}
}
return 1;
}