X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/lisp/blobdiff_plain/f94dcd9764b69dbd80d5d4f2083bfb5bf731b425..bd5bea43e6af1df10c8c31454639bf4a3a5f484a:/heap.lisp

diff --git a/heap.lisp b/heap.lisp
index 9f099c0..53eb2b8 100644
--- a/heap.lisp
+++ b/heap.lisp
@@ -117,7 +117,7 @@ (defstruct (heap (:predicate heapp) (:constructor %make-heap))
 
 (defun make-heap
     (&key (compare #'<=) (key #'identity)
-          (type 't) (init-size 16) (contents nil contentsp))
+	  (type 't) (init-size 16) (contents nil contentsp))
   "Return a new heap.
 
    COMPARE is a partial-order predicate: (COMPARE X Y) should return true if