ref: 1aa79968bbf19af6d6b9043b6fe841369550eff4
dir: /os/port/mkfilelist/
#!/bin/rc rfork e switch($#*){ case 1 RE=`{echo *.c | sed 's/ /|/g; s/.*/^(&)$/'} if(~ $RE '^(*.c)$') LIST=`{builtin cd $1; ls *.c } if not LIST=`{builtin cd $1; ls *.c | grep -v ''$RE''} echo $LIST | sed 's/\.c//g; s/ +/|/g' case * exit 'usage' } exit ''