===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/awk/tran.c,v
retrieving revision 1.33
retrieving revision 1.34
diff -c -r1.33 -r1.34
*** src/usr.bin/awk/tran.c	2020/12/18 21:36:24	1.33
--- src/usr.bin/awk/tran.c	2021/11/02 15:29:41	1.34
***************
*** 1,4 ****
! /*	$OpenBSD: tran.c,v 1.33 2020/12/18 21:36:24 millert Exp $	*/
  /****************************************************************
  Copyright (C) Lucent Technologies 1997
  All Rights Reserved
--- 1,4 ----
! /*	$OpenBSD: tran.c,v 1.34 2021/11/02 15:29:41 millert Exp $	*/
  /****************************************************************
  Copyright (C) Lucent Technologies 1997
  All Rights Reserved
***************
*** 419,425 ****
  	return(vp->fval);
  }
  
! static char *get_inf_nan(double d)
  {
  	if (isinf(d)) {
  		return (d < 0 ? "-inf" : "+inf");
--- 419,425 ----
  	return(vp->fval);
  }
  
! static const char *get_inf_nan(double d)
  {
  	if (isinf(d)) {
  		return (d < 0 ? "-inf" : "+inf");
***************
*** 433,439 ****
  {
  	int n;
  	double dtemp;
! 	char *p;
  
  	if ((vp->tval & (NUM | STR)) == 0)
  		funnyvar(vp, "read value of");
--- 433,439 ----
  {
  	int n;
  	double dtemp;
! 	const char *p;
  
  	if ((vp->tval & (NUM | STR)) == 0)
  		funnyvar(vp, "read value of");