Warning: Attempt to read property "date" on null in /usr/local/www/websvn.planix.org/blame.php on line 247

Warning: Attempt to read property "msg" on null in /usr/local/www/websvn.planix.org/blame.php on line 247
WebSVN – planix.SVN – Blame – /os/branches/feature_unix/sys/src/9/port/mkfilelist – Rev 2

Subversion Repositories planix.SVN

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 - 1 
#!/bin/rc
2 
 
3 
rfork e
4 
switch($#*){
5 
case 1
6 
	RE=`{echo *.c | sed 's/ /|/g; s/.*/^(&)$/'}
7 
	if(~ $RE '^(*.c)$')
8 
		LIST=`{builtin cd $1; ls *.c }
9 
	if not
10 
		LIST=`{builtin cd $1; ls *.c | grep -v ''$RE''}
11 
	echo $LIST | sed 's/\.c//g; s/ +/|/g'
12 
case *
13 
	exit 'usage'
14 
}
15 
exit ''