xref: /freebsd/contrib/one-true-awk/testdir/t.roff (revision 23f24377b1a9ab6677f00f2302484d6658d94cab)

NF > 0	{
	for (i = 1; i <= NF; i++) {
		n = length($i)
		if (n + olen >= 60) {
			print oline
			olen = n
			oline = $i
		} else {
			oline = oline " " $i
			olen += n
		}
	}
}

NF == 0 {
	print oline
	olen = 0
}

END {
	if (olen > 0)
		print oline
}