unbreak no-places, no-futures build
This commit is contained in:
parent
c50c23c134
commit
e803a3c15e
|
@ -6150,6 +6150,7 @@ static void mark_pruned_prefixes(struct NewGC *gc) XFORM_SKIP_PROC
|
|||
cl->vals[closure_size-1] = (Scheme_Object *)pf;
|
||||
} else {
|
||||
MZ_ASSERT(0);
|
||||
next = NULL;
|
||||
}
|
||||
clo = (Scheme_Object *)GC_resolve2(next, gc);
|
||||
}
|
||||
|
|
|
@ -183,6 +183,7 @@ THREAD_LOCAL_DECL(extern intptr_t scheme_total_gc_time);
|
|||
THREAD_LOCAL_DECL(extern int scheme_cont_capture_count);
|
||||
THREAD_LOCAL_DECL(extern int scheme_continuation_application_count);
|
||||
THREAD_LOCAL_DECL(extern struct Scheme_Prefix *scheme_prefix_finalize);
|
||||
THREAD_LOCAL_DECL(extern struct Scheme_Prefix *scheme_inc_prefix_finalize);
|
||||
|
||||
int scheme_num_types(void);
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user