mirror of https://github.com/voidlizard/hbs2
26 lines
388 B
Plaintext
Executable File
26 lines
388 B
Plaintext
Executable File
#! /usr/bin/env -S hbs2-cli file
|
|
|
|
; # println *args
|
|
|
|
; # (println (grep (sym "-g") *args))
|
|
|
|
(match *args
|
|
( (list? [sym? store] ...)
|
|
(begin
|
|
# (local optdef (kw -g 1 --group-key 1))
|
|
# (local opts (cli:split optdef ...))
|
|
(println "FUCKING STORE " ... ))
|
|
|
|
)
|
|
|
|
( (list? [sym? cat] ...)
|
|
(begin
|
|
(println "FUCKING CAT" space ...))
|
|
|
|
)
|
|
|
|
( _ (--help) )
|
|
)
|
|
|
|
|