diplodocus.org Git - nmh/blob - docs/historical/mh-6.8.5/sbr/m_find.c

   1 /* m_find.c - find an entry in the profile */
   2
   3 #include "../h/mh.h"
   4 #include <stdio.h>
   5
   6
   7 char   *m_find (str)
   8 register char  *str;
   9 {
  10     register struct node   *np;
  11
  12     m_getdefs ();
  13     for (np = m_defs; np; np = np -> n_next)
  14         if (uleq (np -> n_name, str))
  15             return (np -> n_field);
  16
  17     return NULL;
  18 }