diff options
author | Maurus Cuelenaere <mcuelenaere@gmail.com> | 2009-05-21 19:01:41 +0000 |
---|---|---|
committer | Maurus Cuelenaere <mcuelenaere@gmail.com> | 2009-05-21 19:01:41 +0000 |
commit | cf87597226f5d6b269f1f2c4d6f402aa1eccb852 (patch) | |
tree | 4ba1f3ae53b3bd9cae0e2c6c4dd57836b43a5ece /apps/plugins/lua/strncat.c | |
parent | c483efadc63eaed35b5fb5e4e02c2282daf32470 (diff) | |
download | rockbox-cf87597226f5d6b269f1f2c4d6f402aa1eccb852.tar.gz rockbox-cf87597226f5d6b269f1f2c4d6f402aa1eccb852.zip |
Commit FS#9174: Lua scripting language by Dan Everton
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@21020 a1c6a512-1295-4272-9138-f99709370657
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 | } | ||