120
116
* Allocate heap memory, first on the ordinary heap;
121
117
* failing that, in a heap fragment.
124
120
(ASSERT_EXPR((sz) >= 0), \
125
121
ErtsHAllocLockCheck(p), \
126
122
(IS_FORCE_HEAP_FRAGS || (((HEAP_LIMIT(p) - HEAP_TOP(p)) < (sz))) \
128
124
: (INIT_HEAP_MEM(p,sz), \
129
125
HEAP_TOP(p) = HEAP_TOP(p) + (sz), HEAP_TOP(p) - (sz))))
127
#define HAlloc(P, SZ) HAllocX(P,SZ,0)
132
129
#define HRelease(p, endp, ptr) \