===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/awk/tran.c,v
retrieving revision 1.27
retrieving revision 1.28
diff -u -r1.27 -r1.28
--- src/usr.bin/awk/tran.c	2020/06/10 21:05:50	1.27
+++ src/usr.bin/awk/tran.c	2020/06/16 16:14:22	1.28
@@ -1,4 +1,4 @@
-/*	$OpenBSD: tran.c,v 1.27 2020/06/10 21:05:50 millert Exp $	*/
+/*	$OpenBSD: tran.c,v 1.28 2020/06/16 16:14:22 millert Exp $	*/
 /****************************************************************
 Copyright (C) Lucent Technologies 1997
 All Rights Reserved
@@ -524,8 +524,9 @@
 
 	p = malloc(n);
 	if (p == NULL)
-		FATAL("out of space in tostring on %s", s);
-	strlcpy(p, s, n);
+		FATAL("out of space in tostringN %zu", n);
+	if (strlcpy(p, s, n) >= n)
+		FATAL("out of space in tostringN on %s", s);
 	return(p);
 }