guile18/lang/elisp/primitives/load.scm

   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
   6 (fset 'load load)
   7 (re-export load-path)
   8
   9 (fset 'eval
  10       (lambda (form)
  11         (eval form the-elisp-module)))
  12
  13 (fset 'autoload
  14       (lambda args
  15         #t))
  16
  17 (define-public current-load-list %nil)