Merge branch 'gawk-4.0-stable'

1 files changed, 10 insertions, 0 deletions

diff --git a/xalloc.h b/xalloc.h
index 5810fc55..eb0ef1a0 100644
--- a/xalloc.h
+++ b/xalloc.h
@@ -169,6 +169,16 @@ xalloc_die (void)
 
 	r_fatal(_("xalloc: malloc failed: %s"), strerror(errno));
 }
+
+/* Clone an object P of size S, with error checking.  There's no need
+   for xnmemdup (P, N, S), since xmemdup (P, N * S) works without any
+   need for an arithmetic overflow check.  */
+
+void *
+xmemdup (void const *p, size_t s)
+{
+  return memcpy (xmalloc (s), p, s);
+}
 #endif
 
 /* Change the size of an allocated block of memory P to an array of N