[funds-cvs] r96 - trunk/funds/src/trees

[abaine at common-lisp.net]

Author: abaine
Date: Tue Jul 31 10:59:57 2007
New Revision: 96

Modified:
   trunk/funds/src/trees/constructors.lisp
Log:
superficial edit.

Modified: trunk/funds/src/trees/constructors.lisp
==============================================================================
--- trunk/funds/src/trees/constructors.lisp	(original)
+++ trunk/funds/src/trees/constructors.lisp	Tue Jul 31 10:59:57 2007
@@ -44,8 +44,6 @@
 		     :height (parent-height left right))
       (make-avl-leaf)))
 
-
-
 (defun make-heap (&key (priority 0 p-p) value 
 		  (left (make-heap-leaf)) (right (make-heap-leaf)))
   (if p-p