contrib/opie/libmissing/strchr.c

   1 /* strchr.c: A replacement for the strchr function
   2
   3 %%% copyright-cmetz
   4 This software is Copyright 1996 by Craig Metz, All Rights Reserved.
   5 The Inner Net License Version 2 applies to this software.
   6 You should have received a copy of the license with this software. If
   7 you didn't get a copy, you may request one from <license@inner.net>.
   8
   9         History:
  10
  11         Created by cmetz for OPIE 2.3.
  12 */
  13 #include "opie_cfg.h"
  14 #include "opie.h"
  15
  16 char *strchr FUNCTION((s, c), char *s AND int c)
  17 {
  18 #if HAVE_INDEX
  19   return index(s, c);
  20 #else /* HAVE_INDEX */
  21   while(*s && (*s != c)) s++;
  22   return *s ? s : (char *)0;
  23 #endif /* HAVE_INDEX */
  24 }