我正在尝试在球拍中实现 bst(二叉搜索树)。bst 是一个递归列表(列表 x leftChild rightChild),其中 leftChild 和 rightChild 本身就是列表 我写了以下代码
(define (insert bst x)(
(cond
[(null? bst) (append bst (list x '() '()))]
[(<= x (car bst)) (insert (cadr bst) x)]
[else (insert (caddr bst) x)]
)))
当我写
(insert (insert null 8) 9)
它给出了一个错误:函数调用:期望在左括号后有一个函数,但收到了(列表 8 为空) 有人可以解释一下吗?