Use FAnn instead of get_fann(Body)
This commit is contained in:
parent
7c67561585
commit
9208a5974e
@ -1309,7 +1309,7 @@ lifted_fun([Z], Xs, Body) ->
|
|||||||
lifted_fun(FVs, Xs, Body) ->
|
lifted_fun(FVs, Xs, Body) ->
|
||||||
Z = "%env",
|
Z = "%env",
|
||||||
FAnn = get_fann(Body),
|
FAnn = get_fann(Body),
|
||||||
Proj = fun({I, Y}, E) -> {'let', get_fann(Body), Y, {proj, FAnn, {var, FAnn, Z}, I - 1}, E} end,
|
Proj = fun({I, Y}, E) -> {'let', FAnn, Y, {proj, FAnn, {var, FAnn, Z}, I - 1}, E} end,
|
||||||
#{ attrs => [private],
|
#{ attrs => [private],
|
||||||
args => [{Z, any} | [{X, any} || X <- Xs]],
|
args => [{Z, any} | [{X, any} || X <- Xs]],
|
||||||
return => any,
|
return => any,
|
||||||
|
Loading…
x
Reference in New Issue
Block a user