From 4f9d662103bda4e3638784264977fa7ff2ef7d91 Mon Sep 17 00:00:00 2001 From: Richard Brooksby Date: Mon, 15 Feb 2016 23:39:24 +0000 Subject: [PATCH] Bringing scheme example up to date with interface changes. Copied from Perforce Change: 189206 ServerID: perforce.ravenbrook.com --- mps/example/scheme/scheme-advanced.c | 3 +-- mps/example/scheme/scheme.c | 3 +-- 2 files changed, 2 insertions(+), 4 deletions(-) diff --git a/mps/example/scheme/scheme-advanced.c b/mps/example/scheme/scheme-advanced.c index d2275da895f..aaf16824498 100644 --- a/mps/example/scheme/scheme-advanced.c +++ b/mps/example/scheme/scheme-advanced.c @@ -4582,8 +4582,7 @@ int main(int argc, char *argv[]) need to be scanned by the MPS because we are passing references to objects around in C parameters, return values, and keeping them in automatic local variables. See topic/root. */ - res = mps_root_create_stack(®_root, arena, mps_rank_ambig(), - 0, thread, sizeof(mps_word_t) - 1, 0, marker); + res = mps_root_create_thread(®_root, arena, thread, marker); if (res != MPS_RES_OK) error("Couldn't create root"); /* Make sure we can pick up finalization messages. */ diff --git a/mps/example/scheme/scheme.c b/mps/example/scheme/scheme.c index ea5583c5f19..69d34612660 100644 --- a/mps/example/scheme/scheme.c +++ b/mps/example/scheme/scheme.c @@ -4477,8 +4477,7 @@ int main(int argc, char *argv[]) need to be scanned by the MPS because we are passing references to objects around in C parameters, return values, and keeping them in automatic local variables. See topic/root. */ - res = mps_root_create_stack(®_root, arena, mps_rank_ambig(), - 0, thread, sizeof(mps_word_t) - 1, 0, marker); + res = mps_root_create_thread(®_root, arena, thread, marker); if (res != MPS_RES_OK) error("Couldn't create root"); /* Make sure we can pick up finalization messages. */