vim: src/testdir/test_vim9_disassemble.vim annotate

annotate src/testdir/test_vim9_disassemble.vim @ 20099:058b41f85bcb v8.2.0605

patch 8.2.0605: Vim9: cannot unlet an environment variable Commit: https://github.com/vim/vim/commit/7bdaea6e0df849cf3dd7eaaf454eb88f637d1884 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Apr 19 18:27:26 2020 +0200 patch 8.2.0605: Vim9: cannot unlet an environment variable Problem: Vim9: cannot unlet an environment variable. Solution: Implement unlet for $VAR.

author	Bram Moolenaar <Bram@vim.org>
date	Sun, 19 Apr 2020 18:30:04 +0200
parents	a64c16ff98b8
children	fe8d0a4344df

rev	line source
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 " Test the :disassemble command, and compilation as a side effect
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	2
19572 6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	3 source check.vim
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	4
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 func NotCompiled()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 echo "not"
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	7 endfunc
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	8
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	9 let s:scriptvar = 4
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	10 let g:globalvar = 'g'
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	11 let b:buffervar = 'b'
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	12 let w:windowvar = 'w'
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	13 let t:tabpagevar = 't'
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	14
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	15 def s:ScriptFuncLoad(arg: string)
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	16 let local = 1
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	17 buffers
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	18 echo arg
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	19 echo local
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	20 echo v:version
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 echo s:scriptvar
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	22 echo g:globalvar
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	23 echo b:buffervar
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	24 echo w:windowvar
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	25 echo t:tabpagevar
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	26 echo &tabstop
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	27 echo $ENVVAR
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	28 echo @z
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	29 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	30
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	31 def Test_disassemble_load()
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	32 assert_fails('disass NoFunc', 'E1061:')
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	33 assert_fails('disass NotCompiled', 'E1062:')
19390 e4b326c9424a patch 8.2.0253: crash when using :disassamble without argument Bram Moolenaar <Bram@vim.org> parents: 19342 diff changeset	34 assert_fails('disass', 'E471:')
e4b326c9424a patch 8.2.0253: crash when using :disassamble without argument Bram Moolenaar <Bram@vim.org> parents: 19342 diff changeset	35 assert_fails('disass [', 'E475:')
e4b326c9424a patch 8.2.0253: crash when using :disassamble without argument Bram Moolenaar <Bram@vim.org> parents: 19342 diff changeset	36 assert_fails('disass 234', 'E475:')
e4b326c9424a patch 8.2.0253: crash when using :disassamble without argument Bram Moolenaar <Bram@vim.org> parents: 19342 diff changeset	37 assert_fails('disass <XX>foo', 'E475:')
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	38
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	39 let res = execute('disass s:ScriptFuncLoad')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	40 assert_match('<SNR>\d_ScriptFuncLoad.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	41 'buffers.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	42 ' EXEC \+buffers.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	43 ' LOAD arg\[-1\].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	44 ' LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	45 ' LOADV v:version.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	46 ' LOADS s:scriptvar from .test_vim9_disassemble.vim.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	47 ' LOADG g:globalvar.*' ..
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	48 ' LOADB b:buffervar.*' ..
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	49 ' LOADW w:windowvar.*' ..
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	50 ' LOADT t:tabpagevar.*' ..
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	51 ' LOADENV $ENVVAR.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	52 ' LOADREG @z.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	53 res)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	54 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	55
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	56 def s:ScriptFuncPush()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	57 let localbool = true
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	58 let localspec = v:none
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	59 let localblob = 0z1234
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	60 if has('float')
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	61 let localfloat = 1.234
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	62 endif
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	63 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	64
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	65 def Test_disassemble_push()
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	66 let res = execute('disass s:ScriptFuncPush')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	67 assert_match('<SNR>\d_ScriptFuncPush.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	68 'localbool = true.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	69 ' PUSH v:true.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	70 'localspec = v:none.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	71 ' PUSH v:none.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	72 'localblob = 0z1234.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	73 ' PUSHBLOB 0z1234.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	74 res)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	75 if has('float')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	76 assert_match('<SNR>\d_ScriptFuncPush.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	77 'localfloat = 1.234.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	78 ' PUSHF 1.234.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	79 res)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	80 endif
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	81 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	82
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	83 def s:ScriptFuncStore()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	84 let localnr = 1
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	85 localnr = 2
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	86 let localstr = 'abc'
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	87 localstr = 'xyz'
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	88 v:char = 'abc'
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	89 s:scriptvar = 'sv'
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 g:globalvar = 'gv'
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	91 b:buffervar = 'bv'
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	92 w:windowvar = 'wv'
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	93 t:tabpagevar = 'tv'
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	94 &tabstop = 8
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	95 $ENVVAR = 'ev'
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	96 @z = 'rv'
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	98
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	99 def Test_disassemble_store()
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	100 let res = execute('disass s:ScriptFuncStore')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	101 assert_match('<SNR>\d_ScriptFuncStore.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	102 'let localnr = 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	103 'localnr = 2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	104 ' STORE 2 in $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	105 'let localstr = ''abc''.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	106 'localstr = ''xyz''.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	107 ' STORE $1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	108 'v:char = ''abc''.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	109 'STOREV v:char.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	110 's:scriptvar = ''sv''.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	111 ' STORES s:scriptvar in .test_vim9_disassemble.vim.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	112 'g:globalvar = ''gv''.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	113 ' STOREG g:globalvar.*' ..
20089 7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	114 'b:buffervar = ''bv''.*' ..
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	115 ' STOREB b:buffervar.*' ..
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	116 'w:windowvar = ''wv''.*' ..
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	117 ' STOREW w:windowvar.*' ..
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	118 't:tabpagevar = ''tv''.*' ..
7fc5d62fe2a5 patch 8.2.0600: Vim9: cannot read or write w:, t: and b: variables Bram Moolenaar <Bram@vim.org> parents: 20079 diff changeset	119 ' STORET t:tabpagevar.*' ..
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	120 '&tabstop = 8.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	121 ' STOREOPT &tabstop.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	122 '$ENVVAR = ''ev''.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	123 ' STOREENV $ENVVAR.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	124 '@z = ''rv''.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	125 ' STOREREG @z.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	126 res)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	127 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	128
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	129 def s:ScriptFuncUnlet()
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	130 g:somevar = "value"
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	131 unlet g:somevar
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	132 unlet! g:somevar
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	133 unlet $SOMEVAR
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	134 enddef
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	135
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	136 def Test_disassemble_unlet()
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	137 let res = execute('disass s:ScriptFuncUnlet')
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	138 assert_match('<SNR>\d_ScriptFuncUnlet.' ..
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	139 'g:somevar = "value".*' ..
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	140 '\d PUSHS "value".*' ..
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	141 '\d STOREG g:somevar.*' ..
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	142 'unlet g:somevar.*' ..
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	143 '\d UNLET g:somevar.*' ..
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	144 'unlet! g:somevar.*' ..
20099 058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	145 '\d UNLET! g:somevar.*' ..
058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	146 'unlet $SOMEVAR.*' ..
058b41f85bcb patch 8.2.0605: Vim9: cannot unlet an environment variable Bram Moolenaar <Bram@vim.org> parents: 20091 diff changeset	147 '\d UNLETENV $SOMEVAR.*',
20091 a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	148 res)
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	149 enddef
a64c16ff98b8 patch 8.2.0601: Vim9: :unlet is not compiled Bram Moolenaar <Bram@vim.org> parents: 20089 diff changeset	150
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	151 def s:ScriptFuncTry()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	152 try
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	153 echo 'yes'
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	154 catch /fail/
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	155 echo 'no'
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	156 finally
19338 ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	157 throw 'end'
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	158 endtry
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	159 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	160
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	161 def Test_disassemble_try()
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	162 let res = execute('disass s:ScriptFuncTry')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	163 assert_match('<SNR>\d_ScriptFuncTry.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	164 'try.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	165 'TRY catch -> \d\+, finally -> \d\+.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	166 'catch /fail/.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	167 ' JUMP -> \d\+.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	168 ' PUSH v:exception.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	169 ' PUSHS "fail".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	170 ' COMPARESTRING =\~.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	171 ' JUMP_IF_FALSE -> \d\+.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	172 ' CATCH.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	173 'finally.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	174 ' PUSHS "end".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	175 ' THROW.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	176 'endtry.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	177 ' ENDTRY.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	178 res)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	179 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	180
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	181 def s:ScriptFuncNew()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	182 let ll = [1, "two", 333]
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	183 let dd = #{one: 1, two: "val"}
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	184 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	185
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	186 def Test_disassemble_new()
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	187 let res = execute('disass s:ScriptFuncNew')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	188 assert_match('<SNR>\d_ScriptFuncNew.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	189 'let ll = \[1, "two", 333].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	190 'PUSHNR 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	191 'PUSHS "two".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	192 'PUSHNR 333.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	193 'NEWLIST size 3.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	194 'let dd = #{one: 1, two: "val"}.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	195 'PUSHS "one".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	196 'PUSHNR 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	197 'PUSHS "two".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	198 'PUSHS "val".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	199 'NEWDICT size 2.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	200 res)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	201 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	202
20029 8fb1cf4c44d5 patch 8.2.0570: Vim9: no error when omitting type from argument Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	203 def FuncWithArg(arg: any)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	204 echo arg
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	205 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	206
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	207 func UserFunc()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	208 echo 'nothing'
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	209 endfunc
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	210
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	211 func UserFuncWithArg(arg)
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	212 echo a:arg
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	213 endfunc
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	214
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	215 def s:ScriptFuncCall(): string
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	216 changenr()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	217 char2nr("abc")
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	218 Test_disassemble_new()
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	219 FuncWithArg(343)
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	220 ScriptFuncNew()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	221 s:ScriptFuncNew()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	222 UserFunc()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	223 UserFuncWithArg("foo")
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	224 let FuncRef = function("UserFunc")
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	225 FuncRef()
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	226 let FuncRefWithArg = function("UserFuncWithArg")
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	227 FuncRefWithArg("bar")
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	228 return "yes"
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	229 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	230
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	231 def Test_disassemble_call()
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	232 let res = execute('disass s:ScriptFuncCall')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	233 assert_match('<SNR>\d\+_ScriptFuncCall.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	234 'changenr().*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	235 ' BCALL changenr(argc 0).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	236 'char2nr("abc").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	237 ' PUSHS "abc".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	238 ' BCALL char2nr(argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	239 'Test_disassemble_new().*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	240 ' DCALL Test_disassemble_new(argc 0).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	241 'FuncWithArg(343).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	242 ' PUSHNR 343.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	243 ' DCALL FuncWithArg(argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	244 'ScriptFuncNew().*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	245 ' DCALL <SNR>\d\+_ScriptFuncNew(argc 0).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	246 's:ScriptFuncNew().*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	247 ' DCALL <SNR>\d\+_ScriptFuncNew(argc 0).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	248 'UserFunc().*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	249 ' UCALL UserFunc(argc 0).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	250 'UserFuncWithArg("foo").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	251 ' PUSHS "foo".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	252 ' UCALL UserFuncWithArg(argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	253 'let FuncRef = function("UserFunc").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	254 'FuncRef().*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	255 ' LOAD $\d.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	256 ' PCALL (argc 0).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	257 'let FuncRefWithArg = function("UserFuncWithArg").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	258 'FuncRefWithArg("bar").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	259 ' PUSHS "bar".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	260 ' LOAD $\d.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	261 ' PCALL (argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	262 'return "yes".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	263 ' PUSHS "yes".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	264 ' RETURN.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	265 res)
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	266 enddef
9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	267
19483 0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	268
19862 846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	269 def EchoArg(arg: string): string
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	270 return arg
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	271 enddef
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	272 def RefThis(): func
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	273 return function('EchoArg')
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	274 enddef
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	275 def s:ScriptPCall()
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	276 RefThis()("text")
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	277 enddef
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	278
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	279 def Test_disassemble_pcall()
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	280 let res = execute('disass s:ScriptPCall')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	281 assert_match('<SNR>\d\+_ScriptPCall.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	282 'RefThis()("text").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	283 '\d DCALL RefThis(argc 0).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	284 '\d PUSHS "text".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	285 '\d PCALL top (argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	286 '\d PCALL end.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	287 '\d DROP.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	288 '\d PUSHNR 0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	289 '\d RETURN.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	290 res)
19862 846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	291 enddef
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	292
846fbbacce3a patch 8.2.0487: Vim9: compiling not sufficiently tested Bram Moolenaar <Bram@vim.org> parents: 19703 diff changeset	293
20079 336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20029 diff changeset	294 def s:FuncWithForwardCall(): string
336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20029 diff changeset	295 return g:DefinedLater("yes")
19532 b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	296 enddef
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	297
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	298 def DefinedLater(arg: string): string
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	299 return arg
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	300 enddef
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	301
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	302 def Test_disassemble_update_instr()
20079 336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20029 diff changeset	303 let res = execute('disass s:FuncWithForwardCall')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	304 assert_match('FuncWithForwardCall.*' ..
20079 336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20029 diff changeset	305 'return g:DefinedLater("yes").*' ..
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	306 '\d PUSHS "yes".*' ..
20079 336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20029 diff changeset	307 '\d UCALL g:DefinedLater(argc 1).*' ..
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	308 '\d CHECKTYPE string stack\[-1].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	309 '\d RETURN.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	310 res)
19532 b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	311
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	312 " Calling the function will change UCALL into the faster DCALL
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	313 assert_equal('yes', FuncWithForwardCall())
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	314
20079 336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20029 diff changeset	315 res = execute('disass s:FuncWithForwardCall')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	316 assert_match('FuncWithForwardCall.*' ..
20079 336483164ca6 patch 8.2.0595: Vim9: not all commands using ends_excmd() tested Bram Moolenaar <Bram@vim.org> parents: 20029 diff changeset	317 'return g:DefinedLater("yes").*' ..
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	318 '\d PUSHS "yes".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	319 '\d DCALL DefinedLater(argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	320 '\d CHECKTYPE string stack\[-1].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	321 '\d RETURN.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	322 res)
19532 b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	323 enddef
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	324
b8f778dda1a1 patch 8.2.0323: Vim9: calling a function that is defined later is slow Bram Moolenaar <Bram@vim.org> parents: 19528 diff changeset	325
19483 0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	326 def FuncWithDefault(arg: string = 'default'): string
0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	327 return arg
0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	328 enddef
0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	329
0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	330 def Test_disassemble_call_default()
0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	331 let res = execute('disass FuncWithDefault')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	332 assert_match('FuncWithDefault.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	333 '\d PUSHS "default".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	334 '\d STORE arg\[-1].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	335 'return arg.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	336 '\d LOAD arg\[-1].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	337 '\d RETURN.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	338 res)
19483 0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	339 enddef
0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	340
0d3dcb4476ba patch 8.2.0299: Vim9: ISN_STORE with argument not tested Bram Moolenaar <Bram@vim.org> parents: 19439 diff changeset	341
19332 d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	342 def HasEval()
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	343 if has("eval")
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	344 echo "yes"
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	345 else
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	346 echo "no"
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	347 endif
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	348 enddef
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	349
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	350 def HasNothing()
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	351 if has("nothing")
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	352 echo "yes"
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	353 else
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	354 echo "no"
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	355 endif
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	356 enddef
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	357
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	358 def HasSomething()
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	359 if has("nothing")
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	360 echo "nothing"
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	361 elseif has("something")
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	362 echo "something"
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	363 elseif has("eval")
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	364 echo "eval"
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	365 elseif has("less")
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	366 echo "less"
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	367 endif
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	368 enddef
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	369
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	370 def Test_disassemble_const_expr()
19332 d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	371 assert_equal("\nyes", execute('call HasEval()'))
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	372 let instr = execute('disassemble HasEval')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	373 assert_match('HasEval.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	374 'if has("eval").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	375 ' PUSHS "yes".*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	376 instr)
19332 d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	377 assert_notmatch('JUMP', instr)
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	378
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	379 assert_equal("\nno", execute('call HasNothing()'))
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	380 instr = execute('disassemble HasNothing')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	381 assert_match('HasNothing.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	382 'if has("nothing").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	383 'else.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	384 ' PUSHS "no".*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	385 instr)
19332 d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	386 assert_notmatch('PUSHS "yes"', instr)
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	387 assert_notmatch('JUMP', instr)
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	388
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	389 assert_equal("\neval", execute('call HasSomething()'))
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	390 instr = execute('disassemble HasSomething')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	391 assert_match('HasSomething.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	392 'if has("nothing").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	393 'elseif has("something").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	394 'elseif has("eval").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	395 ' PUSHS "eval".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	396 'elseif has("less").*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	397 instr)
19332 d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	398 assert_notmatch('PUSHS "nothing"', instr)
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	399 assert_notmatch('PUSHS "something"', instr)
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	400 assert_notmatch('PUSHS "less"', instr)
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	401 assert_notmatch('JUMP', instr)
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	402 enddef
d6e8a9e80be4 patch 8.2.0224: compiling :elseif not tested yet Bram Moolenaar <Bram@vim.org> parents: 19330 diff changeset	403
19572 6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	404 def WithFunc()
19912 d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	405 let Funky1: func
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	406 let Funky2: func = function("len")
d4fa9db88d16 patch 8.2.0512: Vim9: no optional arguments in func type Bram Moolenaar <Bram@vim.org> parents: 19904 diff changeset	407 let Party2: func = funcref("UserFunc")
19572 6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	408 enddef
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	409
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	410 def Test_disassemble_function()
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	411 let instr = execute('disassemble WithFunc')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	412 assert_match('WithFunc.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	413 'let Funky1: func.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	414 '0 PUSHFUNC "\[none]".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	415 '1 STORE $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	416 'let Funky2: func = function("len").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	417 '2 PUSHS "len".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	418 '3 BCALL function(argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	419 '4 STORE $1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	420 'let Party2: func = funcref("UserFunc").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	421 '\d PUSHS "UserFunc".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	422 '\d BCALL funcref(argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	423 '\d STORE $2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	424 '\d PUSHNR 0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	425 '\d RETURN.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	426 instr)
19572 6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	427 enddef
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	428
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	429 if has('channel')
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	430 def WithChannel()
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	431 let job1: job
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	432 let job2: job = job_start("donothing")
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	433 let chan1: channel
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	434 enddef
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	435 endif
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	436
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	437 def Test_disassemble_channel()
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	438 CheckFeature channel
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	439
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	440 let instr = execute('disassemble WithChannel')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	441 assert_match('WithChannel.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	442 'let job1: job.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	443 '\d PUSHJOB "no process".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	444 '\d STORE $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	445 'let job2: job = job_start("donothing").*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	446 '\d PUSHS "donothing".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	447 '\d BCALL job_start(argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	448 '\d STORE $1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	449 'let chan1: channel.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	450 '\d PUSHCHANNEL 0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	451 '\d STORE $2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	452 '\d PUSHNR 0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	453 '\d RETURN.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	454 instr)
19572 6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	455 enddef
6b6e97d0185e patch 8.2.0343: Vim9: using wrong instruction, limited test coverage Bram Moolenaar <Bram@vim.org> parents: 19532 diff changeset	456
19334 61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	457 def WithLambda(): string
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	458 let F = {a -> "X" .. a .. "X"}
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	459 return F("x")
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	460 enddef
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	461
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	462 def Test_disassemble_lambda()
19334 61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	463 assert_equal("XxX", WithLambda())
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	464 let instr = execute('disassemble WithLambda')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	465 assert_match('WithLambda.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	466 'let F = {a -> "X" .. a .. "X"}.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	467 ' FUNCREF <lambda>\d\+.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	468 'PUSHS "x".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	469 ' LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	470 ' PCALL (argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	471 ' CHECKTYPE string stack\[-1].*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	472 instr)
19334 61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	473 enddef
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	474
20029 8fb1cf4c44d5 patch 8.2.0570: Vim9: no error when omitting type from argument Bram Moolenaar <Bram@vim.org> parents: 20019 diff changeset	475 def AndOr(arg: any): string
19334 61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	476 if arg == 1 && arg != 2 \|\| arg == 4
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	477 return 'yes'
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	478 endif
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	479 return 'no'
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	480 enddef
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	481
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	482 def Test_disassemble_and_or()
19334 61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	483 assert_equal("yes", AndOr(1))
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	484 assert_equal("no", AndOr(2))
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	485 assert_equal("yes", AndOr(4))
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	486 let instr = execute('disassemble AndOr')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	487 assert_match('AndOr.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	488 'if arg == 1 && arg != 2 \|\| arg == 4.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	489 '\d LOAD arg\[-1].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	490 '\d PUSHNR 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	491 '\d COMPAREANY ==.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	492 '\d JUMP_AND_KEEP_IF_FALSE -> \d\+.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	493 '\d LOAD arg\[-1].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	494 '\d PUSHNR 2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	495 '\d COMPAREANY !=.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	496 '\d JUMP_AND_KEEP_IF_TRUE -> \d\+.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	497 '\d LOAD arg\[-1].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	498 '\d PUSHNR 4.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	499 '\d COMPAREANY ==.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	500 '\d JUMP_IF_FALSE -> \d\+.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	501 instr)
19334 61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	502 enddef
61646c189622 patch 8.2.0225: compiling lambda not tested yet Bram Moolenaar <Bram@vim.org> parents: 19332 diff changeset	503
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	504 def ForLoop(): list<number>
1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	505 let res: list<number>
1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	506 for i in range(3)
1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	507 res->add(i)
1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	508 endfor
1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	509 return res
1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	510 enddef
1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	511
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	512 def Test_disassemble_for_loop()
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	513 assert_equal([0, 1, 2], ForLoop())
1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	514 let instr = execute('disassemble ForLoop')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	515 assert_match('ForLoop.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	516 'let res: list<number>.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	517 ' NEWLIST size 0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	518 '\d STORE $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	519 'for i in range(3).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	520 '\d STORE -1 in $1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	521 '\d PUSHNR 3.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	522 '\d BCALL range(argc 1).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	523 '\d FOR $1 -> \d\+.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	524 '\d STORE $2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	525 'res->add(i).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	526 '\d LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	527 '\d LOAD $2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	528 '\d BCALL add(argc 2).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	529 '\d DROP.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	530 'endfor.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	531 '\d JUMP -> \d\+.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	532 '\d DROP.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	533 instr)
19336 1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	534 enddef
1cd6eab65ce0 patch 8.2.0226: compiling for loop not tested Bram Moolenaar <Bram@vim.org> parents: 19334 diff changeset	535
19338 ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	536 let g:number = 42
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	537
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	538 def Computing()
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	539 let nr = 3
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	540 let nrres = nr + 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	541 nrres = nr - 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	542 nrres = nr * 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	543 nrres = nr / 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	544 nrres = nr % 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	545
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	546 let anyres = g:number + 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	547 anyres = g:number - 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	548 anyres = g:number * 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	549 anyres = g:number / 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	550 anyres = g:number % 7
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	551
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	552 if has('float')
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	553 let fl = 3.0
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	554 let flres = fl + 7.0
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	555 flres = fl - 7.0
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	556 flres = fl * 7.0
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	557 flres = fl / 7.0
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	558 endif
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	559 enddef
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	560
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	561 def Test_disassemble_computing()
19338 ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	562 let instr = execute('disassemble Computing')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	563 assert_match('Computing.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	564 'let nr = 3.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	565 '\d STORE 3 in $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	566 'let nrres = nr + 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	567 '\d LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	568 '\d PUSHNR 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	569 '\d OPNR +.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	570 '\d STORE $1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	571 'nrres = nr - 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	572 '\d OPNR -.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	573 'nrres = nr \* 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	574 '\d OPNR \.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	575 'nrres = nr / 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	576 '\d OPNR /.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	577 'nrres = nr % 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	578 '\d OPNR %.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	579 'let anyres = g:number + 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	580 '\d LOADG g:number.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	581 '\d PUSHNR 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	582 '\d OPANY +.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	583 '\d STORE $2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	584 'anyres = g:number - 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	585 '\d OPANY -.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	586 'anyres = g:number \* 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	587 '\d OPANY \.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	588 'anyres = g:number / 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	589 '\d OPANY /.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	590 'anyres = g:number % 7.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	591 '\d OPANY %.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	592 instr)
19338 ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	593 if has('float')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	594 assert_match('Computing.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	595 'let fl = 3.0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	596 '\d PUSHF 3.0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	597 '\d STORE $3.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	598 'let flres = fl + 7.0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	599 '\d LOAD $3.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	600 '\d PUSHF 7.0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	601 '\d OPFLOAT +.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	602 '\d STORE $4.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	603 'flres = fl - 7.0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	604 '\d OPFLOAT -.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	605 'flres = fl \* 7.0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	606 '\d OPFLOAT \.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	607 'flres = fl / 7.0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	608 '\d OPFLOAT /.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	609 instr)
19338 ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	610 endif
ef432264b88a patch 8.2.0227: compiling a few instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19336 diff changeset	611 enddef
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	612
19439 b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	613 def AddListBlob()
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	614 let reslist = [1, 2] + [3, 4]
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	615 let resblob = 0z1122 + 0z3344
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	616 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	617
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	618 def Test_disassemble_add_list_blob()
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	619 let instr = execute('disassemble AddListBlob')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	620 assert_match('AddListBlob.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	621 'let reslist = \[1, 2] + \[3, 4].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	622 '\d PUSHNR 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	623 '\d PUSHNR 2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	624 '\d NEWLIST size 2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	625 '\d PUSHNR 3.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	626 '\d PUSHNR 4.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	627 '\d NEWLIST size 2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	628 '\d ADDLIST.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	629 '\d STORE $..' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	630 'let resblob = 0z1122 + 0z3344.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	631 '\d PUSHBLOB 0z1122.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	632 '\d PUSHBLOB 0z3344.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	633 '\d ADDBLOB.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	634 '\d STORE $.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	635 instr)
19439 b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	636 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	637
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	638 let g:aa = 'aa'
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	639 def ConcatString(): string
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	640 let res = g:aa .. "bb"
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	641 return res
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	642 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	643
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	644 def Test_disassemble_concat()
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	645 let instr = execute('disassemble ConcatString')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	646 assert_match('ConcatString.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	647 'let res = g:aa .. "bb".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	648 '\d LOADG g:aa.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	649 '\d PUSHS "bb".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	650 '\d 2STRING stack\[-2].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	651 '\d CONCAT.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	652 '\d STORE $.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	653 instr)
19439 b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	654 assert_equal('aabb', ConcatString())
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	655 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	656
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	657 def ListIndex(): number
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	658 let l = [1, 2, 3]
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	659 let res = l[1]
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	660 return res
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	661 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	662
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	663 def Test_disassemble_list_index()
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	664 let instr = execute('disassemble ListIndex')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	665 assert_match('ListIndex.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	666 'let l = \[1, 2, 3].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	667 '\d PUSHNR 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	668 '\d PUSHNR 2.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	669 '\d PUSHNR 3.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	670 '\d NEWLIST size 3.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	671 '\d STORE $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	672 'let res = l\[1].*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	673 '\d LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	674 '\d PUSHNR 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	675 '\d INDEX.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	676 '\d STORE $1.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	677 instr)
19439 b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	678 assert_equal(2, ListIndex())
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	679 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	680
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	681 def DictMember(): number
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	682 let d = #{item: 1}
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	683 let res = d.item
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	684 return res
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	685 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	686
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	687 def Test_disassemble_dict_member()
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	688 let instr = execute('disassemble DictMember')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	689 assert_match('DictMember.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	690 'let d = #{item: 1}.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	691 '\d PUSHS "item".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	692 '\d PUSHNR 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	693 '\d NEWDICT size 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	694 '\d STORE $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	695 'let res = d.item.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	696 '\d LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	697 '\d MEMBER item.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	698 '\d STORE $1.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	699 instr)
19439 b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	700 call assert_equal(1, DictMember())
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	701 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	702
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	703 def NegateNumber(): number
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	704 let nr = 9
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	705 let plus = +nr
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	706 let res = -nr
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	707 return res
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	708 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	709
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	710 def Test_disassemble_negate_number()
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	711 let instr = execute('disassemble NegateNumber')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	712 assert_match('NegateNumber.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	713 'let nr = 9.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	714 '\d STORE 9 in $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	715 'let plus = +nr.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	716 '\d LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	717 '\d CHECKNR.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	718 '\d STORE $1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	719 'let res = -nr.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	720 '\d LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	721 '\d NEGATENR.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	722 '\d STORE $2.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	723 instr)
19439 b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	724 call assert_equal(-9, NegateNumber())
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	725 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	726
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	727 def InvertBool(): bool
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	728 let flag = true
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	729 let invert = !flag
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	730 let res = !!flag
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	731 return res
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	732 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	733
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	734 def Test_disassemble_invert_bool()
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	735 let instr = execute('disassemble InvertBool')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	736 assert_match('InvertBool.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	737 'let flag = true.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	738 '\d PUSH v:true.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	739 '\d STORE $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	740 'let invert = !flag.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	741 '\d LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	742 '\d INVERT (!val).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	743 '\d STORE $1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	744 'let res = !!flag.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	745 '\d LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	746 '\d 2BOOL (!!val).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	747 '\d STORE $2.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	748 instr)
19439 b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	749 call assert_equal(true, InvertBool())
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	750 enddef
b347a6c61090 patch 8.2.0277: Vim9: not all instructions covered by tests Bram Moolenaar <Bram@vim.org> parents: 19390 diff changeset	751
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	752 def Test_disassemble_compare()
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	753 " TODO: COMPAREFUNC
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	754 let cases = [
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	755 ['true == false', 'COMPAREBOOL =='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	756 ['true != false', 'COMPAREBOOL !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	757 ['v:none == v:null', 'COMPARESPECIAL =='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	758 ['v:none != v:null', 'COMPARESPECIAL !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	759
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	760 ['111 == 222', 'COMPARENR =='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	761 ['111 != 222', 'COMPARENR !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	762 ['111 > 222', 'COMPARENR >'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	763 ['111 < 222', 'COMPARENR <'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	764 ['111 >= 222', 'COMPARENR >='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	765 ['111 <= 222', 'COMPARENR <='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	766 ['111 =~ 222', 'COMPARENR =\~'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	767 ['111 !~ 222', 'COMPARENR !\~'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	768
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	769 ['"xx" != "yy"', 'COMPARESTRING !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	770 ['"xx" > "yy"', 'COMPARESTRING >'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	771 ['"xx" < "yy"', 'COMPARESTRING <'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	772 ['"xx" >= "yy"', 'COMPARESTRING >='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	773 ['"xx" <= "yy"', 'COMPARESTRING <='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	774 ['"xx" =~ "yy"', 'COMPARESTRING =\~'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	775 ['"xx" !~ "yy"', 'COMPARESTRING !\~'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	776 ['"xx" is "yy"', 'COMPARESTRING is'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	777 ['"xx" isnot "yy"', 'COMPARESTRING isnot'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	778
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	779 ['0z11 == 0z22', 'COMPAREBLOB =='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	780 ['0z11 != 0z22', 'COMPAREBLOB !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	781 ['0z11 is 0z22', 'COMPAREBLOB is'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	782 ['0z11 isnot 0z22', 'COMPAREBLOB isnot'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	783
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	784 ['[1,2] == [3,4]', 'COMPARELIST =='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	785 ['[1,2] != [3,4]', 'COMPARELIST !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	786 ['[1,2] is [3,4]', 'COMPARELIST is'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	787 ['[1,2] isnot [3,4]', 'COMPARELIST isnot'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	788
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	789 ['#{a:1} == #{x:2}', 'COMPAREDICT =='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	790 ['#{a:1} != #{x:2}', 'COMPAREDICT !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	791 ['#{a:1} is #{x:2}', 'COMPAREDICT is'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	792 ['#{a:1} isnot #{x:2}', 'COMPAREDICT isnot'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	793
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	794 ['{->33} == {->44}', 'COMPAREFUNC =='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	795 ['{->33} != {->44}', 'COMPAREFUNC !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	796 ['{->33} is {->44}', 'COMPAREFUNC is'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	797 ['{->33} isnot {->44}', 'COMPAREFUNC isnot'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	798
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	799 ['77 == g:xx', 'COMPAREANY =='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	800 ['77 != g:xx', 'COMPAREANY !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	801 ['77 > g:xx', 'COMPAREANY >'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	802 ['77 < g:xx', 'COMPAREANY <'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	803 ['77 >= g:xx', 'COMPAREANY >='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	804 ['77 <= g:xx', 'COMPAREANY <='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	805 ['77 =~ g:xx', 'COMPAREANY =\~'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	806 ['77 !~ g:xx', 'COMPAREANY !\~'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	807 ['77 is g:xx', 'COMPAREANY is'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	808 ['77 isnot g:xx', 'COMPAREANY isnot'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	809 ]
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	810 if has('float')
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	811 cases->extend([
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	812 ['1.1 == 2.2', 'COMPAREFLOAT =='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	813 ['1.1 != 2.2', 'COMPAREFLOAT !='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	814 ['1.1 > 2.2', 'COMPAREFLOAT >'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	815 ['1.1 < 2.2', 'COMPAREFLOAT <'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	816 ['1.1 >= 2.2', 'COMPAREFLOAT >='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	817 ['1.1 <= 2.2', 'COMPAREFLOAT <='],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	818 ['1.1 =~ 2.2', 'COMPAREFLOAT =\~'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	819 ['1.1 !~ 2.2', 'COMPAREFLOAT !\~'],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	820 ])
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	821 endif
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	822
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	823 let nr = 1
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	824 for case in cases
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	825 writefile(['def TestCase' .. nr .. '()',
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	826 ' if ' .. case[0],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	827 ' echo 42'
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	828 ' endif',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	829 'enddef'], 'Xdisassemble')
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	830 source Xdisassemble
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	831 let instr = execute('disassemble TestCase' .. nr)
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	832 assert_match('TestCase' .. nr .. '.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	833 'if ' .. substitute(case[0], '[[~]', '\\\0', 'g') .. '.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	834 '\d $PUSH\\|FUNCREF$.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	835 '\d $PUSH\\|FUNCREF\\|LOADG$.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	836 '\d ' .. case[1] .. '.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	837 '\d JUMP_IF_FALSE -> \d\+.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	838 instr)
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	839
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	840 nr += 1
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	841 endfor
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	842
19703 f03357f16ffc patch 8.2.0408: delete() commented out for testing Bram Moolenaar <Bram@vim.org> parents: 19579 diff changeset	843 delete('Xdisassemble')
19342 8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	844 enddef
8ff84bc1c89b patch 8.2.0229: compare instructions not tested Bram Moolenaar <Bram@vim.org> parents: 19338 diff changeset	845
19880 50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	846 def Test_disassemble_compare_const()
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	847 let cases = [
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	848 ['"xx" == "yy"', false],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	849 ['"aa" == "aa"', true],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	850 ['has("eval") ? true : false', true],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	851 ['has("asdf") ? true : false', false],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	852 ]
19880 50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	853
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	854 let nr = 1
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	855 for case in cases
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	856 writefile(['def TestCase' .. nr .. '()',
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	857 ' if ' .. case[0],
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	858 ' echo 42'
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	859 ' endif',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	860 'enddef'], 'Xdisassemble')
19880 50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	861 source Xdisassemble
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	862 let instr = execute('disassemble TestCase' .. nr)
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	863 if case[1]
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	864 " condition true, "echo 42" executed
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	865 assert_match('TestCase' .. nr .. '.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	866 'if ' .. substitute(case[0], '[[~]', '\\\0', 'g') .. '.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	867 '\d PUSHNR 42.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	868 '\d ECHO 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	869 '\d PUSHNR 0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	870 '\d RETURN.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	871 instr)
19880 50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	872 else
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	873 " condition false, function just returns
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	874 assert_match('TestCase' .. nr .. '.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	875 'if ' .. substitute(case[0], '[[~]', '\\\0', 'g') .. '[ \n]*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	876 'echo 42[ \n]*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	877 'endif[ \n]*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	878 '\s\d PUSHNR 0.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	879 '\d RETURN.*',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	880 instr)
19880 50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	881 endif
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	882
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	883 nr += 1
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	884 endfor
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	885
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	886 delete('Xdisassemble')
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	887 enddef
50fa63ca3828 patch 8.2.0496: Vim9: disassemble test fails Bram Moolenaar <Bram@vim.org> parents: 19862 diff changeset	888
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	889 def s:Execute()
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	890 execute 'help vim9.txt'
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	891 let cmd = 'help vim9.txt'
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	892 execute cmd
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	893 let tag = 'vim9.txt'
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	894 execute 'help ' .. tag
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	895 enddef
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	896
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	897 def Test_disassemble_execute()
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	898 let res = execute('disass s:Execute')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	899 assert_match('\<SNR>\d_Execute.' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	900 "execute 'help vim9.txt'.*" ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	901 '\d PUSHS "help vim9.txt".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	902 '\d EXECUTE 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	903 "let cmd = 'help vim9.txt'.*" ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	904 '\d PUSHS "help vim9.txt".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	905 '\d STORE $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	906 'execute cmd.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	907 '\d LOAD $0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	908 '\d EXECUTE 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	909 "let tag = 'vim9.txt'.*" ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	910 '\d PUSHS "vim9.txt".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	911 '\d STORE $1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	912 "execute 'help ' .. tag.*" ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	913 '\d PUSHS "help ".*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	914 '\d LOAD $1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	915 '\d CONCAT.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	916 '\d EXECUTE 1.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	917 '\d PUSHNR 0.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	918 '\d RETURN',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	919 res)
19528 3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	920 enddef
3b026343f398 patch 8.2.0321: Vim9: ":execute" does not work yet Bram Moolenaar <Bram@vim.org> parents: 19483 diff changeset	921
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	922 def SomeStringArg(arg: string)
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	923 echo arg
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	924 enddef
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	925
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	926 def SomeAnyArg(arg: any)
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	927 echo arg
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	928 enddef
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	929
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	930 def SomeStringArgAndReturn(arg: string): string
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	931 return arg
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	932 enddef
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	933
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	934 def Test_display_func()
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	935 let res1 = execute('function SomeStringArg')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	936 assert_match('.* def SomeStringArg(arg: string).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	937 ' echo arg.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	938 ' enddef',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	939 res1)
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	940
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	941 let res2 = execute('function SomeAnyArg')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	942 assert_match('.* def SomeAnyArg(arg: any).*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	943 ' echo arg.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	944 ' enddef',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	945 res2)
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	946
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	947 let res3 = execute('function SomeStringArgAndReturn')
20019 e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	948 assert_match('.* def SomeStringArgAndReturn(arg: string): string.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	949 ' return arg.*' ..
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	950 ' enddef',
e9af5a09a55b patch 8.2.0565: Vim9: tests contain superfluous line continuation Bram Moolenaar <Bram@vim.org> parents: 19912 diff changeset	951 res3)
19579 aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	952 enddef
aae19dd172c0 patch 8.2.0346: Vim9: finding common list type not tested Bram Moolenaar <Bram@vim.org> parents: 19572 diff changeset	953
19330 9c8b803fe598 patch 8.2.0223: some instructions not yet tested Bram Moolenaar <Bram@vim.org> parents: diff changeset	954 " vim: ts=8 sw=2 sts=2 expandtab tw=80 fdm=marker

Mercurial > vim

annotate src/testdir/test_vim9_disassemble.vim @ 20099:058b41f85bcb v8.2.0605