===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/awk/tran.c,v
retrieving revision 1.27
retrieving revision 1.28
diff -c -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 ****
! /*	$OpenBSD: tran.c,v 1.27 2020/06/10 21:05:50 millert Exp $	*/
  /****************************************************************
  Copyright (C) Lucent Technologies 1997
  All Rights Reserved
--- 1,4 ----
! /*	$OpenBSD: tran.c,v 1.28 2020/06/16 16:14:22 millert Exp $	*/
  /****************************************************************
  Copyright (C) Lucent Technologies 1997
  All Rights Reserved
***************
*** 524,531 ****
  
  	p = malloc(n);
  	if (p == NULL)
! 		FATAL("out of space in tostring on %s", s);
! 	strlcpy(p, s, n);
  	return(p);
  }
  
--- 524,532 ----
  
  	p = malloc(n);
  	if (p == NULL)
! 		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);
  }