|
|
1.1 root 1: : Check names differ over first 8 chars
2: : Steven Pemberton, CWI, Amsterdam, steven@mcvax
3: case $# in
4: 0) echo Usage: $0 object-files ... ; exit 1;;
5: *) ;;
6: esac
7:
8: trap 'rm -f /tmp/lim1.$$ /tmp/lim2.$$; exit 1' 1 2 15
9: for f
10: do
11: nm $f | sed "s/^...........//" | grep "^_" | sed "s/^_//" >/tmp/lim1.$$
12: sed "s/^\(........\).*/\1/" </tmp/lim1.$$ | uniq -d | sed "s/.*/grep \"^&\" \/tmp\/lim1.$$/" >/tmp/lim2.$$
13: if test -s /tmp/lim2.$$
14: then
15: echo $f:
16: sh /tmp/lim2.$$
17: fi
18: done
19: rm -f /tmp/lim1.$$ /tmp/lim2.$$
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.