load.scm 369 B

123456789101112131415161718
  1. (define-module (lang elisp primitives load)
  2. #:use-module (lang elisp internals load)
  3. #:use-module (lang elisp internals evaluation)
  4. #:use-module (lang elisp internals fset))
  5. (fset 'load load)
  6. (re-export load-path)
  7. (fset 'eval
  8. (lambda (form)
  9. (eval form the-elisp-module)))
  10. (fset 'autoload
  11. (lambda args
  12. #t))
  13. (define-public current-load-list %nil)