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 /src/if_mzsch.c | |
| parent | 8ae39d843285c440a79ca17fe267ff6e621b3d75 (diff) | |
| download | vim-git-e484c94514acda8bb0a08a30ee0b20b95992da7b.tar.gz | |
updated for version 7.2-247v7.2.247
Diffstat (limited to 'src/if_mzsch.c')
| -rw-r--r-- | src/if_mzsch.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/src/if_mzsch.c b/src/if_mzsch.c index bc3dd6bf5..d2d9617a7 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(); |