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

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))