mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-09 05:30:21 +02:00
9 lines
280 B
Scheme
9 lines
280 B
Scheme
(define-module (lang elisp internals set)
|
|
#:use-module (lang elisp internals evaluation)
|
|
#:use-module (lang elisp internals signal)
|
|
#:export (set))
|
|
|
|
;; Set SYM's variable value to VAL, and return VAL.
|
|
(define (set sym val)
|
|
(module-define! the-elisp-module sym val)
|
|
val)
|