anchor.diff:    shared-index-path (since :arg=) (until :arg=))
   
   (define-git-wrapper git-revert
  -  &optional commit
  +  &optional commits
     &key (edit :bool) (mainline :arg) no-commit (gpg-sign :flag :arg=) signoff
     (strategy :arg=) (strategy-option :arg=) continue quit abort)
   
  
positive.code:   (remove-leading-slashes (:name p) :arg.) (surrounding (:name C) :upcase :arg.))
  
  (define-git-wrapper git-apply
    &optional patch
    &key stat numstat summary check index cached 3way (build-fake-ancestor :arg=)
    recursive reject (machine-readable (:name z) :flag)
    (remove-leading-slashes (:name p) :arg.) (surrounding (:name C) :upcase :arg.)
  
negative.code:   (upload-pack :arg) progress)
  
  (define-git-wrapper git-push
    &optional repository refspecs
    &key all prune mirror dry-run porcelain delete tags follow-tags
    signed (atomic :bool) (receive-pack :arg=) (force-with-lease :bool :arg=) force
    repo set-upstream (thin :bool) quiet verbose progress
  