Mercurial > vim

comparison src/ex_docmd.c @ 14:946da5994c01

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
updated for version 7.0006
author vimboss
date Mon, 05 Jul 2004 15:58:32 +0000
parents 4424b47a0797
children 3ba373b54370
comparison
equal deleted inserted replaced
13:24d5189d3956 14:946da5994c01
126 #endif 126 #endif
127 127
128 static int check_more __ARGS((int, int)); 128 static int check_more __ARGS((int, int));
129 static linenr_T get_address __ARGS((char_u **, int skip, int to_other_file)); 129 static linenr_T get_address __ARGS((char_u **, int skip, int to_other_file));
130 #if !defined(FEAT_PERL) || !defined(FEAT_PYTHON) || !defined(FEAT_TCL) \ 130 #if !defined(FEAT_PERL) || !defined(FEAT_PYTHON) || !defined(FEAT_TCL) \
131 || !defined(FEAT_RUBY) 131 || !defined(FEAT_RUBY) || !defined(FEAT_MZSCHEME)
132 static void ex_script_ni __ARGS((exarg_T *eap)); 132 static void ex_script_ni __ARGS((exarg_T *eap));
133 #endif 133 #endif
134 static char_u *invalid_range __ARGS((exarg_T *eap)); 134 static char_u *invalid_range __ARGS((exarg_T *eap));
135 static void correct_range __ARGS((exarg_T *eap)); 135 static void correct_range __ARGS((exarg_T *eap));
136 static char_u *repl_cmdline __ARGS((exarg_T *eap, char_u *src, int srclen, char_u *repl, char_u **cmdlinep)); 136 static char_u *repl_cmdline __ARGS((exarg_T *eap, char_u *src, int srclen, char_u *repl, char_u **cmdlinep));
217 # define do_scscope ex_ni 217 # define do_scscope ex_ni
218 # define do_cstag ex_ni 218 # define do_cstag ex_ni
219 #endif 219 #endif
220 #ifndef FEAT_SYN_HL 220 #ifndef FEAT_SYN_HL
221 # define ex_syntax ex_ni 221 # define ex_syntax ex_ni
222 #endif
223 #ifndef FEAT_MZSCHEME
224 # define ex_mzscheme ex_script_ni
225 # define ex_mzfile ex_ni
222 #endif 226 #endif
223 #ifndef FEAT_PERL 227 #ifndef FEAT_PERL
224 # define ex_perl ex_script_ni 228 # define ex_perl ex_script_ni
225 # define ex_perldo ex_ni 229 # define ex_perldo ex_ni
226 #endif 230 #endif
2387 case CMD_keepmarks: 2391 case CMD_keepmarks:
2388 case CMD_leftabove: 2392 case CMD_leftabove:
2389 case CMD_let: 2393 case CMD_let:
2390 case CMD_lockmarks: 2394 case CMD_lockmarks:
2391 case CMD_match: 2395 case CMD_match:
2396 case CMD_mzscheme:
2392 case CMD_perl: 2397 case CMD_perl:
2393 case CMD_psearch: 2398 case CMD_psearch:
2394 case CMD_python: 2399 case CMD_python:
2395 case CMD_return: 2400 case CMD_return:
2396 case CMD_rightbelow: 2401 case CMD_rightbelow:
3805 if (!eap->skip) 3810 if (!eap->skip)
3806 eap->errmsg = (char_u *)N_("E319: Sorry, the command is not available in this version"); 3811 eap->errmsg = (char_u *)N_("E319: Sorry, the command is not available in this version");
3807 } 3812 }
3808 3813
3809 #if !defined(FEAT_PERL) || !defined(FEAT_PYTHON) || !defined(FEAT_TCL) \ 3814 #if !defined(FEAT_PERL) || !defined(FEAT_PYTHON) || !defined(FEAT_TCL) \
3810 || !defined(FEAT_RUBY) 3815 || !defined(FEAT_RUBY) || !defined(FEAT_MZSCHEME)
3811 /* 3816 /*
3812 * Function called for script command which is Not Implemented. NI! 3817 * Function called for script command which is Not Implemented. NI!
3813 * Skips over ":perl <<EOF" constructs. 3818 * Skips over ":perl <<EOF" constructs.
3814 */ 3819 */
3815 static void 3820 static void
7978 vim_free(arg); 7983 vim_free(arg);
7979 #endif 7984 #endif
7980 } 7985 }
7981 7986
7982 /* 7987 /*
7983 * ":startinsert" 7988 * ":startinsert" and ":startreplace"
7984 */ 7989 */
7985 static void 7990 static void
7986 ex_startinsert(eap) 7991 ex_startinsert(eap)
7987 exarg_T *eap; 7992 exarg_T *eap;
7988 { 7993 {
7989 if (eap->forceit) 7994 if (eap->forceit)
7990 { 7995 {
7991 coladvance((colnr_T)MAXCOL); 7996 coladvance((colnr_T)MAXCOL);
7992 curwin->w_curswant = MAXCOL; 7997 curwin->w_curswant = MAXCOL;
7993 curwin->w_set_curswant = FALSE; 7998 curwin->w_set_curswant = FALSE;
7994 restart_edit = 'a'; 7999 if (eap->cmdidx == CMD_startinsert)
8000 restart_edit = 'a';
8001 else
8002 restart_edit = 'R';
7995 } 8003 }
7996 else 8004 else
7997 { 8005 {
7998 restart_edit = 'i'; 8006 if (eap->cmdidx == CMD_startinsert)
8007 restart_edit = 'i';
8008 else
8009 restart_edit = 'R';
7999 curwin->w_curswant = 0; /* avoid MAXCOL */ 8010 curwin->w_curswant = 0; /* avoid MAXCOL */
8000 } 8011 }
8001 } 8012 }
8002 8013
8003 /* 8014 /*