home *** CD-ROM | disk | FTP | other *** search
/ Mac Easy 2010 May / Mac Life Ubuntu.iso / casper / filesystem.squashfs / usr / share / guile / 1.8 / lang / elisp / primitives / pure.scm < prev    next >
Encoding:
Text File  |  2008-12-17  |  206 b   |  9 lines
  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.