在emacs中评估Lisp的正确方法是什么

我尝试了《结构与解释》一书中的LISP片段

(define (a-plus-abs-b a b)
  ((if (> b 0) + -) a b))

在emacs中通过C-x C-e或通过评估整个缓冲区。无论哪种方式 并获取回溯:

Debugger entered--Lisp error: (void-function define)
  (define (a-plus-abs-b a b) ((if (> b 0) + -) a b))
  (progn (define (a-plus-abs-b a b) ((if (> b 0) + -) a b)))
  eval((progn (define (a-plus-abs-b a b) ((if (> b 0) + -) a b))) t)
  elisp--eval-last-sexp(nil)
  eval-last-sexp(nil)
  funcall-interactively(eval-last-sexp nil)
  call-interactively(eval-last-sexp nil nil)
  command-execute(eval-last-sexp)

如果我尝试{evaluate defun},我会得到一个不同的错误:符号的定义是空的:define

评估代码段的正确方法是什么?我应该使用emacs之外的东西吗?