Calling a function returned by another function directly causes wrong evaluation environment

[sebffischer]

> f = fn() {
:   a = 1
:   fn() print(a)
: }
function() {
  a <- 1
  function() print(a)
}
<environment 0x6000029303d8>
> f()()
Error: object 'a' not found
backtrace:
1: f()() => None
2: print(a) => None
3: a => None
> 

[sebffischer]

Interestingly, if we bind the return value first and then call the closure, it works.

> f = fn() {
:   a = 1
:   fn() a
: }
function() {
  a <- 1
  function() a
}
<environment 0x6000007bc018>
> g = f()
function() a
<environment 0x6000007bc2d8>
> g()
[1] 1
> f()()
Error: object 'a' not found
backtrace:
1: f()() => None
> f()()
> (f())()
Error: object 'a' not found
backtrace:
1: (f())() => None
> 

[sebffischer]

Maybe we assign promises the wrong environment somewhere.