suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

unbreak no-JIT build

Browse Source
This commit is contained in:
Matthew Flatt 2018-08-10 09:59:15 -06:00
parent c05b9409d5
commit 0d1f4e3c63
2 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/racket/src/env.c
View File

@ -445,7 +445,9 @@ static Scheme_Env *place_instance_init(void *stack_base, int initial_main_os_thr
scheme_init_compenv_places(); scheme_init_compenv_places();
#ifdef MZ_USE_JIT
scheme_init_jitprep(); scheme_init_jitprep();
#endif
#ifdef TIME_STARTUP_PROCESS #ifdef TIME_STARTUP_PROCESS
printf("pre-process @ %" PRIdPTR "\n", scheme_get_process_milliseconds()); printf("pre-process @ %" PRIdPTR "\n", scheme_get_process_milliseconds());

2
racket/src/racket/src/linklet.c
View File

@ -1414,6 +1414,7 @@ static void *instantiate_linklet_k(void)
if (!multi) if (!multi)
v = scheme_check_one_value(v); v = scheme_check_one_value(v);
#ifdef MZ_USE_JIT
if (linklet->native_lambdas) { if (linklet->native_lambdas) {
int mc; int mc;
Scheme_Object **mv, *l; Scheme_Object **mv, *l;
@ -1443,6 +1444,7 @@ static void *instantiate_linklet_k(void)
p->ku.multiple.count = mc; p->ku.multiple.count = mc;
} }
} }
#endif
scheme_performance_record_end("instantiate", &perf_state); scheme_performance_record_end("instantiate", &perf_state);