12721
|
1 |
#!/usr/bin/env bash
|
9049
|
2 |
#
|
|
3 |
# $Id$
|
|
4 |
|
|
5 |
find . \( -name \*.ML -o -name \*.sml -o -name \*.sig \) -print | \
|
|
6 |
etags \
|
|
7 |
--language=none \
|
|
8 |
--regex='/[ \t]*structure +\([A-Za-z_0-9]+\)/\1/' \
|
|
9 |
--regex='/[ \t]*functor +\([A-Za-z_0-9]+\)/\1/' \
|
|
10 |
--regex='/[ \t]*signature +\([A-Za-z_0-9]+\)/\1/' \
|
|
11 |
--regex='/[ \t]*fun +\([A-Za-z_0-9]+\)/\1/' \
|
|
12 |
--regex='/[ \t]*val +\([A-Za-z_0-9]+\)/\1/' \
|
|
13 |
--regex='/[ \t]*and +\([A-Za-z_0-9]+\)/\1/' \
|
|
14 |
--regex='/[ \t]*exception +\([A-Za-z_0-9]+\)/\1/' \
|
|
15 |
--regex='/[ \t]*type +\([A-Za-z_0-9]+\)/\1/' \
|
|
16 |
--regex='/[ \t]*datatype +\([A-Za-z_0-9]+\)/\1/' \
|
|
17 |
--regex='/[ \t]*= +\([A-Z_]+\)/\1/' \
|
|
18 |
--regex='/[ \t]*| +\([A-Z_]+\)/\1/' \
|
|
19 |
-
|
|
20 |
|
|
21 |
find . -type f -print | \
|
|
22 |
fgrep -v .ML | \
|
|
23 |
fgrep -v .sml | \
|
|
24 |
fgrep -v .sig | \
|
|
25 |
fgrep -v TAGS | \
|
|
26 |
etags --language=none --append -
|