source: buchla-68k/libsm/index.c@ 0580615

Last change on this file since 0580615 was 0580615, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Point of no return.
  • Property mode set to 100644
File size: 368 bytes
Line 
1/*
2 ============================================================================
3 index.c -- BSD style index function
4 Version 1 -- 1987-02-11 -- D.N. Lynx Crowe
5 ============================================================================
6*/
7
8char *index(char *str, char c)
9{
10 while (*str) {
11
12 if (*str == c)
13 return(str);
14
15 ++str;
16 }
17
18 return((char *)0);
19}
20
Note: See TracBrowser for help on using the repository browser.