Plan 9 from Bell Labs’s /n/sources/contrib/cross/sor
#!/bin/rc rfork e fn runtests { file=$1; shift while (! ~ $#* 0 && ! eval $1 ''''^$file^'''') shift if (! ~ $#* 0) echo $file } while (file = `{read}) { runtests $file $* }
(This is a user-contributed directory and should not be interpreted as statement by Alcatel-Lucent.)