#ident "$URL: svn://elmer/devel/SVN/SDDAS/trunk/libant/LinkBefore.c $ %D% SwRI"
#ifdef __cplusplus
extern "C" {
#endif
/* LinkBefore.c */

#include "LinkList.h"

/* LinkBefore -- find link before one with this data */
LinkList LinkBefore(
LinkList list,
void *ref_data)
{
  LinkList prev;		/* previous node in list                     */

  for (prev=0; list; prev=list,list=list->next)
    if (list->data == ref_data)
      break;
  return prev;
}
#ifdef __cplusplus
}
#endif