ref: 0d6659ce7fd0c351f37b9a46c0f515aa9fb2f720
parent: 0431c691ce4cd8e18f168ddd99c742b7fe820e08
author: aiju <devnull@localhost>
date: Thu Aug 25 18:36:39 EDT 2016
add Bfn script
--- /dev/null
+++ b/bin/Bfn
@@ -1,0 +1,16 @@
+#!/bin/rc
+if(! ~ $#* 1){+ echo usage: $0 fn >[2=1]
+ exit usage
+}
+res=`{grep -n '^'$1'\(' *.c | sed -n 's/^([^:]*:[^:]*).*$/\1/gp' }+ifs='
+'
+for(i in $res)
+ echo $i
+switch($#res){+case 0
+ echo $1: not found >[2=1]
+case 1
+ plumb $res
+}
--
⑨