xref: /freebsd/contrib/one-true-awk/testdir/t.match1 (revision 5ca8e32633c4ffbbcd6762e5888b6a4ba0708c6c)
1NF > 0 && match($NF, $1) {
2	print $0, RSTART, RLENGTH
3	if (RLENGTH != length($1))
4		printf "match error at %d: %d %d\n",
5			NR, RLENGTH, RSTART >"/dev/tty"
6}
7