racket - hc-append 模块中的未绑定(bind)标识符

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-apppend:应该是hc-append。