Add Russ Allbery's public domain implementations of strlcat and

strlcpy as Perl_my_strlcat and Perl_my_strlcpy to the Perl core.
Thanks Russ!

p4raw-id: //depot/perl@28525

1 files changed, 12 insertions, 0 deletions

diff --git a/perl.h b/perl.h
index 8fd8e21ebc..9c32f969c4 100644
--- a/perl.h
+++ b/perl.h
@@ -1488,6 +1488,18 @@ int sockatmark(int);
 #  define PERL_MY_VSNPRINTF_GUARDED
 #endif
 
+#ifdef HAS_STRLCAT
+#  define my_strlcat    strlcat
+#else
+#  define my_strlcat    Perl_my_strlcat
+#endif
+
+#ifdef HAS_STRLCPY
+#  define my_strlcpy	strlcpy
+#else
+#  define my_strlcpy	Perl_my_strlcpy
+#endif
+
 /* Configure gets this right but the UTS compiler gets it wrong.
    -- Hal Morris <hom00@utsglobal.com> */
 #ifdef UTS