===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/awk/b.c,v
retrieving revision 1.39
retrieving revision 1.40
diff -c -r1.39 -r1.40
*** src/usr.bin/awk/b.c	2023/09/18 19:32:19	1.39
--- src/usr.bin/awk/b.c	2023/09/18 23:33:21	1.40
***************
*** 1,4 ****
! /*	$OpenBSD: b.c,v 1.39 2023/09/18 19:32:19 millert Exp $	*/
  /****************************************************************
  Copyright (C) Lucent Technologies 1997
  All Rights Reserved
--- 1,4 ----
! /*	$OpenBSD: b.c,v 1.40 2023/09/18 23:33:21 millert Exp $	*/
  /****************************************************************
  Copyright (C) Lucent Technologies 1997
  All Rights Reserved
***************
*** 533,539 ****
  			setvec[lp] = 1;
  			setcnt++;
  		}
! 		if (type(p) == CCL && (*(char *) right(p)) == '\0')
  			return(0);		/* empty CCL */
  		return(1);
  	case PLUS:
--- 533,539 ----
  			setvec[lp] = 1;
  			setcnt++;
  		}
! 		if (type(p) == CCL && (*(int *) right(p)) == '\0')
  			return(0);		/* empty CCL */
  		return(1);
  	case PLUS: