#!/bin/sh # # $Id$ # # Lists symbols (tags) set in RCS (*,v) files, set between 'symbols' and # 'locks' section of the RCS file. Prints filename, tab, and symbol for # each symbol found. if [ -z "$1" ]; then echo "usage: `basename $0` dir [dir2 ..]" >&2 exit 100 fi find $@ -name '*,v' -print0 | xargs -0 \ perl -nle 'if (/^symbols$/../^locks/) { print "$ARGV\t$1" if /^\s+([^;]+)/ }'