(defun my-expt (x n) (hoge #'* x n))
なhogeを作った方が使いまわしできるな。