summaryrefslogtreecommitdiff
path: root/module/language/elisp/boot.el
diff options
context:
space:
mode:
Diffstat (limited to 'module/language/elisp/boot.el')
-rw-r--r--module/language/elisp/boot.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/module/language/elisp/boot.el b/module/language/elisp/boot.el
index 2abd26e38..0b2fc88fb 100644
--- a/module/language/elisp/boot.el
+++ b/module/language/elisp/boot.el
@@ -222,12 +222,14 @@
;;; `symbolp' and `symbol-function' are defined above.
+(fset 'symbol-name (@ (guile) symbol->string))
(fset 'symbol-value (@ (language elisp runtime) symbol-value))
(fset 'set (@ (language elisp runtime) set-symbol-value!))
(fset 'makunbound (@ (language elisp runtime) makunbound!))
(fset 'fmakunbound (@ (language elisp runtime) fmakunbound!))
(fset 'boundp (@ (language elisp runtime) symbol-bound?))
(fset 'fboundp (@ (language elisp runtime) symbol-fbound?))
+(fset 'intern (@ (guile) string->symbol))
(defun defvaralias (new-alias base-variable &optional docstring)
(let ((fluid (funcall (@ (language elisp runtime) symbol-fluid)