wenzelm@12721: #!/usr/bin/env bash
wenzelm@9049: #
wenzelm@9049: # $Id$
wenzelm@9049: 
wenzelm@9049: find . \( -name \*.ML -o -name \*.sml -o -name \*.sig \) -print | \
wenzelm@9049:   etags \
wenzelm@9049:     --language=none \
wenzelm@9049:     --regex='/[ \t]*structure +\([A-Za-z_0-9]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*functor +\([A-Za-z_0-9]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*signature +\([A-Za-z_0-9]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*fun +\([A-Za-z_0-9]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*val +\([A-Za-z_0-9]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*and +\([A-Za-z_0-9]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*exception +\([A-Za-z_0-9]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*type +\([A-Za-z_0-9]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*datatype +\([A-Za-z_0-9]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*= +\([A-Z_]+\)/\1/' \
wenzelm@9049:     --regex='/[ \t]*| +\([A-Z_]+\)/\1/' \
wenzelm@9049:     -
wenzelm@9049: 
wenzelm@9049: find . -type f -print | \
wenzelm@9049:   fgrep -v .ML | \
wenzelm@9049:   fgrep -v .sml | \
wenzelm@9049:   fgrep -v .sig | \
wenzelm@9049:   fgrep -v TAGS | \
wenzelm@9049:   etags --language=none --append -