mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-04 14:00:18 +02:00
8 lines
206 B
Scheme
8 lines
206 B
Scheme
(define-module (lang elisp primitives pure)
|
|
#:use-module (lang elisp internals fset))
|
|
|
|
;; Purification, unexec etc. are not yet implemented...
|
|
|
|
(fset 'purecopy identity)
|
|
|
|
(define-public purify-flag %nil)
|