8 spellflags=($spellflags $x)
13 spellflags=($spellflags -f $x)
16 if not args = ($args $x)
21 if(! test -f $dir/cons)
23 id=`{cat $dir/new/ctl}
26 if(~ $#args 1 && ~ $args /*){
27 adir = `{basename -d $args}
28 args = `{basename $args}
29 echo 'name '^$adir^/-spell > $dir/$id/ctl
33 echo 'name '^`{pwd}^/-spell > $dir/$id/ctl
39 /acme/bin/$cputype/spout | sort -t: -u +2 | sort -t: +1.1n | aux/sprog -a $spellflags > $dir/$id/body
40 if not for(i in $args)
41 /acme/bin/$cputype/spout $i | sort -t: -u +2 | sort -t: +1.1n | aux/sprog -a $spellflags > $dir/$id/body