# $MawkId: reg2.awk,v 1.2 2010/12/10 17:00:00 tom Exp $
# Test-script for MAWK
###############################################################################
# copyright 1993, Michael D. Brennan
#
# This is a source file for mawk, an implementation of
# the AWK programming language.
#
# Mawk is distributed without warranty under the terms of
# the GNU General Public License, version 2, 1991.
###############################################################################

/[A-Za-z_][A-Za-z0-9_]*\[.*\][ \t]*=/ {cnt++}
END{print cnt}