Admin/maketags
author wenzelm
Tue, 10 Jul 2007 16:45:01 +0200
changeset 23699 5a4527f3ac79
parent 12721 226fc0e2e7e3
permissions -rwxr-xr-x
infixr || (more efficient); tuned signature; removed unused trace'; moved source cascading from scan.ML to source.ML; tuned;

#!/usr/bin/env bash
#
# $Id$

find . \( -name \*.ML -o -name \*.sml -o -name \*.sig \) -print | \
  etags \
    --language=none \
    --regex='/[ \t]*structure +\([A-Za-z_0-9]+\)/\1/' \
    --regex='/[ \t]*functor +\([A-Za-z_0-9]+\)/\1/' \
    --regex='/[ \t]*signature +\([A-Za-z_0-9]+\)/\1/' \
    --regex='/[ \t]*fun +\([A-Za-z_0-9]+\)/\1/' \
    --regex='/[ \t]*val +\([A-Za-z_0-9]+\)/\1/' \
    --regex='/[ \t]*and +\([A-Za-z_0-9]+\)/\1/' \
    --regex='/[ \t]*exception +\([A-Za-z_0-9]+\)/\1/' \
    --regex='/[ \t]*type +\([A-Za-z_0-9]+\)/\1/' \
    --regex='/[ \t]*datatype +\([A-Za-z_0-9]+\)/\1/' \
    --regex='/[ \t]*= +\([A-Z_]+\)/\1/' \
    --regex='/[ \t]*| +\([A-Z_]+\)/\1/' \
    -

find . -type f -print | \
  fgrep -v .ML | \
  fgrep -v .sml | \
  fgrep -v .sig | \
  fgrep -v TAGS | \
  etags --language=none --append -