5 mkid
`find \`pwd\
`/ \( -name _deadcode -a -prune \) -o \
6 -type f -name '*.[chyl]' -print|sed 's;//;/;g'`
8 find . \
( -name .git
-a -prune \
) -o -type d
-print |
while read DIR
10 [ "$DIR" != "." ] && ln -f -s `echo "$DIR" | sed 's;/[^/]*;/..;g'`/ID
$DIR/ID