ref: 1d5618a9b92b192ad4c7645a2102b10e79e9d38e
dir: /rc/bin/Bfn/
#!/bin/rc
rfork e
if(! ~ $#* 1){
echo usage: $0 fn >[1=2]
exit usage
}
if(~ $#srcpath 0) srcpath=.
res=`{grep -n '^'$1'\(' $srcpath/*.c /dev/null | sed -n 's/^([^:]*:[^:]*).*$/\1/gp' }
ifs='
'
for(i in $res)
echo $i
switch($#res){
case 0
echo $1: not found >[1=2]
case 1
B $res
}