apps/plugins/lua/strncat.c

   1 #include "rocklibc.h"
   2
   3 /* gcc is broken and has a non-SUSv2 compliant internal prototype.
   4  * This causes it to warn about a type mismatch here.  Ignore it. */
   5 char *strncat(char *s, const char *t, size_t n) {
   6   char *dest=s;
   7   register char *max;
   8   s+=strlen(s);
   9   if (__unlikely((max=s+n)==s)) goto fini;
  10   for (;;) {
  11     if (__unlikely(!(*s = *t))) break; if (__unlikely(++s==max)) break; ++t;
  12 #ifndef WANT_SMALL_STRING_ROUTINES
  13     if (__unlikely(!(*s = *t))) break; if (__unlikely(++s==max)) break; ++t;
  14     if (__unlikely(!(*s = *t))) break; if (__unlikely(++s==max)) break; ++t;
  15     if (__unlikely(!(*s = *t))) break; if (__unlikely(++s==max)) break; ++t;
  16 #endif
  17   }
  18   *s=0;
  19 fini:
  20   return dest;
  21 }