让 SICP 在 Racket 上运行：练习 4.48，无法让 load() 工作

Question

我正在尝试解决 SICP 的练习 4.48。我试图让加载机制运行，即加载 ch4-mceval.scm （期望所有定义都可用），但我似乎没有得到正确的语法。

我尝试过

#lang Planet neil/sicp和#lang sicp，尝试过(load "ch4-mceval.scm")和(#%require "ch4-mceval.scm")，全部失败。

我有一个笨拙的解决方法，我基本上将两个文件合并为一个，但我发现这真的很难看。

任何帮助将不胜感激。

ch4-ambeval.rkt 开始，尝试加载 ch4-mceval.rkt

#lang planet neil/sicp ; added 07 MAR 2022
;;;;AMB EVALUATOR FROM SECTION 4.3 OF
;;;; STRUCTURE AND INTERPRETATION OF COMPUTER PROGRAMS

;;;;Matches code in ch4.scm.
;;;; To run the sample programs and exercises, code below also includes
;;;; -- enlarged primitive-procedures list
;;;; -- support for Let (as noted in footnote 56, p.428)

;;;;This file can be loaded into Scheme as a whole.
;;;;**NOTE**This file loads the metacircular evaluator of
;;;;  sections 4.1.1-4.1.4, since it uses the expression representation,
;;;;  environment representation, etc.
;;;;  You may need to change the (load ...) expression to work in your
;;;;  version of Scheme.
;;;;**WARNING: Don't load mceval twice (or you'll lose the primitives
;;;;  interface, due to renamings of apply).

;;;;Then you can initialize and start the evaluator by evaluating
;;;; the two lines at the end of the file ch4-mceval.scm
;;;; (setting up the global environment and starting the driver loop).
;;;;In the driver loop, do
;(define (require p)
;  (if (not p) (amb)))


;;**implementation-dependent loading of evaluator file
;;Note: It is loaded first so that the section 4.2 definition
;; of eval overrides the definition from 4.1.1
(load "ch4-mceval.scm")

Answer 1

我在 DrRacket 中尝试了 mceval.scm， load 似乎没有任何问题。

PS我没有planet neil/sicp，因为Racket（>8.0）已经内置了sicp语言。