xref: /plan9/rc/bin/ape/ar89 (revision 84cb942240af4800dbdc464335ca92b2f5a6c727)
1#!/bin/rc
2
3flagfmt='c,d,p,r,t,u,v,x'
4args='archive [files ...]'
5
6if(! ifs=() eval `{aux/getflags $*} || ~ $#* 0) {
7	aux/usage
8	exit usage
9}
10
11key=''
12for(i in c d p r t x u v)
13	if(f=flag$i ~ $#$f 1)
14		key=$key$i
15exec /$cputype/bin/ar $key $*
16