vim: src/testdir/test_arabic.vim annotate

annotate src/testdir/test_arabic.vim @ 31680:24d9c23bf665 v9.0.1172

patch 9.0.1172: when 'selection' is "exclusive" then "1v" is one char short Commit: https://github.com/vim/vim/commit/79c11e399be3d96ed6d1c7458b1380e878ec717b Author: Bram Moolenaar <Bram@vim.org> Date: Tue Jan 10 17:29:29 2023 +0000 patch 9.0.1172: when 'selection' is "exclusive" then "1v" is one char short Problem: When 'selection' is "exclusive" then "1v" is one char short. Solution: Add one character when 'selection' is "exclusive. (closes https://github.com/vim/vim/issues/11791)

author	Bram Moolenaar <Bram@vim.org>
date	Tue, 10 Jan 2023 18:30:04 +0100
parents	ed4d7ab9dcdc
children	5af7b93fc4f5

rev	line source
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	1 " Simplistic testing of Arabic mode.
11221 3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	2 " NOTE: This just checks if the code works. If you know Arabic please add
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	3 " functional tests that check the shaping works with real text.
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	4
17089 8e9e9124c7a2 patch 8.1.1544: some balloon tests don't run when they can Bram Moolenaar <Bram@vim.org> parents: 16951 diff changeset	5 source check.vim
8e9e9124c7a2 patch 8.1.1544: some balloon tests don't run when they can Bram Moolenaar <Bram@vim.org> parents: 16951 diff changeset	6 CheckFeature arabic
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	7
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	8 source view_util.vim
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	9
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	10 " Return list of Unicode characters at line lnum.
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	11 " Combining characters are treated as a single item.
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	12 func s:get_chars(lnum)
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	13 call cursor(a:lnum, 1)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	14 let chars = []
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	15 let numchars = strchars(getline('.'), 1)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	16 for i in range(1, numchars)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	17 exe 'norm ' i . '\|'
13359 81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character Christian Brabandt <cb@256bit.org> parents: 11221 diff changeset	18 let c = execute('ascii')
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character Christian Brabandt <cb@256bit.org> parents: 11221 diff changeset	19 let c = substitute(c, '\n\?<.\{-}Hex\s*', 'U+', 'g')
81c348d40312 patch 8.0.1553: cannot see what digraph is used to insert a character Christian Brabandt <cb@256bit.org> parents: 11221 diff changeset	20 let c = substitute(c, ',\sOct$al$\=\s\d$, Digr ..$\=', '', 'g')
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	21 call add(chars, c)
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	22 endfor
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	23 return chars
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	24 endfunc
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	25
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	26 func Test_arabic_toggle()
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	27 set arabic
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	28 call assert_equal(1, &rightleft)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	29 call assert_equal(1, &arabicshape)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	30 call assert_equal('arabic', &keymap)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	31 call assert_equal(1, &delcombine)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	32
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	33 set iminsert=1 imsearch=1
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	34 set arabic&
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	35 call assert_equal(0, &rightleft)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	36 call assert_equal(1, &arabicshape)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	37 call assert_equal('arabic', &keymap)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	38 call assert_equal(1, &delcombine)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	39 call assert_equal(0, &iminsert)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	40 call assert_equal(-1, &imsearch)
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	41
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	42 set arabicshape& keymap= delcombine&
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	43 endfunc
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	44
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	45 func Test_arabic_input()
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	46 new
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	47 set arabic
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	48 " Typing sghl in Arabic insert mode should show the
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	49 " Arabic word 'Salaam' i.e. 'peace', spelled:
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	50 " SEEN, LAM, ALEF, MEEM.
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	51 " See: https://www.mediawiki.org/wiki/VisualEditor/Typing/Right-to-left
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	52 call feedkeys('isghl!', 'tx')
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	53 call assert_match("^ *!\uFEE1\uFEFC\uFEB3$", ScreenLines(1, &columns)[0])
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	54 call assert_equal([
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	55 \ 'U+0633',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	56 \ 'U+0644 U+0627',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	57 \ 'U+0645',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	58 \ 'U+21'], s:get_chars(1))
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	59
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	60 " Without shaping, it should give individual Arabic letters.
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	61 set noarabicshape
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	62 call assert_match("^ *!\u0645\u0627\u0644\u0633$", ScreenLines(1, &columns)[0])
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	63 call assert_equal([
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	64 \ 'U+0633',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	65 \ 'U+0644',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	66 \ 'U+0627',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	67 \ 'U+0645',
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	68 \ 'U+21'], s:get_chars(1))
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	69
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	70 set arabic& arabicshape&
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	71 bwipe!
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	72 endfunc
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	73
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	74 func Test_arabic_toggle_keymap()
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	75 new
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	76 set arabic
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	77 call feedkeys("i12\<C-^>12\<C-^>12", 'tx')
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	78 call assert_match("^ *٢١21٢١$", ScreenLines(1, &columns)[0])
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	79 call assert_equal('١٢12١٢', getline('.'))
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	80 set arabic&
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	81 bwipe!
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	82 endfunc
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	83
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	84 func Test_delcombine()
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	85 new
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	86 set arabic
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	87 call feedkeys("isghl\<BS>\<BS>", 'tx')
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	88 call assert_match("^ *\uFEDE\uFEB3$", ScreenLines(1, &columns)[0])
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	89 call assert_equal(['U+0633', 'U+0644'], s:get_chars(1))
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	90
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	91 " Now the same with 'nodelcombine'
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	92 set nodelcombine
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	93 %d
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	94 call feedkeys("isghl\<BS>\<BS>", 'tx')
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	95 call assert_match("^ *\uFEB1$", ScreenLines(1, &columns)[0])
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	96 call assert_equal(['U+0633'], s:get_chars(1))
10992 441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	97 set arabic&
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	98 bwipe!
441ca654f65c patch 8.0.0385: no tests for arabic Christian Brabandt <cb@256bit.org> parents: diff changeset	99 endfunc
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	100
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	101 " Values from src/arabic.h (not all used yet)
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	102 let s:a_COMMA = "\u060C"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	103 let s:a_SEMICOLON = "\u061B"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	104 let s:a_QUESTION = "\u061F"
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	105 let s:a_HAMZA = "\u0621"
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	106 let s:a_ALEF_MADDA = "\u0622"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	107 let s:a_ALEF_HAMZA_ABOVE = "\u0623"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	108 let s:a_WAW_HAMZA = "\u0624"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	109 let s:a_ALEF_HAMZA_BELOW = "\u0625"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	110 let s:a_YEH_HAMZA = "\u0626"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	111 let s:a_ALEF = "\u0627"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	112 let s:a_BEH = "\u0628"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	113 let s:a_TEH_MARBUTA = "\u0629"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	114 let s:a_TEH = "\u062a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	115 let s:a_THEH = "\u062b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	116 let s:a_JEEM = "\u062c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	117 let s:a_HAH = "\u062d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	118 let s:a_KHAH = "\u062e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	119 let s:a_DAL = "\u062f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	120 let s:a_THAL = "\u0630"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	121 let s:a_REH = "\u0631"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	122 let s:a_ZAIN = "\u0632"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	123 let s:a_SEEN = "\u0633"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	124 let s:a_SHEEN = "\u0634"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	125 let s:a_SAD = "\u0635"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	126 let s:a_DAD = "\u0636"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	127 let s:a_TAH = "\u0637"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	128 let s:a_ZAH = "\u0638"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	129 let s:a_AIN = "\u0639"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	130 let s:a_GHAIN = "\u063a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	131 let s:a_TATWEEL = "\u0640"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	132 let s:a_FEH = "\u0641"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	133 let s:a_QAF = "\u0642"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	134 let s:a_KAF = "\u0643"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	135 let s:a_LAM = "\u0644"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	136 let s:a_MEEM = "\u0645"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	137 let s:a_NOON = "\u0646"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	138 let s:a_HEH = "\u0647"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	139 let s:a_WAW = "\u0648"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	140 let s:a_ALEF_MAKSURA = "\u0649"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	141 let s:a_YEH = "\u064a"
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	142
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	143 let s:a_FATHATAN = "\u064b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	144 let s:a_DAMMATAN = "\u064c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	145 let s:a_KASRATAN = "\u064d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	146 let s:a_FATHA = "\u064e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	147 let s:a_DAMMA = "\u064f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	148 let s:a_KASRA = "\u0650"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	149 let s:a_SHADDA = "\u0651"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	150 let s:a_SUKUN = "\u0652"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	151
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	152 let s:a_MADDA_ABOVE = "\u0653"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	153 let s:a_HAMZA_ABOVE = "\u0654"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	154 let s:a_HAMZA_BELOW = "\u0655"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	155
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	156 let s:a_ZERO = "\u0660"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	157 let s:a_ONE = "\u0661"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	158 let s:a_TWO = "\u0662"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	159 let s:a_THREE = "\u0663"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	160 let s:a_FOUR = "\u0664"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	161 let s:a_FIVE = "\u0665"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	162 let s:a_SIX = "\u0666"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	163 let s:a_SEVEN = "\u0667"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	164 let s:a_EIGHT = "\u0668"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	165 let s:a_NINE = "\u0669"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	166 let s:a_PERCENT = "\u066a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	167 let s:a_DECIMAL = "\u066b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	168 let s:a_THOUSANDS = "\u066c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	169 let s:a_STAR = "\u066d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	170 let s:a_MINI_ALEF = "\u0670"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	171
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	172 let s:a_s_FATHATAN = "\ufe70"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	173 let s:a_m_TATWEEL_FATHATAN = "\ufe71"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	174 let s:a_s_DAMMATAN = "\ufe72"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	175
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	176 let s:a_s_KASRATAN = "\ufe74"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	177
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	178 let s:a_s_FATHA = "\ufe76"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	179 let s:a_m_FATHA = "\ufe77"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	180 let s:a_s_DAMMA = "\ufe78"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	181 let s:a_m_DAMMA = "\ufe79"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	182 let s:a_s_KASRA = "\ufe7a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	183 let s:a_m_KASRA = "\ufe7b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	184 let s:a_s_SHADDA = "\ufe7c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	185 let s:a_m_SHADDA = "\ufe7d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	186 let s:a_s_SUKUN = "\ufe7e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	187 let s:a_m_SUKUN = "\ufe7f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	188
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	189 let s:a_s_HAMZA = "\ufe80"
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	190 let s:a_s_ALEF_MADDA = "\ufe81"
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	191 let s:a_f_ALEF_MADDA = "\ufe82"
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	192 let s:a_s_ALEF_HAMZA_ABOVE = "\ufe83"
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	193 let s:a_f_ALEF_HAMZA_ABOVE = "\ufe84"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	194 let s:a_s_WAW_HAMZA = "\ufe85"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	195 let s:a_f_WAW_HAMZA = "\ufe86"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	196 let s:a_s_ALEF_HAMZA_BELOW = "\ufe87"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	197 let s:a_f_ALEF_HAMZA_BELOW = "\ufe88"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	198 let s:a_s_YEH_HAMZA = "\ufe89"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	199 let s:a_f_YEH_HAMZA = "\ufe8a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	200 let s:a_i_YEH_HAMZA = "\ufe8b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	201 let s:a_m_YEH_HAMZA = "\ufe8c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	202 let s:a_s_ALEF = "\ufe8d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	203 let s:a_f_ALEF = "\ufe8e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	204 let s:a_s_BEH = "\ufe8f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	205 let s:a_f_BEH = "\ufe90"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	206 let s:a_i_BEH = "\ufe91"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	207 let s:a_m_BEH = "\ufe92"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	208 let s:a_s_TEH_MARBUTA = "\ufe93"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	209 let s:a_f_TEH_MARBUTA = "\ufe94"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	210 let s:a_s_TEH = "\ufe95"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	211 let s:a_f_TEH = "\ufe96"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	212 let s:a_i_TEH = "\ufe97"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	213 let s:a_m_TEH = "\ufe98"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	214 let s:a_s_THEH = "\ufe99"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	215 let s:a_f_THEH = "\ufe9a"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	216 let s:a_i_THEH = "\ufe9b"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	217 let s:a_m_THEH = "\ufe9c"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	218 let s:a_s_JEEM = "\ufe9d"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	219 let s:a_f_JEEM = "\ufe9e"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	220 let s:a_i_JEEM = "\ufe9f"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	221 let s:a_m_JEEM = "\ufea0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	222 let s:a_s_HAH = "\ufea1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	223 let s:a_f_HAH = "\ufea2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	224 let s:a_i_HAH = "\ufea3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	225 let s:a_m_HAH = "\ufea4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	226 let s:a_s_KHAH = "\ufea5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	227 let s:a_f_KHAH = "\ufea6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	228 let s:a_i_KHAH = "\ufea7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	229 let s:a_m_KHAH = "\ufea8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	230 let s:a_s_DAL = "\ufea9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	231 let s:a_f_DAL = "\ufeaa"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	232 let s:a_s_THAL = "\ufeab"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	233 let s:a_f_THAL = "\ufeac"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	234 let s:a_s_REH = "\ufead"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	235 let s:a_f_REH = "\ufeae"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	236 let s:a_s_ZAIN = "\ufeaf"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	237 let s:a_f_ZAIN = "\ufeb0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	238 let s:a_s_SEEN = "\ufeb1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	239 let s:a_f_SEEN = "\ufeb2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	240 let s:a_i_SEEN = "\ufeb3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	241 let s:a_m_SEEN = "\ufeb4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	242 let s:a_s_SHEEN = "\ufeb5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	243 let s:a_f_SHEEN = "\ufeb6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	244 let s:a_i_SHEEN = "\ufeb7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	245 let s:a_m_SHEEN = "\ufeb8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	246 let s:a_s_SAD = "\ufeb9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	247 let s:a_f_SAD = "\ufeba"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	248 let s:a_i_SAD = "\ufebb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	249 let s:a_m_SAD = "\ufebc"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	250 let s:a_s_DAD = "\ufebd"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	251 let s:a_f_DAD = "\ufebe"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	252 let s:a_i_DAD = "\ufebf"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	253 let s:a_m_DAD = "\ufec0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	254 let s:a_s_TAH = "\ufec1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	255 let s:a_f_TAH = "\ufec2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	256 let s:a_i_TAH = "\ufec3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	257 let s:a_m_TAH = "\ufec4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	258 let s:a_s_ZAH = "\ufec5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	259 let s:a_f_ZAH = "\ufec6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	260 let s:a_i_ZAH = "\ufec7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	261 let s:a_m_ZAH = "\ufec8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	262 let s:a_s_AIN = "\ufec9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	263 let s:a_f_AIN = "\ufeca"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	264 let s:a_i_AIN = "\ufecb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	265 let s:a_m_AIN = "\ufecc"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	266 let s:a_s_GHAIN = "\ufecd"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	267 let s:a_f_GHAIN = "\ufece"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	268 let s:a_i_GHAIN = "\ufecf"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	269 let s:a_m_GHAIN = "\ufed0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	270 let s:a_s_FEH = "\ufed1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	271 let s:a_f_FEH = "\ufed2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	272 let s:a_i_FEH = "\ufed3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	273 let s:a_m_FEH = "\ufed4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	274 let s:a_s_QAF = "\ufed5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	275 let s:a_f_QAF = "\ufed6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	276 let s:a_i_QAF = "\ufed7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	277 let s:a_m_QAF = "\ufed8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	278 let s:a_s_KAF = "\ufed9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	279 let s:a_f_KAF = "\ufeda"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	280 let s:a_i_KAF = "\ufedb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	281 let s:a_m_KAF = "\ufedc"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	282 let s:a_s_LAM = "\ufedd"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	283 let s:a_f_LAM = "\ufede"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	284 let s:a_i_LAM = "\ufedf"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	285 let s:a_m_LAM = "\ufee0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	286 let s:a_s_MEEM = "\ufee1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	287 let s:a_f_MEEM = "\ufee2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	288 let s:a_i_MEEM = "\ufee3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	289 let s:a_m_MEEM = "\ufee4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	290 let s:a_s_NOON = "\ufee5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	291 let s:a_f_NOON = "\ufee6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	292 let s:a_i_NOON = "\ufee7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	293 let s:a_m_NOON = "\ufee8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	294 let s:a_s_HEH = "\ufee9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	295 let s:a_f_HEH = "\ufeea"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	296 let s:a_i_HEH = "\ufeeb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	297 let s:a_m_HEH = "\ufeec"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	298 let s:a_s_WAW = "\ufeed"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	299 let s:a_f_WAW = "\ufeee"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	300 let s:a_s_ALEF_MAKSURA = "\ufeef"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	301 let s:a_f_ALEF_MAKSURA = "\ufef0"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	302 let s:a_s_YEH = "\ufef1"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	303 let s:a_f_YEH = "\ufef2"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	304 let s:a_i_YEH = "\ufef3"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	305 let s:a_m_YEH = "\ufef4"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	306 let s:a_s_LAM_ALEF_MADDA_ABOVE = "\ufef5"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	307 let s:a_f_LAM_ALEF_MADDA_ABOVE = "\ufef6"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	308 let s:a_s_LAM_ALEF_HAMZA_ABOVE = "\ufef7"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	309 let s:a_f_LAM_ALEF_HAMZA_ABOVE = "\ufef8"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	310 let s:a_s_LAM_ALEF_HAMZA_BELOW = "\ufef9"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	311 let s:a_f_LAM_ALEF_HAMZA_BELOW = "\ufefa"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	312 let s:a_s_LAM_ALEF = "\ufefb"
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	313 let s:a_f_LAM_ALEF = "\ufefc"
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	314
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	315 let s:a_BYTE_ORDER_MARK = "\ufeff"
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	316
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	317 func Test_shape_initial()
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	318 new
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	319 set arabicshape
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	320
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	321 " Shaping arabic {testchar} non-arabic Tests chg_c_a2i().
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	322 " pair[0] = testchar, pair[1] = next-result, pair[2] = current-result
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	323 for pair in [[s:a_YEH_HAMZA, s:a_f_GHAIN, s:a_i_YEH_HAMZA],
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	324 \ [s:a_HAMZA, s:a_s_GHAIN, s:a_s_HAMZA],
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	325 \ [s:a_ALEF_MADDA, s:a_s_GHAIN, s:a_s_ALEF_MADDA],
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	326 \ [s:a_ALEF_HAMZA_ABOVE, s:a_s_GHAIN, s:a_s_ALEF_HAMZA_ABOVE],
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	327 \ [s:a_WAW_HAMZA, s:a_s_GHAIN, s:a_s_WAW_HAMZA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	328 \ [s:a_ALEF_HAMZA_BELOW, s:a_s_GHAIN, s:a_s_ALEF_HAMZA_BELOW],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	329 \ [s:a_ALEF, s:a_s_GHAIN, s:a_s_ALEF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	330 \ [s:a_TEH_MARBUTA, s:a_s_GHAIN, s:a_s_TEH_MARBUTA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	331 \ [s:a_DAL, s:a_s_GHAIN, s:a_s_DAL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	332 \ [s:a_THAL, s:a_s_GHAIN, s:a_s_THAL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	333 \ [s:a_REH, s:a_s_GHAIN, s:a_s_REH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	334 \ [s:a_ZAIN, s:a_s_GHAIN, s:a_s_ZAIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	335 \ [s:a_TATWEEL, s:a_f_GHAIN, s:a_TATWEEL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	336 \ [s:a_WAW, s:a_s_GHAIN, s:a_s_WAW],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	337 \ [s:a_ALEF_MAKSURA, s:a_s_GHAIN, s:a_s_ALEF_MAKSURA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	338 \ [s:a_BEH, s:a_f_GHAIN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	339 \ [s:a_TEH, s:a_f_GHAIN, s:a_i_TEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	340 \ [s:a_THEH, s:a_f_GHAIN, s:a_i_THEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	341 \ [s:a_JEEM, s:a_f_GHAIN, s:a_i_JEEM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	342 \ [s:a_HAH, s:a_f_GHAIN, s:a_i_HAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	343 \ [s:a_KHAH, s:a_f_GHAIN, s:a_i_KHAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	344 \ [s:a_SEEN, s:a_f_GHAIN, s:a_i_SEEN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	345 \ [s:a_SHEEN, s:a_f_GHAIN, s:a_i_SHEEN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	346 \ [s:a_SAD, s:a_f_GHAIN, s:a_i_SAD],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	347 \ [s:a_DAD, s:a_f_GHAIN, s:a_i_DAD],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	348 \ [s:a_TAH, s:a_f_GHAIN, s:a_i_TAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	349 \ [s:a_ZAH, s:a_f_GHAIN, s:a_i_ZAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	350 \ [s:a_AIN, s:a_f_GHAIN, s:a_i_AIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	351 \ [s:a_GHAIN, s:a_f_GHAIN, s:a_i_GHAIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	352 \ [s:a_FEH, s:a_f_GHAIN, s:a_i_FEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	353 \ [s:a_QAF, s:a_f_GHAIN, s:a_i_QAF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	354 \ [s:a_KAF, s:a_f_GHAIN, s:a_i_KAF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	355 \ [s:a_LAM, s:a_f_GHAIN, s:a_i_LAM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	356 \ [s:a_MEEM, s:a_f_GHAIN, s:a_i_MEEM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	357 \ [s:a_NOON, s:a_f_GHAIN, s:a_i_NOON],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	358 \ [s:a_HEH, s:a_f_GHAIN, s:a_i_HEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	359 \ [s:a_YEH, s:a_f_GHAIN, s:a_i_YEH],
11000 307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	360 \ ]
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	361 call setline(1, s:a_GHAIN . pair[0] . ' ')
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	362 call assert_equal([pair[1] . pair[2] . ' '], ScreenLines(1, 3))
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	363 endfor
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	364
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	365 set arabicshape&
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	366 bwipe!
307f9ae2a7fb patch 8.0.0389: test for arabic does not check what is displayed Christian Brabandt <cb@256bit.org> parents: 10992 diff changeset	367 endfunc
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	368
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	369 func Test_shape_isolated()
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	370 new
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	371 set arabicshape
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	372
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	373 " Shaping non-arabic {testchar} non-arabic Tests chg_c_a2s().
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	374 " pair[0] = testchar, pair[1] = current-result
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	375 for pair in [[s:a_HAMZA, s:a_s_HAMZA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	376 \ [s:a_ALEF_MADDA, s:a_s_ALEF_MADDA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	377 \ [s:a_ALEF_HAMZA_ABOVE, s:a_s_ALEF_HAMZA_ABOVE],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	378 \ [s:a_WAW_HAMZA, s:a_s_WAW_HAMZA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	379 \ [s:a_ALEF_HAMZA_BELOW, s:a_s_ALEF_HAMZA_BELOW],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	380 \ [s:a_YEH_HAMZA, s:a_s_YEH_HAMZA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	381 \ [s:a_ALEF, s:a_s_ALEF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	382 \ [s:a_TEH_MARBUTA, s:a_s_TEH_MARBUTA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	383 \ [s:a_DAL, s:a_s_DAL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	384 \ [s:a_THAL, s:a_s_THAL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	385 \ [s:a_REH, s:a_s_REH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	386 \ [s:a_ZAIN, s:a_s_ZAIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	387 \ [s:a_TATWEEL, s:a_TATWEEL],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	388 \ [s:a_WAW, s:a_s_WAW],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	389 \ [s:a_ALEF_MAKSURA, s:a_s_ALEF_MAKSURA],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	390 \ [s:a_BEH, s:a_s_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	391 \ [s:a_TEH, s:a_s_TEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	392 \ [s:a_THEH, s:a_s_THEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	393 \ [s:a_JEEM, s:a_s_JEEM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	394 \ [s:a_HAH, s:a_s_HAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	395 \ [s:a_KHAH, s:a_s_KHAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	396 \ [s:a_SEEN, s:a_s_SEEN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	397 \ [s:a_SHEEN, s:a_s_SHEEN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	398 \ [s:a_SAD, s:a_s_SAD],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	399 \ [s:a_DAD, s:a_s_DAD],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	400 \ [s:a_TAH, s:a_s_TAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	401 \ [s:a_ZAH, s:a_s_ZAH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	402 \ [s:a_AIN, s:a_s_AIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	403 \ [s:a_GHAIN, s:a_s_GHAIN],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	404 \ [s:a_FEH, s:a_s_FEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	405 \ [s:a_QAF, s:a_s_QAF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	406 \ [s:a_KAF, s:a_s_KAF],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	407 \ [s:a_LAM, s:a_s_LAM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	408 \ [s:a_MEEM, s:a_s_MEEM],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	409 \ [s:a_NOON, s:a_s_NOON],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	410 \ [s:a_HEH, s:a_s_HEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	411 \ [s:a_YEH, s:a_s_YEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	412 \ ]
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	413 call setline(1, ' ' . pair[0] . ' ')
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	414 call assert_equal([' ' . pair[1] . ' '], ScreenLines(1, 3))
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	415 endfor
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	416
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	417 set arabicshape&
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	418 bwipe!
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	419 endfunc
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	420
11221 3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	421 func Test_shape_iso_to_medial()
11004 f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	422 new
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	423 set arabicshape
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	424
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	425 " Shaping arabic {testchar} arabic Tests chg_c_a2m().
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	426 " pair[0] = testchar, pair[1] = next-result, pair[2] = current-result,
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	427 " pair[3] = previous-result
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	428 for pair in [[s:a_HAMZA, s:a_s_GHAIN, s:a_s_HAMZA, s:a_s_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	429 \[s:a_ALEF_MADDA, s:a_s_GHAIN, s:a_f_ALEF_MADDA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	430 \[s:a_ALEF_HAMZA_ABOVE, s:a_s_GHAIN, s:a_f_ALEF_HAMZA_ABOVE, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	431 \[s:a_WAW_HAMZA, s:a_s_GHAIN, s:a_f_WAW_HAMZA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	432 \[s:a_ALEF_HAMZA_BELOW, s:a_s_GHAIN, s:a_f_ALEF_HAMZA_BELOW, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	433 \[s:a_YEH_HAMZA, s:a_f_GHAIN, s:a_m_YEH_HAMZA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	434 \[s:a_ALEF, s:a_s_GHAIN, s:a_f_ALEF, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	435 \[s:a_BEH, s:a_f_GHAIN, s:a_m_BEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	436 \[s:a_TEH_MARBUTA, s:a_s_GHAIN, s:a_f_TEH_MARBUTA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	437 \[s:a_TEH, s:a_f_GHAIN, s:a_m_TEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	438 \[s:a_THEH, s:a_f_GHAIN, s:a_m_THEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	439 \[s:a_JEEM, s:a_f_GHAIN, s:a_m_JEEM, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	440 \[s:a_HAH, s:a_f_GHAIN, s:a_m_HAH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	441 \[s:a_KHAH, s:a_f_GHAIN, s:a_m_KHAH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	442 \[s:a_DAL, s:a_s_GHAIN, s:a_f_DAL, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	443 \[s:a_THAL, s:a_s_GHAIN, s:a_f_THAL, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	444 \[s:a_REH, s:a_s_GHAIN, s:a_f_REH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	445 \[s:a_ZAIN, s:a_s_GHAIN, s:a_f_ZAIN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	446 \[s:a_SEEN, s:a_f_GHAIN, s:a_m_SEEN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	447 \[s:a_SHEEN, s:a_f_GHAIN, s:a_m_SHEEN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	448 \[s:a_SAD, s:a_f_GHAIN, s:a_m_SAD, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	449 \[s:a_DAD, s:a_f_GHAIN, s:a_m_DAD, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	450 \[s:a_TAH, s:a_f_GHAIN, s:a_m_TAH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	451 \[s:a_ZAH, s:a_f_GHAIN, s:a_m_ZAH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	452 \[s:a_AIN, s:a_f_GHAIN, s:a_m_AIN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	453 \[s:a_GHAIN, s:a_f_GHAIN, s:a_m_GHAIN, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	454 \[s:a_TATWEEL, s:a_f_GHAIN, s:a_TATWEEL, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	455 \[s:a_FEH, s:a_f_GHAIN, s:a_m_FEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	456 \[s:a_QAF, s:a_f_GHAIN, s:a_m_QAF, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	457 \[s:a_KAF, s:a_f_GHAIN, s:a_m_KAF, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	458 \[s:a_LAM, s:a_f_GHAIN, s:a_m_LAM, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	459 \[s:a_MEEM, s:a_f_GHAIN, s:a_m_MEEM, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	460 \[s:a_NOON, s:a_f_GHAIN, s:a_m_NOON, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	461 \[s:a_HEH, s:a_f_GHAIN, s:a_m_HEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	462 \[s:a_WAW, s:a_s_GHAIN, s:a_f_WAW, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	463 \[s:a_ALEF_MAKSURA, s:a_s_GHAIN, s:a_f_ALEF_MAKSURA, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	464 \[s:a_YEH, s:a_f_GHAIN, s:a_m_YEH, s:a_i_BEH],
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	465 \ ]
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	466 call setline(1, s:a_GHAIN . pair[0] . s:a_BEH)
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	467 call assert_equal([pair[1] . pair[2] . pair[3]], ScreenLines(1, 3))
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	468 endfor
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	469
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	470 set arabicshape&
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	471 bwipe!
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	472 endfunc
f91d4c95b696 patch 8.0.0391: arabic support is verbose and not well tested Christian Brabandt <cb@256bit.org> parents: 11000 diff changeset	473
11221 3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	474 func Test_shape_final()
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	475 new
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	476 set arabicshape
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	477
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	478 " Shaping arabic {testchar} arabic Tests chg_c_a2f().
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	479 " pair[0] = testchar, pair[1] = current-result, pair[2] = previous-result
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	480 for pair in [[s:a_HAMZA, s:a_s_HAMZA, s:a_s_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	481 \[s:a_ALEF_MADDA, s:a_f_ALEF_MADDA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	482 \[s:a_ALEF_HAMZA_ABOVE, s:a_f_ALEF_HAMZA_ABOVE, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	483 \[s:a_WAW_HAMZA, s:a_f_WAW_HAMZA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	484 \[s:a_ALEF_HAMZA_BELOW, s:a_f_ALEF_HAMZA_BELOW, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	485 \[s:a_YEH_HAMZA, s:a_f_YEH_HAMZA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	486 \[s:a_ALEF, s:a_f_ALEF, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	487 \[s:a_BEH, s:a_f_BEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	488 \[s:a_TEH_MARBUTA, s:a_f_TEH_MARBUTA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	489 \[s:a_TEH, s:a_f_TEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	490 \[s:a_THEH, s:a_f_THEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	491 \[s:a_JEEM, s:a_f_JEEM, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	492 \[s:a_HAH, s:a_f_HAH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	493 \[s:a_KHAH, s:a_f_KHAH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	494 \[s:a_DAL, s:a_f_DAL, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	495 \[s:a_THAL, s:a_f_THAL, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	496 \[s:a_REH, s:a_f_REH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	497 \[s:a_ZAIN, s:a_f_ZAIN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	498 \[s:a_SEEN, s:a_f_SEEN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	499 \[s:a_SHEEN, s:a_f_SHEEN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	500 \[s:a_SAD, s:a_f_SAD, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	501 \[s:a_DAD, s:a_f_DAD, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	502 \[s:a_TAH, s:a_f_TAH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	503 \[s:a_ZAH, s:a_f_ZAH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	504 \[s:a_AIN, s:a_f_AIN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	505 \[s:a_GHAIN, s:a_f_GHAIN, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	506 \[s:a_TATWEEL, s:a_TATWEEL, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	507 \[s:a_FEH, s:a_f_FEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	508 \[s:a_QAF, s:a_f_QAF, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	509 \[s:a_KAF, s:a_f_KAF, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	510 \[s:a_LAM, s:a_f_LAM, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	511 \[s:a_MEEM, s:a_f_MEEM, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	512 \[s:a_NOON, s:a_f_NOON, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	513 \[s:a_HEH, s:a_f_HEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	514 \[s:a_WAW, s:a_f_WAW, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	515 \[s:a_ALEF_MAKSURA, s:a_f_ALEF_MAKSURA, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	516 \[s:a_YEH, s:a_f_YEH, s:a_i_BEH],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	517 \ ]
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	518 call setline(1, ' ' . pair[0] . s:a_BEH)
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	519 call assert_equal([' ' . pair[1] . pair[2]], ScreenLines(1, 3))
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	520 endfor
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	521
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	522 set arabicshape&
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	523 bwipe!
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	524 endfunc
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	525
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	526 func Test_shape_combination_final()
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	527 new
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	528 set arabicshape
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	529
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	530 " Shaping arabic {testchar} arabic Tests chg_c_laa2f().
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	531 " pair[0] = testchar, pair[1] = current-result
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	532 for pair in [[s:a_ALEF_MADDA, s:a_f_LAM_ALEF_MADDA_ABOVE],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	533 \ [s:a_ALEF_HAMZA_ABOVE, s:a_f_LAM_ALEF_HAMZA_ABOVE],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	534 \ [s:a_ALEF_HAMZA_BELOW, s:a_f_LAM_ALEF_HAMZA_BELOW],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	535 \ [s:a_ALEF, s:a_f_LAM_ALEF],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	536 \ ]
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	537 " The test char is a composing char, put on s:a_LAM.
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	538 call setline(1, ' ' . s:a_LAM . pair[0] . s:a_BEH)
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	539 call assert_equal([' ' . pair[1] . s:a_i_BEH], ScreenLines(1, 3))
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	540 endfor
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	541
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	542 set arabicshape&
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	543 bwipe!
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	544 endfunc
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	545
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	546 func Test_shape_combination_isolated()
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	547 new
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	548 set arabicshape
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	549
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	550 " Shaping arabic {testchar} arabic Tests chg_c_laa2i().
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	551 " pair[0] = testchar, pair[1] = current-result
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	552 for pair in [[s:a_ALEF_MADDA, s:a_s_LAM_ALEF_MADDA_ABOVE],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	553 \ [s:a_ALEF_HAMZA_ABOVE, s:a_s_LAM_ALEF_HAMZA_ABOVE],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	554 \ [s:a_ALEF_HAMZA_BELOW, s:a_s_LAM_ALEF_HAMZA_BELOW],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	555 \ [s:a_ALEF, s:a_s_LAM_ALEF],
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	556 \ ]
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	557 " The test char is a composing char, put on s:a_LAM.
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	558 call setline(1, ' ' . s:a_LAM . pair[0] . ' ')
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	559 call assert_equal([' ' . pair[1] . ' '], ScreenLines(1, 3))
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	560 endfor
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	561
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	562 set arabicshape&
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	563 bwipe!
3fa27b97d263 patch 8.0.0497: arabic support is not fully tested Christian Brabandt <cb@256bit.org> parents: 11004 diff changeset	564 endfunc
19550 b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	565
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	566 " Test for entering arabic character in a search command
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	567 func Test_arabic_chars_in_search_cmd()
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	568 new
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	569 set arabic
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	570 call feedkeys("i\nsghl!\<C-^>vim\<C-^>", 'tx')
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	571 call cursor(1, 1)
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	572 call feedkeys("/^sghl!\<C-^>vim$\<C-^>\<CR>", 'tx')
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	573 call assert_equal([2, 1], [line('.'), col('.')])
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	574
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	575 " Try searching in left-to-right mode
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	576 set rightleftcmd=
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	577 call cursor(1, 1)
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	578 call feedkeys("/^sghl!\<C-^>vim$\<CR>", 'tx')
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	579 call assert_equal([2, 1], [line('.'), col('.')])
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	580
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	581 set rightleftcmd&
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	582 set rightleft&
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	583 set arabic&
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	584 bwipe!
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	585 endfunc
b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	586
24616 ed4d7ab9dcdc patch 8.2.2847: Perl not tested sufficiently Bram Moolenaar <Bram@vim.org> parents: 19550 diff changeset	587 func Test_W17_arabic_requires_utf8()
ed4d7ab9dcdc patch 8.2.2847: Perl not tested sufficiently Bram Moolenaar <Bram@vim.org> parents: 19550 diff changeset	588 let save_enc = &encoding
ed4d7ab9dcdc patch 8.2.2847: Perl not tested sufficiently Bram Moolenaar <Bram@vim.org> parents: 19550 diff changeset	589 set encoding=latin1 arabic
ed4d7ab9dcdc patch 8.2.2847: Perl not tested sufficiently Bram Moolenaar <Bram@vim.org> parents: 19550 diff changeset	590 call assert_match('^W17:', GetMessages()[-1])
ed4d7ab9dcdc patch 8.2.2847: Perl not tested sufficiently Bram Moolenaar <Bram@vim.org> parents: 19550 diff changeset	591 set arabic&
ed4d7ab9dcdc patch 8.2.2847: Perl not tested sufficiently Bram Moolenaar <Bram@vim.org> parents: 19550 diff changeset	592 let &encoding = save_enc
ed4d7ab9dcdc patch 8.2.2847: Perl not tested sufficiently Bram Moolenaar <Bram@vim.org> parents: 19550 diff changeset	593 endfunc
ed4d7ab9dcdc patch 8.2.2847: Perl not tested sufficiently Bram Moolenaar <Bram@vim.org> parents: 19550 diff changeset	594
19550 b3ef3538b389 patch 8.2.0332: some code in ex_getln.c not covered by tests Bram Moolenaar <Bram@vim.org> parents: 17089 diff changeset	595 " vim: shiftwidth=2 sts=2 expandtab

Mercurial > vim

annotate src/testdir/test_arabic.vim @ 31680:24d9c23bf665 v9.0.1172