shithub: riscv

ref: 4a8358bb5709b62a31ca88ba70820b1c22928e6f
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