@@ -64,7 +64,7 @@ def _letimpl(bindings, body, mode):
6464 body = hq [namelambda (ast_literal [body ], u ["{}_body" .format (mode )])]
6565
6666 # CAUTION: letdoutil.py relies on:
67- # - the literal name "letter" to detect expanded forms
67+ # - the literal name "letter" to detect expanded let forms
6868 # - the "mode" kwarg to detect let/letrec mode
6969 # - the absence of an "_envname" kwarg to detect this tree represents a let-expr (vs. a let-decorator),
7070 # seeing only the Call node
@@ -190,7 +190,7 @@ def _dletimpl(bindings, body, mode, kind):
190190 letter = dletf if kind == "decorate" else bletf
191191 bindings = [q [(u [k ], ast_literal [v ])] for k , v in zip (names , values )]
192192 # CAUTION: letdoutil.py relies on:
193- # - the literal name "letter" to detect expanded forms
193+ # - the literal name "letter" to detect expanded let forms
194194 # - the "mode" kwarg to detect let/letrec mode
195195 # - the presence of an "_envname" kwarg to detect this tree represents a let-decorator (vs. a let-expr),
196196 # seeing only the Call node
@@ -301,6 +301,7 @@ def find_localdefs(tree, collect, **kw):
301301 expr = hq [namelambda (ast_literal [expr ], u ["do_line{}" .format (j )])]
302302 names = names + newnames
303303 lines .append (expr )
304+ # CAUTION: letdoutil.py depends on the literal name "dof" to detect expanded do forms.
304305 return hq [dof (ast_literal [lines ])]
305306
306307@macro_stub
0 commit comments