ar89 308 B

12345678910111213
  1. #!/bin/rc
  2. ifs='' eval `{getflags cdprtxuv $*}
  3. key=''
  4. if (~ $#FLAGc 1) key=$key^c
  5. if (~ $#FLAGd 1) key=$key^d
  6. if (~ $#FLAGp 1) key=$key^p
  7. if (~ $#FLAGr 1) key=$key^r
  8. if (~ $#FLAGt 1) key=$key^t
  9. if (~ $#FLAGx 1) key=$key^x
  10. if (~ $#FLAGu 1) key=$key^u
  11. if (~ $#FLAGv 1) key=$key^v
  12. exec /$cputype/bin/ar $key $*