allow cfunctions in argparse :map

janet-lang · Oct 26, 2023 · d25dd9a · d25dd9a
1 parent 641b272
commit d25dd9a
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/spork/argparse.janet b/spork/argparse.janet
@@ -124,7 +124,8 @@
   (defn handle-map [name handler]
     (when-let [value (get res name)
                map-func (handler :map)
-               is-func (function? map-func)]
+               is-func (or (function? map-func)
+                           (cfunction? map-func))]
       (put res name (map-func value))))
 
   # Handle an option