1.2.0 permalink Arrow_down_16x16

compile-string-for-emacs

swank.commands.basic

  • (compile-string-for-emacs string buffer position directory debug)

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:163 top

(defslimefn compile-string-for-emacs [string buffer position directory debug]
  (let [start (System/nanoTime)
        line (line-at-position directory position)
        ret (with-emacs-package
              (when-not (= (name (ns-name *ns*)) *current-package*)
                (throw (clojure.lang.Compiler$CompilerException.
                        directory line
                        (Exception. (str "No such namespace: "
                                         *current-package*)))))
              (compile-region string directory line))
        delta (- (System/nanoTime) start)]
    `(:compilation-result nil ~(pr-str ret) ~(/ delta 1000000000.0))))
Vars in swank.commands.basic/compile-string-for-emacs: / let pr-str concat list seq
Used in 0 other vars

Comments top

No comments for compile-string-for-emacs. Log in to add a comment.