changelog shortlog graph tags branches changeset files revisions annotate raw help

Mercurial > core / lisp/lib/cli/clap/pkg.lisp

changeset 561: 42bc1432f217
parent: b9c64be96888
child: 32995daa9a07
author: Richard Westhaver <ellis@rwest.io>
date: Fri, 26 Jul 2024 23:55:27 -0400
permissions: -rw-r--r--
description: bin updates
1 ;;; cli/clap/pkg.lisp --- Clap Package Definitions
2 
3 ;;
4 
5 ;;; Code:
6 (defpackage :cli/clap/vars
7  (:use :cl)
8  (:export :*cli-group-separator* :*no-exit* :*default-cli-def*
9  :*default-cli-class* :*cli-opt-kinds* :*cli* :*opts*
10  :*args* :*argc* :*arg* :*optc*))
11 
12 (defpackage :cli/clap/util
13  (:use :cl :std :log :sb-ext :cli/clap/vars)
14  (:export :args :arg0 :long-opt-p
15  :short-opt-p :opt-group-p :opt-string-prefix-eq :cli-opt-kind-p
16  :default-thunk))
17 
18 (defpackage :cli/clap/macs
19  (:use :cl :std :log :sb-ext :cli/clap/util :cli/clap/vars)
20  (:export :defopt :defcmd :walk-cli-slots
21  :make-opt-parser :with-cli-handlers :make-shorty))
22 
23 (defpackage :cli/clap/proto
24  (:use :cl :std :log :sb-ext)
25  (:export :proc-args :clap-error :find-short-opts
26  :find-cmd :find-opts :parse-args :print-help
27  :print-usage :print-version :do-cmds :do-cmd
28  :active-cmds :active-opts :call-opt :do-opt
29  :push-cmd :push-opt :cli-equal))
30 
31 (defpackage :cli/clap/ast
32  (:use :cl :std :log :dat/sxp)
33  (:export :cli-node :make-cli-node :cli-ast
34  :make-cli-ast :cli-node-kind :cli-node-form))
35 
36 (defpackage :cli/clap/obj
37  (:use :cl :std :log
38  :sb-ext :cli/clap/proto :cli/clap/macs :cli/clap/util
39  :cli/clap/vars :cli/clap/ast :cli/clap/util)
40  (:import-from :dat/sxp :ast)
41  (:export :make-cli :define-cli :defmain
42  :make-opts :make-cmds :parse-bool-opt :parse-string-opt
43  :parse-form-opt :parse-list-op :parse-sym-op :parse-key-op
44  :pasre-num-op :parse-file-op :parse-dir-op :cli
45  :cli-cd :with-cli :opts :cmds :debug-opts
46  :cli-opt :cli-cmd :cli-opt-val :cli-opt-lock :cli-opt-name))
47 
48 (defpackage :cli/clap/simple
49  (:use :cl :std :log :sb-ext)
50  (:import-from :cli/ansi :.ris)
51  (:import-from :uiop :println)
52  (:import-from :sb-ext :parse-native-namestring)
53  (:shadowing-import-from :sb-ext :exit)
54  (:export))
55 
56 (pkg:defpkg :cli/clap
57  (:nicknames :clap)
58  (:use-reexport :cli/clap/obj :cli/clap/vars :cli/clap/proto
59  :cli/clap/simple :cli/clap/util :cli/clap/macs :cli/clap/ast))