Mercurial > vim
changeset 1950:1c64bf25bbcd v7.2.247
updated for version 7.2-247
| author | vimboss |
|---|---|
| date | Fri, 11 Sep 2009 10:21:41 +0000 |
| parents | 1ee00a062acb |
| children | f234c87ac7e9 |
| files | src/if_mzsch.c src/version.c |
| diffstat | 2 files changed, 7 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- 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();