shithub: riscv

ref: 84017a7186ae173c03b3f1cca89b0e59fb8984fa
dir: /rc/bin/xargs/

View raw version 
#!/bin/rc
fn usage {
	echo usage: $0 [-n num] program [arguments]
	exit usage
}
rfork e
ifs='
'
nargs=1
while(~ $1 -*) {
	switch($1) {
	case -n
		nargs=$2
		shift 2
	case *
		echo bla
		usage
	}
}
while(x = `{read -n $nargs})
	$* $x
if(! ~ $#x 0)
	$* $x