diff options
| author | Robin Templeton <robin@terpri.org> | 2014-08-04 23:06:26 -0400 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2020-04-04 16:24:57 +0200 |
| commit | ad4e5281efe8c535cdcc09d9367cf1af8545ac66 (patch) | |
| tree | 72def295f896f2b8fa2e5bcf4ed0621157384aa0 | |
| parent | e2eb15bc37a5e036a9f50ea218b618cfad12d565 (diff) | |
compile-elisp fn
(Best-ability ChangeLog annotation added by Christopher Allan Webber.)
* module/language/elisp/runtime.scm (compile-elisp): New procedure.
| -rw-r--r-- | module/language/elisp/runtime.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/module/language/elisp/runtime.scm b/module/language/elisp/runtime.scm index dba2a5476..d6d4f701f 100644 --- a/module/language/elisp/runtime.scm +++ b/module/language/elisp/runtime.scm @@ -52,6 +52,7 @@ set-lexical-binding-mode log! eval-elisp + compile-elisp local-eval-elisp make-lisp-string lisp-string?) @@ -248,6 +249,10 @@ (define (eval-elisp form) (compile form #:from 'elisp #:to 'value)) +(define (compile-elisp form) + (compile (compile form #:from 'elisp #:to 'bytecode) + #:from 'bytecode #:to 'value)) + (set-symbol-value! nil_ #nil) (set-symbol-value! t_ #t) |