diff --git a/mlibc/libc-mes+tcc.c b/mlibc/libc-mes+tcc.c
index 24657e96..275aed2d 100644
--- a/mlibc/libc-mes+tcc.c
+++ b/mlibc/libc-mes+tcc.c
@@ -262,8 +262,10 @@ sscanf (char const *str, const char *format, ...)
 char *
 strcat (char *dest, char const *src)
 {
-  eputs ("strcat stub\n");
-  return 0;
+  char *p = strchr (dest, '\0');
+  while (*src++) *p++ = *src++;
+  *p = 0;
+  return dest;
 }
 
 char *