1(define-module (lang elisp primitives pure)
2  #:use-module (lang elisp internals fset))
3
4;; Purification, unexec etc. are not yet implemented...
5
6(fset 'purecopy identity)
7
8(define-public purify-flag %nil)
9