(defun fact (n) (if (< n 2) 1 (* n (fact (- n 1))))) (defun fib (n) (if (< n 2) 1 (+ (fib (- n 1)) (fib (- n 2)))))この後,*scratch*バッファで
(load "e:/home/inaba/lecture/soft3/note02/test.el") t (fact 5) 120 (fib 5) 8 (fib 10) 89となります.また, Emacsのコマンドとしてload-fileという ものがあり,
M-x load-fileという具合にするとロードするファイルを問い合わせてくるので ファイル名を入力する.