Mercurial > vim
changeset 1284:30f057789239
updated for version 7.1
author | vimboss |
---|---|
date | Sat, 12 May 2007 15:32:12 +0000 |
parents | 5da72ac36f91 |
children | 463e25d28b33 |
files | Contents runtime/doc/howto.txt runtime/doc/quickfix.txt src/if_mzsch.c |
diffstat | 4 files changed, 15 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/Contents +++ b/Contents @@ -9,10 +9,10 @@ Vim Vi IMproved. A clone of the UNIX t messages, shows current file name in window title, on-line help, rectangular cut/paste, etc., etc., etc... - Version 7.1b. Also runs under UNIX, MSDOS and other systems. - vim71brt.tgz contains the documentation and syntax files. - vim71bbin.tgz contains the binaries. - vim71bsrc.tgz contains the sources. + Version 7.1. Also runs under UNIX, MSDOS and other systems. + vim71rt.tgz contains the documentation and syntax files. + vim71bin.tgz contains the binaries. + vim71src.tgz contains the sources. Author: Bram Moolenaar et al.
--- a/runtime/doc/howto.txt +++ b/runtime/doc/howto.txt @@ -1,4 +1,4 @@ -*howto.txt* For Vim version 7.1b. Last change: 2006 Apr 02 +*howto.txt* For Vim version 7.1. Last change: 2006 Apr 02 VIM REFERENCE MANUAL by Bram Moolenaar
--- a/runtime/doc/quickfix.txt +++ b/runtime/doc/quickfix.txt @@ -1,4 +1,4 @@ -*quickfix.txt* For Vim version 7.1b. Last change: 2007 May 10 +*quickfix.txt* For Vim version 7.1. Last change: 2007 May 10 VIM REFERENCE MANUAL by Bram Moolenaar
--- a/src/if_mzsch.c +++ b/src/if_mzsch.c @@ -22,6 +22,7 @@ */ #include "vim.h" + #include "if_mzsch.h" /* Only do the following when the feature is enabled. Needed for "make @@ -219,7 +220,11 @@ static Scheme_Object *(*dll_scheme_byte_ # endif static void (*dll_scheme_close_input_port)(Scheme_Object *port); static void (*dll_scheme_count_lines)(Scheme_Object *port); +#if MZSCHEME_VERSION_MAJOR < 360 static Scheme_Object *(*dll_scheme_current_continuation_marks)(void); +#else +static Scheme_Object *(*dll_scheme_current_continuation_marks)(Scheme_Object *prompt_tag); +#endif static void (*dll_scheme_display)(Scheme_Object *obj, Scheme_Object *port); static char *(*dll_scheme_display_to_string)(Scheme_Object *obj, long *len); static int (*dll_scheme_eq)(Scheme_Object *obj1, Scheme_Object *obj2); @@ -2441,8 +2446,11 @@ raise_vim_exn(const char *add_info) else argv[0] = scheme_make_string(_("Vim error")); - /* TODO: proper argument */ +#if MZSCHEME_VERSION_MAJOR < 360 + argv[1] = scheme_current_continuation_marks(); +#else argv[1] = scheme_current_continuation_marks(NULL); +#endif scheme_raise(scheme_make_struct_instance(vim_exn, 2, argv)); }