static lispobj *
pa_alloc(int bytes, int page_type_flag)
{
+ lispobj *result;
+
/* FIXME: this is not pseudo atomic at all, but is called only from
* interrupt safe places like interrupt handlers. MG - 2005-08-09 */
result = dynamic_space_free_pointer;
lispobj
alloc_code_object (unsigned boxed, unsigned unboxed) {
struct code * code;
- unsigned size;
boxed = make_fixnum(boxed + 1 + 4); /* 4 == trace_table_offset offset in words */
boxed &= ~LOWTAG_MASK;