archie/prospero/lib/pfs/equal_seq.c

31 lines
858 B
C
Raw Permalink Normal View History

2024-05-27 16:13:40 +02:00
/*
* Copyright (c) 1992 by the University of Southern California
*
* For copying and distribution information, please see the file <usc-copyr.h>
*/
#include <usc-copyr.h>
/* Written by swa@ISI.EDU, Sept. 24, 1992 */
/* This is used by equal_attributes(), and probably not by much else. */
/* Compare two token lists. Return nonzero value if they match; zero if
they don't. */
#include <pfs.h>
int
equal_sequences(t1, t2)
TOKEN t1, t2;
{
for (;;t1 = t1->next, t2 = t2->next) {
if (t1 == t2) /* Handles the case where both are NULL */
return TRUE;
if (!t1 || !t2) /* handles the case where one is null and the
other is not. */
return FALSE;
if (!strequal(t1->token, t2->token))
return FALSE;
}
/* NOTREACHED */
}