Mercurial > vim
comparison src/eval.c @ 4074:16e8a09e8ab0 v7.3.791
updated for version 7.3.791
Problem: MzScheme interface doesn't work propely.
Solution: Make it work better. (Sergey Khorev)
author | Bram Moolenaar <bram@vim.org> |
---|---|
date | Wed, 30 Jan 2013 14:55:42 +0100 |
parents | 42edc5dac33c |
children | 2b340e5c5baa |
comparison
equal
deleted
inserted
replaced
4073:e362db8b2d7b | 4074:16e8a09e8ab0 |
---|---|
14331 char_u buf[NUMBUFLEN]; | 14331 char_u buf[NUMBUFLEN]; |
14332 | 14332 |
14333 str = get_tv_string_buf(&argvars[0], buf); | 14333 str = get_tv_string_buf(&argvars[0], buf); |
14334 do_mzeval(str, rettv); | 14334 do_mzeval(str, rettv); |
14335 } | 14335 } |
14336 | |
14337 void | |
14338 mzscheme_call_vim(name, args, rettv) | |
14339 char_u *name; | |
14340 typval_T *args; | |
14341 typval_T *rettv; | |
14342 { | |
14343 typval_T argvars[3]; | |
14344 | |
14345 argvars[0].v_type = VAR_STRING; | |
14346 argvars[0].vval.v_string = name; | |
14347 copy_tv(args, &argvars[1]); | |
14348 argvars[2].v_type = VAR_UNKNOWN; | |
14349 f_call(argvars, rettv); | |
14350 clear_tv(&argvars[1]); | |
14351 } | |
14336 #endif | 14352 #endif |
14337 | 14353 |
14338 /* | 14354 /* |
14339 * "nextnonblank()" function | 14355 * "nextnonblank()" function |
14340 */ | 14356 */ |