Mercurial > vim
diff src/if_mzsch.c @ 7813:744c66477ba9 v7.4.1203
commit https://github.com/vim/vim/commit/4349c57543a98dc417b74da5a08c326337aa0bd3
Author: Bram Moolenaar <Bram@vim.org>
Date: Sat Jan 30 13:28:28 2016 +0100
patch 7.4.1203
Problem: Still more files still using __ARGS.
Solution: Remove __ARGS in really the last files.
| author | Christian Brabandt <cb@256bit.org> |
|---|---|
| date | Sat, 30 Jan 2016 13:30:04 +0100 |
| parents | e493c5dd85b3 |
| children | bcef391c101c |
line wrap: on
line diff
--- a/src/if_mzsch.c +++ b/src/if_mzsch.c @@ -29,6 +29,19 @@ * depend". */ #if defined(FEAT_MZSCHEME) || defined(PROTO) +#ifdef PROTO +typedef int Scheme_Object; +typedef int Scheme_Closed_Prim; +typedef int Scheme_Env; +typedef int Scheme_Hash_Table; +typedef int Scheme_Type; +typedef int Scheme_Thread; +typedef int Scheme_Closed_Prim; +typedef int mzshort; +typedef int Scheme_Prim; +typedef int HINSTANCE; +#endif + /* * scheme_register_tls_space is only available on 32-bit Windows until * racket-6.3. See @@ -248,7 +261,7 @@ static int window_fixup_proc(void *obj) # define BUFFER_REF(buf) (vim_mz_buffer *)((buf)->b_mzscheme_ref) #endif -#ifdef DYNAMIC_MZSCHEME +#if defined(DYNAMIC_MZSCHEME) || defined(PROTO) static Scheme_Object *dll_scheme_eof; static Scheme_Object *dll_scheme_false; static Scheme_Object *dll_scheme_void; @@ -406,6 +419,8 @@ static void (*dll_scheme_register_embedd static void (*dll_scheme_set_config_path)(Scheme_Object *p); # endif +#if defined(DYNAMIC_MZSCHEME) /* not when defined(PROTO) */ + /* arrays are imported directly */ # define scheme_eof dll_scheme_eof # define scheme_false dll_scheme_false @@ -539,6 +554,8 @@ scheme_external_get_thread_local_variabl # endif # endif +#endif + typedef struct { char *name; @@ -866,7 +883,7 @@ mzvim_check_threads(void) } #endif -#ifdef MZSCHEME_GUI_THREADS +#if defined(MZSCHEME_GUI_THREADS) || defined(PROTO) static void setup_timer(void); static void remove_timer(void);