Mercurial > vim

comparison src/if_perl.xs @ 714:0f9f4761ad9c v7.0216

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
updated for version 7.0216
author vimboss
date Mon, 06 Mar 2006 23:29:24 +0000
parents 52e76e2b5b65
children a07007166d51
comparison
equal deleted inserted replaced
713:0c381fb7846c 714:0f9f4761ad9c
425 /* 425 /*
426 * This stub is needed because an "#ifdef FEAT_EVAL" around Eval() doesn't 426 * This stub is needed because an "#ifdef FEAT_EVAL" around Eval() doesn't
427 * work properly. 427 * work properly.
428 */ 428 */
429 char_u * 429 char_u *
430 eval_to_string(arg, nextcmd) 430 eval_to_string(arg, nextcmd, dolist)
431 char_u *arg; 431 char_u *arg;
432 char_u **nextcmd; 432 char_u **nextcmd;
433 int dolist;
433 { 434 {
434 return NULL; 435 return NULL;
435 } 436 }
436 #endif 437 #endif
437 438
825 char *str; 826 char *str;
826 827
827 PREINIT: 828 PREINIT:
828 char_u *value; 829 char_u *value;
829 PPCODE: 830 PPCODE:
830 value = eval_to_string((char_u *)str, (char_u**)0); 831 value = eval_to_string((char_u *)str, (char_u **)0, TRUE);
831 if (value == NULL) 832 if (value == NULL)
832 { 833 {
833 XPUSHs(sv_2mortal(newSViv(0))); 834 XPUSHs(sv_2mortal(newSViv(0)));
834 XPUSHs(sv_2mortal(newSVpv("", 0))); 835 XPUSHs(sv_2mortal(newSVpv("", 0)));
835 } 836 }