yshui/lix
0
0
Fork 0
forked from lix-project/lix
Code Pull requests Activity

Don't hang when calling an attrset

Browse source 
Fixes #5565.
This commit is contained in:
Eelco Dolstra 2021-11-16 17:44:19 +01:00
parent 8c93a481af
commit e41cf8511f
1 changed files with 10 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

20
src/libexpr/eval.cc
View file

@ -1275,6 +1275,8 @@ void EvalState::callFunction(Value & fun, size_t nrArgs, Value * * args, Value &
} }
}; };
Attr * functor;
while (nrArgs > 0) { while (nrArgs > 0) {
if (vCur.isLambda()) { if (vCur.isLambda()) {
@ -1403,16 +1405,14 @@ void EvalState::callFunction(Value & fun, size_t nrArgs, Value * * args, Value &
} }
} }
else if (vCur.type() == nAttrs) { else if (vCur.type() == nAttrs && (functor = vCur.attrs->get(sFunctor))) {
if (auto functor = vCur.attrs->get(sFunctor)) { /* 'vCur" may be allocated on the stack of the calling
/* 'vCur" may be allocated on the stack of the calling function, but for functors we may keep a reference, so
function, but for functors we may keep a reference, heap-allocate a copy and use that instead. */
so heap-allocate a copy and use that instead. */ Value * args2[] = {allocValue()};
Value * args2[] = {allocValue()}; *args2[0] = vCur;
*args2[0] = vCur; /* !!! Should we use the attr pos here? */
/* !!! Should we use the attr pos here? */ callFunction(*functor->value, 1, args2, vCur, pos);
callFunction(*functor->value, 1, args2, vCur, pos);
}
} }
else else