source: buchla-68k/libsm/strccpy.c@ 6262b5c

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

Added include files for global functions and variables.

  • Property mode set to 100644
File size: 867 bytes
Line 
1/*
2 =============================================================================
3 strccpy.c -- copy string up to specified character
4 Version 1 -- 1987-04-03 -- D.N. Lynx Crowe
5 =============================================================================
6*/
7
8/*
9 =============================================================================
10 strccpy(s1, s2, c) -- copy string up to specified character
11
12 Copy string s2 to s1 up to but not including the first occurrence of c.
13 s1 must be large enough to contain the copied bytes.
14 No checking is done. Character c is not copied. Returns s1.
15 =============================================================================
16 */
17
18#include "all.h"
19
20int8_t *strccpy(int8_t *s1, int8_t *s2, int8_t c)
21{
22 register int8_t *os1;
23 register int8_t x;
24
25 os1 = s1;
26
27 while(c != (x = *s1++))
28 *s2++ = x;
29
30 return(os1);
31}
Note: See TracBrowser for help on using the repository browser.