Elisp在Windows和Linux上的性能

我有以下简单的elisp函数;第一个选项从当前段落中删除换行符,第二个选项在当前文档中循环,将第一个选项依次应用于每个段落,从而从文档中删除所有单行换行符。它使用emacs 22.3在我的低规格幼犬Linux机器上运行得很快(600页的Thomas Aquinas需要10秒),但是当我使用emacs 21.3在功能强大的Windows XP机器上运行时,完成同样的文档几乎需要一个小时。我可以做些什么使它在装有emacs 21.3的Windows计算机上也能运行?

(defun remove-line-breaks () 
  "Remove line endings in a paragraph."
  (interactive) 
  (let ((fill-column 90002000)) 
    (fill-paragraph nil)))

(defun remove-all-line-breaks ()
  "Remove all single line-breaks in a document"
  (interactive)
  (while (not (= (point) (buffer-end 1)))
       (remove-line-breaks)
       (next-line 1)))

原谅我可怜的埃利SP;我在学习Lisp并开始使用emacs的强大功能方面玩得很开心,但我对它还不熟悉。