函数调用错误方案

Question

我正在使用https://repl.it/languages/scheme 编译我的Scheme 代码，但遇到了一些函数调用错误。函数是：

 (define (bloop x)
      (cond
        ((null? x) 0)
        ((not (list? (car x))) 
            (+ 1 (bloop (cdr x))))
        ((eq? x ’()) (bloop (car x)))))

我想传递类似的东西：

(bloop '((1) 2 3 4))

但我明白了：

Error: execute: unbound symbol: "’"

欢迎提出任何意见、问题或疑虑。

Answer 1

排队：

((eq? x ’()) (bloop (car x)))))

’ 符号不是 ASCII 引号 '。

PS。在 Scheme 行话中，bloop 是一个过程。 Function 是数学的东西，比如“sin(x)”，但(sin x) 是实现这个函数的过程。