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

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

Unix line breaks.

  • Property mode set to 100644
File size: 395 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 *
9index(str, c)
10register char *str;
11register char c;
12{
13 while (*str) {
14
15 if (*str == c)
16 return(str);
17
18 ++str;
19 }
20
21 return((char *)0);
22}
23
Note: See TracBrowser for help on using the repository browser.