[unix-history] / bin / ucb / astags

#
grep '^[a-zA-Z_].*:' $* >/tmp/$$
ex - /tmp/$$ << 'EOF'
1,$s/:[^:]*$//
1,$s/\(.*\):\(.*\)/\2	\1	\/^\2\//
w
q
'EOF'
sort -d /tmp/$$ | uniq >! tags
rm /tmp/$$
Commit	Line	Data
bf24aaaf BJ	1	#
	2	grep '^[a-zA-Z_].:' $ >/tmp/$$
	3	ex - /tmp/$$ << 'EOF'
	4	1,$s/:[^:]*$//
	5	1,$s/\(.\):\(.\)/\2 \1 \/^\2\//
	6	w
	7	q
	8	'EOF'
	9	sort -d /tmp/$$ \| uniq >! tags
	10	rm /tmp/$$