forked from lix-project/lix
use util.hh class instead of local
This commit is contained in:
parent
69ea265fd2
commit
6ac8200ff5
|
@ -846,15 +846,6 @@ static RegisterPrimOp primop_floor({
|
||||||
.fun = prim_floor,
|
.fun = prim_floor,
|
||||||
});
|
});
|
||||||
|
|
||||||
class Counter
|
|
||||||
{
|
|
||||||
private:
|
|
||||||
int &counter;
|
|
||||||
public:
|
|
||||||
Counter(int &counter) :counter(counter) { counter++; }
|
|
||||||
~Counter() { counter--; }
|
|
||||||
};
|
|
||||||
|
|
||||||
/* Try evaluating the argument. Success => {success=true; value=something;},
|
/* Try evaluating the argument. Success => {success=true; value=something;},
|
||||||
* else => {success=false; value=false;} */
|
* else => {success=false; value=false;} */
|
||||||
static void prim_tryEval(EvalState & state, const PosIdx pos, Value * * args, Value & v)
|
static void prim_tryEval(EvalState & state, const PosIdx pos, Value * * args, Value & v)
|
||||||
|
@ -862,7 +853,7 @@ static void prim_tryEval(EvalState & state, const PosIdx pos, Value * * args, Va
|
||||||
auto attrs = state.buildBindings(2);
|
auto attrs = state.buildBindings(2);
|
||||||
|
|
||||||
/* increment state.trylevel, and decrement it when this function returns. */
|
/* increment state.trylevel, and decrement it when this function returns. */
|
||||||
Counter trylevel(state.trylevel);
|
MaintainCount trylevel(state.trylevel);
|
||||||
|
|
||||||
void (* savedDebugRepl)(ref<EvalState> es, const ValMap & extraEnv) = nullptr;
|
void (* savedDebugRepl)(ref<EvalState> es, const ValMap & extraEnv) = nullptr;
|
||||||
if (state.debugRepl && state.ignoreTry)
|
if (state.debugRepl && state.ignoreTry)
|
||||||
|
|
Loading…
Reference in a new issue