瀏覽代碼

Fix a bug.

NoahStoryM 2 年之前
父節點
當前提交
87b3460b17
共有 1 個文件被更改,包括 2 次插入2 次删除
  1. 2 2
      book.tex

+ 2 - 2
book.tex

@@ -1420,8 +1420,8 @@ figure~\ref{fig:interp_Lint}.
      (define v2 (interp_exp e2))
      (fx+ v1 v2)]
     [(Prim '- (list e1 e2))
-     (define v1 ((interp_exp env) e1))
-     (define v2 ((interp_exp env) e2))
+     (define v1 (interp_exp e1))
+     (define v2 (interp_exp e2))
      (fx- v1 v2)]))
 
 (define (interp_Lint p)