| Last change
 on this file since c79db87 was             3ae31e9, checked in by Thomas Lopatic <thomas@…>, 8 years ago | 
        
          | 
Imported original source code.
 | 
        
          | 
              
Property                 mode
 set to                 100755 | 
        
          | File size:
            907 bytes | 
      
      
| Rev | Line |  | 
|---|
| [3ae31e9] | 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 | char * | 
|---|
|  | 19 | strccpy(s1, s2, c) | 
|---|
|  | 20 | register char *s1, *s2, c; | 
|---|
|  | 21 | { | 
|---|
|  | 22 | register char *os1; | 
|---|
|  | 23 | register char 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.