Fixed a problem with forward references in the repl which used to
get a location different from the one assigned when the variable is defined.
This commit is contained in:
parent
6511dd1002
commit
71640d11bf
|
@ -592,6 +592,7 @@
|
|||
;;; fabricate binding
|
||||
(let ([rib (interaction-env-rib env)])
|
||||
(let-values ([(lab loc_) (gen-define-label+loc id rib)])
|
||||
(extend-rib! rib id lab)
|
||||
lab)))]
|
||||
[else #f])))
|
||||
|
||||
|
|
Loading…
Reference in New Issue