mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 05:39:18 +02:00
parent
447eb20a07
commit
217a231064
1 changed files with 1 additions and 1 deletions
2
main.c
2
main.c
|
@ -682,7 +682,7 @@ void run_main (int argc, char **argv) {
|
||||||
#ifdef EMSCRIPTEN
|
#ifdef EMSCRIPTEN
|
||||||
void sexp_resume() {
|
void sexp_resume() {
|
||||||
sexp_gc_var1(tmp);
|
sexp_gc_var1(tmp);
|
||||||
sexp_gc_preserve(sexp_resume_ctx, tmp);
|
sexp_gc_preserve1(sexp_resume_ctx, tmp);
|
||||||
tmp = sexp_list1(sexp_resume_ctx, SEXP_VOID);
|
tmp = sexp_list1(sexp_resume_ctx, SEXP_VOID);
|
||||||
if (sexp_applicablep(sexp_resume_proc)) {
|
if (sexp_applicablep(sexp_resume_proc)) {
|
||||||
sexp_resume_proc = check_exception(sexp_resume_ctx, sexp_apply(sexp_resume_ctx, sexp_resume_proc, tmp));
|
sexp_resume_proc = check_exception(sexp_resume_ctx, sexp_apply(sexp_resume_ctx, sexp_resume_proc, tmp));
|
||||||
|
|
Loading…
Add table
Reference in a new issue