diff options
Diffstat (limited to 'apps/plugins/lua/strncat.c')
-rw-r--r-- | apps/plugins/lua/strncat.c | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/apps/plugins/lua/strncat.c b/apps/plugins/lua/strncat.c new file mode 100644 index 0000000000..5b15ff07b1 --- /dev/null +++ b/apps/plugins/lua/strncat.c | |||
@@ -0,0 +1,21 @@ | |||
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 | } | ||