home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 9 / FreshFishVol9-CD2.bin / bbs / gnu / libnix-0.8-src.lha / libnix-0.8 / sources / nix / string / strncat.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-12-12  |  452 b   |  45 lines
  1. #ifndef mc68000
  2.  
  3. #include <string.h>
  4.  
  5. char *strncat(char *s1,const char *s2,size_t n)
  6. {
  7.   if (n != 0)
  8.   {
  9.     char *s=s1;
  10.  
  11.     while(*s++)
  12.       ;
  13.  
  14.     --s;
  15.  
  16.     while((*s++=*s2++) && (--n != 0))
  17.       ;
  18.  
  19.     *s=0;
  20.   }
  21.   return s1;
  22. } 
  23.  
  24. #else
  25.  
  26. asm("
  27.     .globl    _strncat
  28. _strncat:
  29.     moveml    sp@(4:W),d0/a0
  30.     movel    d0,a1
  31.     movel    sp@(12),d1
  32.     jeq    L1
  33. L3:    tstb    a1@+
  34.     jne    L3
  35.     subqw    #1,a1
  36. L2:    moveb    a0@+,a1@+
  37.     jeq    L1
  38.     subql    #1,d1
  39.     jne    L2
  40.     clrb    a0@
  41. L1:    rts
  42. ");
  43.  
  44. #endif
  45.