[funds-cvs] r162 - trunk/funds/src/heap

[abaine at common-lisp.net]

Author: abaine
Date: Sun Aug 19 12:20:17 2007
New Revision: 162

Modified:
   trunk/funds/src/heap/heap-first.lisp
Log:
Documented heap-first.

Modified: trunk/funds/src/heap/heap-first.lisp
==============================================================================
--- trunk/funds/src/heap/heap-first.lisp	(original)
+++ trunk/funds/src/heap/heap-first.lisp	Sun Aug 19 12:20:17 2007
@@ -18,4 +18,5 @@
 (in-package :funds)
 
 (defun heap-first (heap)
+  "The first value on the given heap."
   (bt-value heap))