forked from lix-project/lix
60 lines
1.1 KiB
C++
60 lines
1.1 KiB
C++
|
#include "attr-set.hh"
|
||
|
#include "eval.hh"
|
||
|
|
||
|
#include <algorithm>
|
||
|
|
||
|
|
||
|
namespace nix {
|
||
|
|
||
|
|
||
|
static void * allocBytes(size_t n)
|
||
|
{
|
||
|
void * p;
|
||
|
#if HAVE_BOEHMGC
|
||
|
p = GC_malloc(n);
|
||
|
#else
|
||
|
p = malloc(n);
|
||
|
#endif
|
||
|
if (!p) throw std::bad_alloc();
|
||
|
return p;
|
||
|
}
|
||
|
|
||
|
|
||
|
/* Allocate a new array of attributes for an attribute set with a specific
|
||
|
capacity. The space is implicitly reserved after the Bindings
|
||
|
structure. */
|
||
|
Bindings * EvalState::allocBindings(Bindings::size_t capacity)
|
||
|
{
|
||
|
return new (allocBytes(sizeof(Bindings) + sizeof(Attr) * capacity)) Bindings(capacity);
|
||
|
}
|
||
|
|
||
|
|
||
|
void EvalState::mkAttrs(Value & v, unsigned int expected)
|
||
|
{
|
||
|
clearValue(v);
|
||
|
v.type = tAttrs;
|
||
|
v.attrs = allocBindings(expected);
|
||
|
nrAttrsets++;
|
||
|
nrAttrsInAttrsets += expected;
|
||
|
}
|
||
|
|
||
|
|
||
|
/* Create a new attribute named 'name' on an existing attribute set stored
|
||
|
in 'vAttrs' and return the newly allocated Value which is associated with
|
||
|
this attribute. */
|
||
|
Value * EvalState::allocAttr(Value & vAttrs, const Symbol & name)
|
||
|
{
|
||
|
Value * v = allocValue();
|
||
|
vAttrs.attrs->push_back(Attr(name, v));
|
||
|
return v;
|
||
|
}
|
||
|
|
||
|
|
||
|
void Bindings::sort()
|
||
|
{
|
||
|
std::sort(begin(), end());
|
||
|
}
|
||
|
|
||
|
|
||
|
}
|