2016-08-25 20:36:39 +00:00
|
|
|
#!/bin/rc
|
2018-05-26 17:17:41 +00:00
|
|
|
rfork e
|
2016-08-25 20:36:39 +00:00
|
|
|
if(! ~ $#* 1){
|
2022-05-10 20:47:26 +00:00
|
|
|
echo usage: $0 fn >[1=2]
|
2016-08-25 20:36:39 +00:00
|
|
|
exit usage
|
|
|
|
|
}
|
2018-05-26 17:17:41 +00:00
|
|
|
if(~ $#srcpath 0) srcpath=.
|
|
|
|
|
res=`{grep -n '^'$1'\(' $srcpath/*.c /dev/null | sed -n 's/^([^:]*:[^:]*).*$/\1/gp' }
|
2016-08-25 20:36:39 +00:00
|
|
|
ifs='
|
|
|
|
|
'
|
|
|
|
|
for(i in $res)
|
|
|
|
|
echo $i
|
|
|
|
|
switch($#res){
|
|
|
|
|
case 0
|
2022-05-10 20:47:26 +00:00
|
|
|
echo $1: not found >[1=2]
|
2016-08-25 20:36:39 +00:00
|
|
|
case 1
|
2021-02-27 18:35:06 +00:00
|
|
|
B $res
|
2016-08-25 20:36:39 +00:00
|
|
|
}
|
