diff options
| author | Bram Moolenaar <Bram@vim.org> | 2009-09-11 10:21:41 +0000 |
|---|---|---|
| committer | Bram Moolenaar <Bram@vim.org> | 2009-09-11 10:21:41 +0000 |
| commit | e484c94514acda8bb0a08a30ee0b20b95992da7b (patch) | |
| tree | 5db1f5319f0abf632552d5e6446296527de490ff | |
| parent | 8ae39d843285c440a79ca17fe267ff6e621b3d75 (diff) | |
updated for version 7.2-247v7.2.247
| -rw-r--r-- | src/if_mzsch.c | 8 | ||||
| -rw-r--r-- | src/version.c | 2 |
2 files changed, 7 insertions, 3 deletions
diff --git a/src/if_mzsch.c b/src/if_mzsch.c index bc3dd6bf59..d2d9617a76 100644 --- a/src/if_mzsch.c +++ b/src/if_mzsch.c @@ -635,8 +635,10 @@ dynamic_mzscheme_end(void) #endif /* DYNAMIC_MZSCHEME */ /* need to put it here for dynamic stuff to work */ -#ifdef INCLUDE_MZSCHEME_BASE +#if defined(INCLUDE_MZSCHEME_BASE) # include "mzscheme_base.c" +#elif MZSCHEME_VERSION_MAJOR >= 400 +# error MzScheme 4.x must include mzscheme_base.c, for MinGW32 you need to define MZSCHEME_GENERATE_BASE=yes #endif /* @@ -875,14 +877,14 @@ startup_mzscheme(void) #ifdef INCLUDE_MZSCHEME_BASE { /* - * versions 4.x do not provide Scheme bindings by defaults + * versions 4.x do not provide Scheme bindings by default * we need to add them explicitly */ Scheme_Object *scheme_base_symbol = NULL; MZ_GC_DECL_REG(1); MZ_GC_VAR_IN_REG(0, scheme_base_symbol); MZ_GC_REG(); - /* invoke function from generated and included base.c */ + /* invoke function from generated and included mzscheme_base.c */ declare_modules(environment); scheme_base_symbol = scheme_intern_symbol("scheme/base"); MZ_GC_CHECK(); diff --git a/src/version.c b/src/version.c index a6d959115f..767152e50f 100644 --- a/src/version.c +++ b/src/version.c @@ -677,6 +677,8 @@ static char *(features[]) = static int included_patches[] = { /* Add new patch number below this line */ /**/ + 247, +/**/ 246, /**/ 245, |