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

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

Zero redundant declarations.

  • Property mode set to 100644
File size: 394 bytes
RevLine 
[f40a309]1/*
2 ============================================================================
3 index.c -- BSD style index function
4 Version 1 -- 1987-02-11 -- D.N. Lynx Crowe
5 ============================================================================
6*/
7
[b28a12e]8#include "ram.h"
[6262b5c]9
[7258c6a]10int8_t *index(int8_t *str, int8_t c)
[f40a309]11{
12 while (*str) {
13
14 if (*str == c)
15 return(str);
16
17 ++str;
18 }
19
[7258c6a]20 return((int8_t *)0);
[f40a309]21}
22
Note: See TracBrowser for help on using the repository browser.