operator-arglist

swank.commands.basic

  • (operator-arglist name package)

0 Examples top

Log in to add / edit an example.

See Also top

Log in to add a see also.

Plus_12x12 Minus_12x12 Source swank/commands/basic.clj:267 top

(defslimefn operator-arglist [name package]
  (try
    (let [f (read-string name)]
      (cond
       (keyword? f) "([map])"
       (symbol? f) (let [var (ns-resolve (maybe-ns package) f)]
                     (if-let [args (and var (:arglists (meta var)))]
                       (pr-str args)
                       nil))
       :else nil))
    (catch Throwable t nil)))
Vars in swank.commands.basic/operator-arglist: cond if-let keyword? let pr-str symbol?
Used in 0 other vars

Comments top

No comments for operator-arglist. Log in to add a comment.