0
0
mirror of https://github.com/vim/vim.git synced 2025-07-26 11:04:33 -04:00

updated for version 7.0080

This commit is contained in:
Bram Moolenaar 2005-06-05 22:01:26 +00:00
parent 50cde8273e
commit bc045ea87a
11 changed files with 290 additions and 161 deletions

View File

@ -4247,7 +4247,6 @@ fork Compiled to use fork()/exec() instead of system().
gettext Compiled with message translation |multi-lang| gettext Compiled with message translation |multi-lang|
gui Compiled with GUI enabled. gui Compiled with GUI enabled.
gui_athena Compiled with Athena GUI. gui_athena Compiled with Athena GUI.
gui_beos Compiled with BeOS GUI.
gui_gtk Compiled with GTK+ GUI (any version). gui_gtk Compiled with GTK+ GUI (any version).
gui_gtk2 Compiled with GTK+ 2 GUI (gui_gtk is also defined). gui_gtk2 Compiled with GTK+ 2 GUI (gui_gtk is also defined).
gui_kde Compiled with KDE GUI |KVim| gui_kde Compiled with KDE GUI |KVim|

View File

@ -1005,7 +1005,6 @@ $VIMRUNTIME starting.txt /*$VIMRUNTIME*
++opt editing.txt /*++opt* ++opt editing.txt /*++opt*
+ARP various.txt /*+ARP* +ARP various.txt /*+ARP*
+GUI_Athena various.txt /*+GUI_Athena* +GUI_Athena various.txt /*+GUI_Athena*
+GUI_BeOS various.txt /*+GUI_BeOS*
+GUI_GTK various.txt /*+GUI_GTK* +GUI_GTK various.txt /*+GUI_GTK*
+GUI_Motif various.txt /*+GUI_Motif* +GUI_Motif various.txt /*+GUI_Motif*
+GUI_Photon various.txt /*+GUI_Photon* +GUI_Photon various.txt /*+GUI_Photon*
@ -4224,6 +4223,7 @@ blockwise-examples visual.txt /*blockwise-examples*
blockwise-operators visual.txt /*blockwise-operators* blockwise-operators visual.txt /*blockwise-operators*
blockwise-register change.txt /*blockwise-register* blockwise-register change.txt /*blockwise-register*
blockwise-visual visual.txt /*blockwise-visual* blockwise-visual visual.txt /*blockwise-visual*
bold syntax.txt /*bold*
book intro.txt /*book* book intro.txt /*book*
bookmark usr_03.txt /*bookmark* bookmark usr_03.txt /*bookmark*
boolean options.txt /*boolean* boolean options.txt /*boolean*
@ -5121,7 +5121,6 @@ hebrew hebrew.txt /*hebrew*
hebrew.txt hebrew.txt /*hebrew.txt* hebrew.txt hebrew.txt /*hebrew.txt*
help various.txt /*help* help various.txt /*help*
help-context help.txt /*help-context* help-context help.txt /*help-context*
help-tags tags 1
help-translated various.txt /*help-translated* help-translated various.txt /*help-translated*
help-xterm-window various.txt /*help-xterm-window* help-xterm-window various.txt /*help-xterm-window*
help.txt help.txt /*help.txt* help.txt help.txt /*help.txt*
@ -5391,11 +5390,13 @@ internal-variables eval.txt /*internal-variables*
internet intro.txt /*internet* internet intro.txt /*internet*
intro intro.txt /*intro* intro intro.txt /*intro*
intro.txt intro.txt /*intro.txt* intro.txt intro.txt /*intro.txt*
inverse syntax.txt /*inverse*
ip motion.txt /*ip* ip motion.txt /*ip*
iquote motion.txt /*iquote* iquote motion.txt /*iquote*
is motion.txt /*is* is motion.txt /*is*
isdirectory() eval.txt /*isdirectory()* isdirectory() eval.txt /*isdirectory()*
islocked() eval.txt /*islocked()* islocked() eval.txt /*islocked()*
italic syntax.txt /*italic*
items() eval.txt /*items()* items() eval.txt /*items()*
iw motion.txt /*iw* iw motion.txt /*iw*
i{ motion.txt /*i{* i{ motion.txt /*i{*
@ -6268,6 +6269,7 @@ sqlinformix.vim syntax.txt /*sqlinformix.vim*
sscanf eval.txt /*sscanf* sscanf eval.txt /*sscanf*
standard-plugin usr_05.txt /*standard-plugin* standard-plugin usr_05.txt /*standard-plugin*
standard-plugin-list help.txt /*standard-plugin-list* standard-plugin-list help.txt /*standard-plugin-list*
standout syntax.txt /*standout*
star pattern.txt /*star* star pattern.txt /*star*
start-of-file pattern.txt /*start-of-file* start-of-file pattern.txt /*start-of-file*
starting starting.txt /*starting* starting starting.txt /*starting*
@ -6618,6 +6620,8 @@ typecorr.txt usr_41.txt /*typecorr.txt*
u undo.txt /*u* u undo.txt /*u*
uganda uganda.txt /*uganda* uganda uganda.txt /*uganda*
uganda.txt uganda.txt /*uganda.txt* uganda.txt uganda.txt /*uganda.txt*
undercurl syntax.txt /*undercurl*
underline syntax.txt /*underline*
undo undo.txt /*undo* undo undo.txt /*undo*
undo-commands undo.txt /*undo-commands* undo-commands undo.txt /*undo-commands*
undo-redo undo.txt /*undo-redo* undo-redo undo.txt /*undo-redo*

Binary file not shown.

Binary file not shown.

View File

@ -825,6 +825,6 @@ Notera: Detta undviker att beh
Colorado State University. E-post: bware@mines.colorado.edu. Colorado State University. E-post: bware@mines.colorado.edu.
Modifierad för Vim av Bram Moolenaar. Modifierad för Vim av Bram Moolenaar.
Översatt av Johan Svedberg <johan@svedberg.pp.se> Översatt av Johan Svedberg <johan@svedberg.com>
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

View File

@ -1111,8 +1111,7 @@
/* /*
* +GUI_Athena To compile Vim with or without the GUI (gvim) you have * +GUI_Athena To compile Vim with or without the GUI (gvim) you have
* +GUI_BeOS to edit the Makefile. * +GUI_Motif to edit the Makefile.
* +GUI_Motif
*/ */
/* /*

View File

@ -2186,12 +2186,13 @@ utf_isupper(a)
* two characters otherwise. * two characters otherwise.
*/ */
int int
mb_strnicmp(s1, s2, n) mb_strnicmp(s1, s2, nn)
char_u *s1, *s2; char_u *s1, *s2;
int n; size_t nn;
{ {
int i, j, l; int i, j, l;
int cdiff; int cdiff;
int n = nn;
for (i = 0; i < n; i += l) for (i = 0; i < n; i += l)
{ {

View File

@ -39,7 +39,7 @@ int utf_toupper __ARGS((int a));
int utf_islower __ARGS((int a)); int utf_islower __ARGS((int a));
int utf_tolower __ARGS((int a)); int utf_tolower __ARGS((int a));
int utf_isupper __ARGS((int a)); int utf_isupper __ARGS((int a));
int mb_strnicmp __ARGS((char_u *s1, char_u *s2, int n)); int mb_strnicmp __ARGS((char_u *s1, char_u *s2, size_t nn));
void show_utf8 __ARGS((void)); void show_utf8 __ARGS((void));
int latin_head_off __ARGS((char_u *base, char_u *p)); int latin_head_off __ARGS((char_u *base, char_u *p));
int dbcs_head_off __ARGS((char_u *base, char_u *p)); int dbcs_head_off __ARGS((char_u *base, char_u *p));

View File

@ -3580,7 +3580,7 @@ win_line(wp, lnum, startrow, endrow)
if (area_attr == 0 && search_attr == 0) if (area_attr == 0 && search_attr == 0)
char_attr = syntax_attr; char_attr = syntax_attr;
else else
char_attr = hl_combine_attr(char_attr, syntax_attr); char_attr = hl_combine_attr(syntax_attr, char_attr);
} }
/* Check spelling (unless at the end of the line). /* Check spelling (unless at the end of the line).

View File

@ -147,7 +147,7 @@ endif
" The Xpath/Xloop commands can be used for computing the eXecution path by " The Xpath/Xloop commands can be used for computing the eXecution path by
" adding (different) powers of 2 from those script lines, for which the " adding (different) powers of 2 from those script lines, for which the
" execution should be checked. Xloop provides different addends for each " execution should be checked. Xloop provides different addends for each
" execution of a loop. Permittable values are 2^0 to 2^30, so that 31 execution " execution of a loop. Permitted values are 2^0 to 2^30, so that 31 execution
" points (multiply counted inside loops) can be tested. " points (multiply counted inside loops) can be tested.
" "
" Note that the arguments of the following commands can be generated " Note that the arguments of the following commands can be generated
@ -257,18 +257,17 @@ com! -count Xcheck let Xresult = "*** Test " .
\ let Xtest = Xtest + 1 \ let Xtest = Xtest + 1
if exists("g:ExtraVimResult") if exists("g:ExtraVimResult")
com! -nargs=+ Xout exec "exec \"!echo @R:'\" ." com! -nargs=+ Xoutq exec "!echo @R:'" .
\ 'substitute(substitute("' . <args> . \ substitute(substitute(<q-args>,
\ '", "' . "'" . '", ' . "'" . '&\\&&' . "'" \ "'", '&\\&&', "g"), "\n", "@NL@", "g")
\ . ', "g"), "\n", "@NL@", "g")' \ . "' >>" . g:ExtraVimResult
\ ". \"' >>\" . g:ExtraVimResult"
else else
com! -nargs=+ Xout exec 'let @R = "--- Test ' . com! -nargs=+ Xoutq let @R = "--- Test " .
\ (g:Xtest<10?" ":g:Xtest<100?" ":"") . \ (g:Xtest<10?" ":g:Xtest<100?" ":"") .
\ g:Xtest . ": " . \ g:Xtest . ": " . substitute(<q-args>,
\ '" . substitute("' . <args> . \ "\n", "&\t ", "g") . "\n"
\ '", "\n", "&\t ", "g") . "\n"'
endif endif
com! -nargs=+ Xout exec 'Xoutq' <args>
" Switch off storing of lines for undoing changes. Speeds things up a little. " Switch off storing of lines for undoing changes. Speeds things up a little.
set undolevels=-1 set undolevels=-1
@ -458,7 +457,7 @@ function! ExtraVim(...)
" resultfile in ExtraVimResult. Redirect messages to the file specified as " resultfile in ExtraVimResult. Redirect messages to the file specified as
" argument if any. Use ":debuggreedy" so that the commands provided on the " argument if any. Use ":debuggreedy" so that the commands provided on the
" pipe are consumed at the debug prompt. Use "-N" to enable command-line " pipe are consumed at the debug prompt. Use "-N" to enable command-line
" contiunation ("C" in 'cpo'). Add "nviminfo" to 'viminfo' to avoid " continuation ("C" in 'cpo'). Add "nviminfo" to 'viminfo' to avoid
" messing up the user's viminfo file. " messing up the user's viminfo file.
let redirect = a:0 ? let redirect = a:0 ?
\ " -c 'au VimLeave * redir END' -c 'redir\\! >" . a:1 . "'" : "" \ " -c 'au VimLeave * redir END' -c 'redir\\! >" . a:1 . "'" : ""
@ -502,7 +501,7 @@ endfunction
" ExtraVimThrowpoint() - Relative throwpoint in ExtraVim script {{{2 " ExtraVimThrowpoint() - Relative throwpoint in ExtraVim script {{{2
" "
" Evaluates v:throwpoint and returns the throwpoint relativ to the beginning of " Evaluates v:throwpoint and returns the throwpoint relative to the beginning of
" an ExtraVim script as passed by ExtraVim() in ExtraVimBegin. " an ExtraVim script as passed by ExtraVim() in ExtraVimBegin.
" "
" EXTRA_VIM_START - do not change or remove this line. " EXTRA_VIM_START - do not change or remove this line.
@ -4142,7 +4141,7 @@ Xcheck 756255461
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 49: Throwing exceptions accross functions {{{1 " Test 49: Throwing exceptions across functions {{{1
" "
" When an exception is thrown but not caught inside a function, the " When an exception is thrown but not caught inside a function, the
" caller is checked for a matching :catch clause. " caller is checked for a matching :catch clause.
@ -4224,7 +4223,7 @@ Xcheck 179000669
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 50: Throwing exceptions accross script files {{{1 " Test 50: Throwing exceptions across script files {{{1
" "
" When an exception is thrown but not caught inside a script file, " When an exception is thrown but not caught inside a script file,
" the sourcing script or function is checked for a matching :catch " the sourcing script or function is checked for a matching :catch
@ -4293,7 +4292,7 @@ Xcheck 363550045
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 51: Throwing exceptions accross :execute and user commands {{{1 " Test 51: Throwing exceptions across :execute and user commands {{{1
" "
" A :throw command may be executed under an ":execute" or from " A :throw command may be executed under an ":execute" or from
" a user command. " a user command.
@ -5435,7 +5434,7 @@ if ExtraVim()
let line = a:0 != 0 ? a:3 : 0 " fourth parameter (optional) let line = a:0 != 0 ? a:3 : 0 " fourth parameter (optional)
let error = 0 let error = 0
if emsg != "" if emsg != ""
" exception is the error number, emsg the english error message text " exception is the error number, emsg the English error message text
if exception !~ '^E\d\+$' if exception !~ '^E\d\+$'
Xout "TODO: Add message number for:" emsg Xout "TODO: Add message number for:" emsg
elseif v:lang == "C" || v:lang =~ '^[Ee]n' elseif v:lang == "C" || v:lang =~ '^[Ee]n'
@ -6306,7 +6305,7 @@ function! Foo()
Xpath 4194304 " X: 0 Xpath 4194304 " X: 0
endif endif
silent! call S(5) " X: 3 * 256 silent! call S(5) " X: 3 * 256
" Break out of try conds that cover ":silent!". This also " Break out of try conditionals that cover ":silent!". This also
" discards the aborting error when $VIMNOERRTHROW is non-zero. " discards the aborting error when $VIMNOERRTHROW is non-zero.
break break
endtry endtry
@ -6720,7 +6719,7 @@ Xcheck 5464
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 67: :throw accross :call command {{{1 " Test 67: :throw across :call command {{{1
" "
" On a call command, an exception might be thrown when evaluating the " On a call command, an exception might be thrown when evaluating the
" function name, during evaluation of the arguments, or when the " function name, during evaluation of the arguments, or when the
@ -6775,8 +6774,12 @@ function! F(x, n)
endif endif
endfunction endfunction
try while 1
try
let error = 0
let v:errmsg = ""
while 1
try try
Xpath 8192 " X: 8192 Xpath 8192 " X: 8192
call {NAME(THROW("name", 1), 1)}(ARG(4711, 1), 1) call {NAME(THROW("name", 1), 1)}(ARG(4711, 1), 1)
@ -6784,10 +6787,23 @@ try
catch /^name$/ catch /^name$/
Xpath 32768 " X: 32768 Xpath 32768 " X: 32768
catch /.*/ catch /.*/
Xpath 65536 " X: 0 let error = 1
Xout "1:" v:exception "in" v:throwpoint Xout "1:" v:exception "in" v:throwpoint
finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout "1:" v:errmsg
endif
if error
Xpath 65536 " X: 0
endif
let error = 0
let v:errmsg = ""
break " discard error for $VIMNOERRTHROW
endtry endtry
endwhile
while 1
try try
Xpath 131072 " X: 131072 Xpath 131072 " X: 131072
call {NAME("F", 2)}(ARG(THROW("arg", 2), 2), 2) call {NAME("F", 2)}(ARG(THROW("arg", 2), 2), 2)
@ -6795,10 +6811,23 @@ try
catch /^arg$/ catch /^arg$/
Xpath 524288 " X: 524288 Xpath 524288 " X: 524288
catch /.*/ catch /.*/
Xpath 1048576 " X: 0 let error = 1
Xout "2:" v:exception "in" v:throwpoint Xout "2:" v:exception "in" v:throwpoint
finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout "2:" v:errmsg
endif
if error
Xpath 1048576 " X: 0
endif
let error = 0
let v:errmsg = ""
break " discard error for $VIMNOERRTHROW
endtry endtry
endwhile
while 1
try try
Xpath 2097152 " X: 2097152 Xpath 2097152 " X: 2097152
call {NAME("THROW", 3)}(ARG("call", 3), 3) call {NAME("THROW", 3)}(ARG("call", 3), 3)
@ -6809,27 +6838,63 @@ try
Xpath 16777216 " X: 0 Xpath 16777216 " X: 0
Xout "3:" v:throwpoint Xout "3:" v:throwpoint
catch /.*/ catch /.*/
Xpath 33554432 " X: 0 let error = 1
Xout "3:" v:exception "in" v:throwpoint Xout "3:" v:exception "in" v:throwpoint
finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout "3:" v:errmsg
endif
if error
Xpath 33554432 " X: 0
endif
let error = 0
let v:errmsg = ""
break " discard error for $VIMNOERRTHROW
endtry endtry
endwhile
while 1
try try
Xpath 67108864 " X: 67108864 Xpath 67108864 " X: 67108864
call {NAME("F", 4)}(ARG(4711, 4), 4) call {NAME("F", 4)}(ARG(4711, 4), 4)
Xpath 134217728 " X: 134217728 Xpath 134217728 " X: 134217728
catch /.*/ catch /.*/
Xpath 268435456 " X: 0 let error = 1
Xout "4:" v:exception "in" v:throwpoint Xout "4:" v:exception "in" v:throwpoint
finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout "4:" v:errmsg
endif
if error
Xpath 268435456 " X: 0
endif
let error = 0
let v:errmsg = ""
break " discard error for $VIMNOERRTHROW
endtry endtry
endwhile
catch /^0$/ " default return value catch /^0$/ " default return value
Xpath 536870912 " X: 0 Xpath 536870912 " X: 0
Xout v:throwpoint Xout v:throwpoint
catch /.*/ catch /.*/
Xpath 1073741824 " X: 0 let error = 1
Xout v:exception "in" v:throwpoint Xout v:exception "in" v:throwpoint
endtry finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout v:errmsg
endif
if error
Xpath 1073741824 " X: 0
endif
break " discard error for $VIMNOERRTHROW
endtry
endwhile
unlet error
delfunction F delfunction F
Xcheck 212514423 Xcheck 212514423
@ -6838,7 +6903,7 @@ Xcheck 212514423
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 68: :throw accross function calls in expressions {{{1 " Test 68: :throw across function calls in expressions {{{1
" "
" On a function call within an expression, an exception might be " On a function call within an expression, an exception might be
" thrown when evaluating the function name, during evaluation of the " thrown when evaluating the function name, during evaluation of the
@ -6862,8 +6927,12 @@ endfunction
unlet! var1 var2 var3 var4 unlet! var1 var2 var3 var4
try while 1
try
let error = 0
let v:errmsg = ""
while 1
try try
Xpath 8192 " X: 8192 Xpath 8192 " X: 8192
let var1 = {NAME(THROW("name", 1), 1)}(ARG(4711, 1), 1) let var1 = {NAME(THROW("name", 1), 1)}(ARG(4711, 1), 1)
@ -6871,10 +6940,23 @@ try
catch /^name$/ catch /^name$/
Xpath 32768 " X: 32768 Xpath 32768 " X: 32768
catch /.*/ catch /.*/
Xpath 65536 " X: 0 let error = 1
Xout "1:" v:exception "in" v:throwpoint Xout "1:" v:exception "in" v:throwpoint
finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout "1:" v:errmsg
endif
if error
Xpath 65536 " X: 0
endif
let error = 0
let v:errmsg = ""
break " discard error for $VIMNOERRTHROW
endtry endtry
endwhile
while 1
try try
Xpath 131072 " X: 131072 Xpath 131072 " X: 131072
let var2 = {NAME("F", 2)}(ARG(THROW("arg", 2), 2), 2) let var2 = {NAME("F", 2)}(ARG(THROW("arg", 2), 2), 2)
@ -6882,10 +6964,23 @@ try
catch /^arg$/ catch /^arg$/
Xpath 524288 " X: 524288 Xpath 524288 " X: 524288
catch /.*/ catch /.*/
Xpath 1048576 " X: 0 let error = 1
Xout "2:" v:exception "in" v:throwpoint Xout "2:" v:exception "in" v:throwpoint
finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout "2:" v:errmsg
endif
if error
Xpath 1048576 " X: 0
endif
let error = 0
let v:errmsg = ""
break " discard error for $VIMNOERRTHROW
endtry endtry
endwhile
while 1
try try
Xpath 2097152 " X: 2097152 Xpath 2097152 " X: 2097152
let var3 = {NAME("THROW", 3)}(ARG("call", 3), 3) let var3 = {NAME("THROW", 3)}(ARG("call", 3), 3)
@ -6896,26 +6991,61 @@ try
Xpath 16777216 " X: 0 Xpath 16777216 " X: 0
Xout "3:" v:throwpoint Xout "3:" v:throwpoint
catch /.*/ catch /.*/
Xpath 33554432 " X: 0 let error = 1
Xout "3:" v:exception "in" v:throwpoint Xout "3:" v:exception "in" v:throwpoint
finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout "3:" v:errmsg
endif
if error
Xpath 33554432 " X: 0
endif
let error = 0
let v:errmsg = ""
break " discard error for $VIMNOERRTHROW
endtry endtry
endwhile
while 1
try try
Xpath 67108864 " X: 67108864 Xpath 67108864 " X: 67108864
let var4 = {NAME("F", 4)}(ARG(4711, 4), 4) let var4 = {NAME("F", 4)}(ARG(4711, 4), 4)
Xpath 134217728 " X: 134217728 Xpath 134217728 " X: 134217728
catch /.*/ catch /.*/
Xpath 268435456 " X: 0 let error = 1
Xout "4:" v:exception "in" v:throwpoint Xout "4:" v:exception "in" v:throwpoint
finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout "4:" v:errmsg
endif
if error
Xpath 268435456 " X: 0
endif
let error = 0
let v:errmsg = ""
break " discard error for $VIMNOERRTHROW
endtry endtry
endwhile
catch /^0$/ " default return value catch /^0$/ " default return value
Xpath 536870912 " X: 0 Xpath 536870912 " X: 0
Xout v:throwpoint Xout v:throwpoint
catch /.*/ catch /.*/
Xpath 1073741824 " X: 0 let error = 1
Xout v:exception "in" v:throwpoint Xout v:exception "in" v:throwpoint
endtry finally
if !error && $VIMNOERRTHROW && v:errmsg != ""
let error = 1
Xout v:errmsg
endif
if error
Xpath 1073741824 " X: 0
endif
break " discard error for $VIMNOERRTHROW
endtry
endwhile
if exists("var1") || exists("var2") || exists("var3") || if exists("var1") || exists("var2") || exists("var3") ||
\ !exists("var4") || var4 != 4711 \ !exists("var4") || var4 != 4711
@ -6937,7 +7067,7 @@ if exists("var1") || exists("var2") || exists("var3") ||
endif endif
endif endif
unlet! var1 var2 var3 var4 unlet! error var1 var2 var3 var4
delfunction THROW delfunction THROW
delfunction NAME delfunction NAME
delfunction ARG delfunction ARG
@ -6947,7 +7077,7 @@ Xcheck 212514423
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 69: :throw accross :if, :elseif, :while {{{1 " Test 69: :throw across :if, :elseif, :while {{{1
" "
" On an :if, :elseif, or :while command, an exception might be thrown " On an :if, :elseif, or :while command, an exception might be thrown
" during evaluation of the expression to test. The exception can be " during evaluation of the expression to test. The exception can be
@ -7028,7 +7158,7 @@ Xcheck 8995471
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 70: :throw accross :return or :throw {{{1 " Test 70: :throw across :return or :throw {{{1
" "
" On a :return or :throw command, an exception might be thrown during " On a :return or :throw command, an exception might be thrown during
" evaluation of the expression to return or throw, respectively. The " evaluation of the expression to return or throw, respectively. The
@ -7146,7 +7276,7 @@ Xcheck 69544277
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 71: :throw accross :echo variants and :execute {{{1 " Test 71: :throw across :echo variants and :execute {{{1
" "
" On an :echo, :echon, :echomsg, :echoerr, or :execute command, an " On an :echo, :echon, :echomsg, :echoerr, or :execute command, an
" exception might be thrown during evaluation of the arguments to " exception might be thrown during evaluation of the arguments to
@ -7253,7 +7383,7 @@ Xcheck 34886997
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 72: :throw accross :let or :unlet {{{1 " Test 72: :throw across :let or :unlet {{{1
" "
" On a :let command, an exception might be thrown during evaluation " On a :let command, an exception might be thrown during evaluation
" of the expression to assign. On an :let or :unlet command, the " of the expression to assign. On an :let or :unlet command, the
@ -7412,7 +7542,7 @@ Xcheck 1789569365
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 73: :throw accross :function, :delfunction {{{1 " Test 73: :throw across :function, :delfunction {{{1
" "
" The :function and :delfunction commands may cause an expression " The :function and :delfunction commands may cause an expression
" specified in braces to be evaluated. During evaluation, an " specified in braces to be evaluated. During evaluation, an
@ -7516,7 +7646,7 @@ Xcheck 9032615
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 74: :throw accross builtin functions and commands {{{1 " Test 74: :throw across builtin functions and commands {{{1
" "
" Some functions like exists(), searchpair() take expression " Some functions like exists(), searchpair() take expression
" arguments, other functions or commands like substitute() or " arguments, other functions or commands like substitute() or
@ -7896,7 +8026,7 @@ Xcheck 2000403408
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 76: Errors, interupts, :throw during expression evaluation {{{1 " Test 76: Errors, interrupts, :throw during expression evaluation {{{1
" "
" When a function call made during expression evaluation is aborted " When a function call made during expression evaluation is aborted
" due to an error inside a :try/:endtry region or due to an interrupt " due to an error inside a :try/:endtry region or due to an interrupt
@ -8155,7 +8285,7 @@ Xcheck 1610087935
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------
" Test 77: Errors, interupts, :throw in name{brace-expression} {{{1 " Test 77: Errors, interrupts, :throw in name{brace-expression} {{{1
" "
" When a function call made during evaluation of an expression in " When a function call made during evaluation of an expression in
" braces as part of a function name after ":function" is aborted due " braces as part of a function name after ":function" is aborted due
@ -8371,15 +8501,11 @@ if ExtraVim()
\ '^Vim\((\a\+)\)\=:', '', "") \ '^Vim\((\a\+)\)\=:', '', "")
let caught = 1 let caught = 1
finally finally
if t <= 8 && t != 3 && t != 7
call MSG(t, 'E475', 'Invalid argument\>')
else
if !caught " no error exceptions ($VIMNOERRTHROW set) if !caught " no error exceptions ($VIMNOERRTHROW set)
if t <= 8 && t != 3
call MSG(t, 'E475', 'Invalid argument\>')
else
call MSG(t, 'E15', "Invalid expression") call MSG(t, 'E15', "Invalid expression")
endif
else
if t <= 2 || t == 4 || t == 5 || t == 6 || t == 8
call MSG(t, 'E475', 'Invalid argument\>')
else else
call MSG(t, 'E121', "Undefined variable") call MSG(t, 'E121', "Undefined variable")
endif endif
@ -9058,7 +9184,7 @@ Xcheck 2835
" exception is propagated to the caller. " exception is propagated to the caller.
" "
" For the FuncUndefined event under a function call expression or " For the FuncUndefined event under a function call expression or
" :call command, the function is not exexecuted, even when it has " :call command, the function is not executed, even when it has
" been defined by the autocommands before the exception occurred. " been defined by the autocommands before the exception occurred.
"------------------------------------------------------------------------------- "-------------------------------------------------------------------------------

View File

@ -36,5 +36,5 @@
#define VIM_VERSION_NODOT "vim70aa" #define VIM_VERSION_NODOT "vim70aa"
#define VIM_VERSION_SHORT "7.0aa" #define VIM_VERSION_SHORT "7.0aa"
#define VIM_VERSION_MEDIUM "7.0aa ALPHA" #define VIM_VERSION_MEDIUM "7.0aa ALPHA"
#define VIM_VERSION_LONG "VIM - Vi IMproved 7.0aa ALPHA (2005 Jun 4)" #define VIM_VERSION_LONG "VIM - Vi IMproved 7.0aa ALPHA (2005 Jun 5)"
#define VIM_VERSION_LONG_DATE "VIM - Vi IMproved 7.0aa ALPHA (2005 Jun 4, compiled " #define VIM_VERSION_LONG_DATE "VIM - Vi IMproved 7.0aa ALPHA (2005 Jun 5, compiled "