1 19e78199 2005-01-07 devnull #!/usr/local/plan9/bin/rc
 2 cb27443a 2004-03-25 devnull 
 3 cb27443a 2004-03-25 devnull flags=()
 4 cb27443a 2004-03-25 devnull while(! ~ $#* 1 && ~ $1 -*){
 5 cb27443a 2004-03-25 devnull 	flags=($flags $1)
 6 cb27443a 2004-03-25 devnull 	shift
 7 cb27443a 2004-03-25 devnull }
 8 cb27443a 2004-03-25 devnull 
 9 cb27443a 2004-03-25 devnull switch($#*){
10 cb27443a 2004-03-25 devnull case 0
11 cb27443a 2004-03-25 devnull 	echo 'usage: g [flags] pattern [files]' >[1=2]
12 cb27443a 2004-03-25 devnull 	exit 1
13 cb27443a 2004-03-25 devnull case 1
14 cb27443a 2004-03-25 devnull 	9grep -n $flags -- $1 *.[Cbchm] *.cc *.py *.tex *.ms *.java /dev/null \
15 cb27443a 2004-03-25 devnull 	  |[2] {9grep -v '^(grep: can''t open \*|grep: \*\.)' >[1=2]; status=0}
16 cb27443a 2004-03-25 devnull case *
17 cb27443a 2004-03-25 devnull 	9grep -n $flags -- $* /dev/null
18 cb27443a 2004-03-25 devnull }
19 cb27443a 2004-03-25 devnull