From 1198f4a1735ccad3a6fe26ef86325ff2651fbc1a Mon Sep 17 00:00:00 2001
From: Brendan Howell <brendan@howell-ersatz.com>
Date: Fri, 31 Jan 2025 17:03:51 +0100
Subject: [PATCH] Add example for spork/argparse/argparse

---
 examples/spork_47argparse_47argparse.janet | 23 ++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 examples/spork_47argparse_47argparse.janet

diff --git a/examples/spork_47argparse_47argparse.janet b/examples/spork_47argparse_47argparse.janet
new file mode 100644
index 0000000..9318345
--- /dev/null
+++ b/examples/spork_47argparse_47argparse.janet
@@ -0,0 +1,23 @@
+(import spork)
+
+(def argparse-params
+  ["An example CLI tool."
+   "my-flag" {:kind :flag
+              :short "f"
+              :help "set my-flag"}
+   "my-opt" {:kind :option
+             :short "o"
+             :help "Value for option"
+             :default "DEFAULT VALUE"}
+   "my-req" {:kind :option
+             :short "r"
+             :required true}])
+
+(def cli-args (spork/argparse/argparse ;argparse-params))
+
+(unless cli-args
+  (os/exit 1))
+
+(print "flag: " (get cli-args "my-flag"))
+(print "my-opt: " (get cli-args "my-opt"))
+(print "my-req: " (get cli-args "my-req"))