From 2f6e00770255d15b178cfcdcd26556343acdfd11 Mon Sep 17 00:00:00 2001 From: erana Date: Sat, 21 Jan 2012 16:05:00 +0900 Subject: [PATCH] xanadu - btree --- scsh/xanadu/b-tree.scm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/scsh/xanadu/b-tree.scm b/scsh/xanadu/b-tree.scm index cd63156..6aea7fd 100644 --- a/scsh/xanadu/b-tree.scm +++ b/scsh/xanadu/b-tree.scm @@ -26,6 +26,9 @@ ;;; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF ;;; THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. +;;FIXME +;; use lets for vectorrefs etc. + (define (make-b-tree-node l r) (let ((numitems 0) (numnodes 0)