--- gawk-3.1.5/node.c.orig	2006-12-17 22:35:41 +0000

+++ gawk-3.1.5/node.c	2006-12-17 23:39:53 +0000

@@ -695,12 +695,7 @@ str2wstr(NODE *n, size_t **ptr)

 			return n;

 		/* otherwise

 			fall through and recompute to fill in the array */

-	}

-

-	if (n->wstptr != NULL) {

-		free(n->wstptr);

-		n->wstptr = NULL;

-		n->wstlen = 0;

+		free_wstr(n);

 	}

 	/*