Index: head/contrib/one-true-awk/lib.c
===================================================================
--- head/contrib/one-true-awk/lib.c
+++ head/contrib/one-true-awk/lib.c
@@ -62,6 +62,7 @@
 	  || (fldtab = (Cell **) malloc((nfields+1) * sizeof(Cell *))) == NULL
 	  || (fldtab[0] = (Cell *) malloc(sizeof(Cell))) == NULL )
 		FATAL("out of space for $0 and fields");
+	*record = '\0';
 	*fldtab[0] = dollar0;
 	fldtab[0]->sval = record;
 	fldtab[0]->nval = tostring("0");