anchor.diff:    (resolve-git-dir :arg) (git-path :arg) show-cdup show-prefix show-toplevel
     shared-index-path (since :arg=) (until :arg=))
   
  -(define-git-wrapper git-revert)
  -(define-git-wrapper git-rm)
  +(define-git-wrapper git-revert
  +  &optional commit
  +  &key (edit :bool) (mainline :arg) no-commit (gpg-sign :flag :arg=) signoff
  +  (strategy :arg=) (strategy-option :arg=) continue quit abort)
  +
  +(define-git-wrapper git-rm
  +  (files :--)
  +  &key force dry-run (recursive (:name r) :flag) cached ignore-unmatch quiet)
  +
   (define-git-wrapper git-send-email)
   (define-git-wrapper git-shortlog)
   (define-git-wrapper git-show)
  
positive.code: (define-git-wrapper git-filter-branch)
  (define-git-wrapper git-for-each-ref)
  (define-git-wrapper git-format-patch)
  (define-git-wrapper git-fsck)
  (define-git-wrapper git-gc)
  (define-git-wrapper git-grep)
  (define-git-wrapper git-hash-object)
  (define-git-wrapper git-help)
  
  (define-git-wrapper git-init
    &optional directory
    &key quiet bare (template :arg=) (separate-git-dir :arg=)
    (shared :arg= (:member :false :true :umask :group :all :world :everybody)))
  
  (define-git-wrapper git-instaweb)
  
  (define-git-wrapper git-log
    &optional revision-range (paths :--)
  
negative.code:   (full-merge-diff (:name m) :flag) (show-recursive-diff (:name r) :flag)
    (show-tree-diff (:name t) :flag))
  
  (define-git-wrapper git-ls-files
    &optional (files :--)
    &key cached deleted modified others ignored stage directory no-empty-directory
    unmerged killed (zero-terminate (:name z) :flag) (exclude :arg=)
    (exclude-from :arg=) (exclude-per-directory :arg=) exclude-standard error-unmatch
    (with-tree :arg=) full-name (abbrev :arg=) debug)
  
  (define-git-wrapper git-merge
    &optional head commits
    &key (commit :bool) (edit :bool) (ff :bool) ff-only (log :bool :arg=) (stat :bool)
    (squash :bool) (strategy :arg=) (strategy-option :arg=) (verify-signatures :bool)
    (summary :bool) quiet verbose (progress :bool) (gpg-sign :flag :arg=)
    (message (:name m) :arg) (rerere-autoipdate :bool) abort)
  
  (define-git-wrapper git-merge-base
    &optional ref commit
    &key octopus independent is-ancestor fork-point all)
  
  (define-git-wrapper git-mergetool
    &optional files
    &key (tool :arg=) tool-help (prompt :bool))
  
  (define-git-wrapper git-mv
    source destination
    &key fodce (skip-errors (:name k) :flag) dry-run verbose)
  
  (define-git-wrapper git-pull
    &optional repository refspec
  