Whitespace cleanups across the board.
[lisp] / heap.lisp
index 9f099c0..53eb2b8 100644 (file)
--- a/heap.lisp
+++ b/heap.lisp
 
 (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