Value: extract Value::FunctionApplicationThunk

This commit is contained in:
Robert Hensing 2023-11-12 03:06:55 +01:00
parent b55203e874
commit 6af1d9f7b9

View file

@ -195,6 +195,10 @@ public:
Expr * expr; Expr * expr;
}; };
struct FunctionApplicationThunk {
Value * left, * right;
};
union union
{ {
NixInt integer; NixInt integer;
@ -211,17 +215,13 @@ public:
} bigList; } bigList;
Value * smallList[2]; Value * smallList[2];
ClosureThunk thunk; ClosureThunk thunk;
struct { FunctionApplicationThunk app;
Value * left, * right;
} app;
struct { struct {
Env * env; Env * env;
ExprLambda * fun; ExprLambda * fun;
} lambda; } lambda;
PrimOp * primOp; PrimOp * primOp;
struct { FunctionApplicationThunk primOpApp;
Value * left, * right;
} primOpApp;
ExternalValueBase * external; ExternalValueBase * external;
NixFloat fpoint; NixFloat fpoint;
}; };