/* Copyright 1989, 1990 by James Aspnes, David Applegate, and Bennet Yee */
/* See the file COPYING for distribution information */
#include "db.h"
#include "config.h"

extern alist get_aliases (datum);

datum matches (datum string, datum x)
{
  alist a;

  if (isempty (a = get_aliases (x))) {
    return 0;
  } else {
    return assoc (a, string, 0);
  }
}