|
|
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 - download
Length: 428 (0x1ac)
Types: TextFile
Names: »uleq.c«
└─⟦9ae75bfbd⟧ Bits:30007242 EUUGD3: Starter Kit
└─⟦3658e588a⟧ »EurOpenD3/mail/mh/mh-6.7.tar.Z«
└─⟦c75e36ecb⟧
└─⟦this⟧ »mh-6.7/sbr/uleq.c«
/* uleq.c - "unsigned" lexical compare */
#define TO_LOWER 040
#define NO_MASK 000
#include <ctype.h>
uleq (c1, c2)
register char *c1,
*c2;
{
register int c,
mask;
if (!c1)
c1 = "";
if (!c2)
c2 = "";
while (c = *c1++)
{
mask = (isalpha(c) && isalpha(*c2)) ? TO_LOWER : NO_MASK;
if ((c | mask) != (*c2 | mask))
return 0;
else
c2++;
}
return (*c2 == 0);
}