hc-在模块中附加未绑定标识符

Question

您好，我正在关注the quick introduction to racket。在第 5 章中，他们提出了这段代码（运行良好）：

(define (four p)
  (define two-p (hc-append p p))
  (vc-append two-p two-p))

通常会使用 let 来编写，所以我编写了我的代码：

#lang slideshow

(define (square n)
  (filled-rectangle n n))
(define (four p)
  (let ([two-p (hc-apppend p p)])
  (vc-append two-p two-p)))

但它不起作用。 错误信息是：

expand: unbound identifier in module in: hc-apppend

Answer 1

只是检查一下：你还记得吗

#lang slideshow

作为第一行？

另外，计算 p 个字符的数量！它是 hc-append。错误提到hc-append：应该是hc-append。