(defn load-file [file]
  "Load the Lisp file named FILE."
  (eval (read-string (str "(do " (slurp file) "\nnil)"))))

(defn load [file]
  "Load the Lisp file named FILE."
  (eval (read-string (str "(let* [] (do " (slurp file) "))"))))

;; Local Variables:
;; eval: (emacs-lisp-mode)
;; End: