diff options
| author | vimboss <devnull@localhost> | 2009-09-11 10:21:41 +0000 |
|---|---|---|
| committer | vimboss <devnull@localhost> | 2009-09-11 10:21:41 +0000 |
| commit | 60fbf2bf2e57d2364d49100ac89578768050616f (patch) | |
| tree | 5db1f5319f0abf632552d5e6446296527de490ff | |
| parent | 39f18985c9a03079eb0b223fc0e9727d2c121d54 (diff) | |
| download | vim-60fbf2bf2e57d2364d49100ac89578768050616f.tar.gz | |
| -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 bc3dd6bf..d2d9617a 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 a6d95911..767152e5 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, |