File tree 1 file changed +9
-4
lines changed
1 file changed +9
-4
lines changed Original file line number Diff line number Diff line change 101
101
$undef))
102
102
103
103
(define ($make-function variables body env)
104
- (lambda values ; ; A departure: rather than accepting an argument
105
- ; ; that is the list of arguments, expect to be
106
- ; ; applied to a list of arguments. This makes lifting
107
- ; ; and dropping procedures easier.
104
+ (lambda values
105
+ ; ; A departure: rather than accepting an argument that is the list
106
+ ; ; of arguments, expect to be applied to a list of arguments. This
107
+ ; ; makes lifting and dropping procedures easier. However, it
108
+ ; ; means an env (e.g., a dynamic env) cannot be passed as well.
108
109
($eprogn body ($extend variables values env))))
109
110
110
111
(define ($invoke fn values)
142
143
(toplevel)))))
143
144
(toplevel))
144
145
146
+ ; ; arguably the book does this more nicely by capturing the
147
+ ; ; continuation on invocation of repl and supplying that as the 'end'
148
+ ; ; function.
149
+
145
150
; ; Exercise 1.1
146
151
147
152
; ; Modify to trace function invocations
You can’t perform that action at this time.
0 commit comments