forked from aniani/vim
patch 8.0.0263: Farsi support is not tested enough
Problem: Farsi support is not tested enough. Solution: Add more tests for Farsi. Clean up the code.
This commit is contained in:
100
src/farsi.c
100
src/farsi.c
@@ -1920,56 +1920,56 @@ cmdl_fkmap(int c)
|
||||
case NL:
|
||||
case TAB:
|
||||
|
||||
switch ((tempc = cmd_gchar(AT_CURSOR)))
|
||||
{
|
||||
case _BE:
|
||||
case _PE:
|
||||
case _TE:
|
||||
case _SE:
|
||||
case _JIM:
|
||||
case _CHE:
|
||||
case _HE_J:
|
||||
case _XE:
|
||||
case _SIN:
|
||||
case _SHIN:
|
||||
case _SAD:
|
||||
case _ZAD:
|
||||
case _AYN:
|
||||
case _GHAYN:
|
||||
case _FE:
|
||||
case _GHAF:
|
||||
case _KAF:
|
||||
case _GAF:
|
||||
case _LAM:
|
||||
case _MIM:
|
||||
case _NOON:
|
||||
case _HE:
|
||||
case _HE_:
|
||||
cmd_pchar(toF_TyA(tempc), AT_CURSOR);
|
||||
break;
|
||||
case _AYN_:
|
||||
cmd_pchar(AYN_, AT_CURSOR);
|
||||
break;
|
||||
case _GHAYN_:
|
||||
cmd_pchar(GHAYN_, AT_CURSOR);
|
||||
break;
|
||||
case _IE:
|
||||
if (F_is_TyB_TyC_TyD(SRC_CMD, AT_CURSOR+1))
|
||||
cmd_pchar(IE_, AT_CURSOR);
|
||||
else
|
||||
cmd_pchar(IE, AT_CURSOR);
|
||||
break;
|
||||
case _YEE:
|
||||
if (F_is_TyB_TyC_TyD(SRC_CMD, AT_CURSOR+1))
|
||||
cmd_pchar(YEE_, AT_CURSOR);
|
||||
else
|
||||
cmd_pchar(YEE, AT_CURSOR);
|
||||
break;
|
||||
case _YE:
|
||||
if (F_is_TyB_TyC_TyD(SRC_CMD, AT_CURSOR+1))
|
||||
cmd_pchar(YE_, AT_CURSOR);
|
||||
else
|
||||
cmd_pchar(YE, AT_CURSOR);
|
||||
switch ((tempc = cmd_gchar(AT_CURSOR)))
|
||||
{
|
||||
case _BE:
|
||||
case _PE:
|
||||
case _TE:
|
||||
case _SE:
|
||||
case _JIM:
|
||||
case _CHE:
|
||||
case _HE_J:
|
||||
case _XE:
|
||||
case _SIN:
|
||||
case _SHIN:
|
||||
case _SAD:
|
||||
case _ZAD:
|
||||
case _AYN:
|
||||
case _GHAYN:
|
||||
case _FE:
|
||||
case _GHAF:
|
||||
case _KAF:
|
||||
case _GAF:
|
||||
case _LAM:
|
||||
case _MIM:
|
||||
case _NOON:
|
||||
case _HE:
|
||||
case _HE_:
|
||||
cmd_pchar(toF_TyA(tempc), AT_CURSOR);
|
||||
break;
|
||||
case _AYN_:
|
||||
cmd_pchar(AYN_, AT_CURSOR);
|
||||
break;
|
||||
case _GHAYN_:
|
||||
cmd_pchar(GHAYN_, AT_CURSOR);
|
||||
break;
|
||||
case _IE:
|
||||
if (F_is_TyB_TyC_TyD(SRC_CMD, AT_CURSOR+1))
|
||||
cmd_pchar(IE_, AT_CURSOR);
|
||||
else
|
||||
cmd_pchar(IE, AT_CURSOR);
|
||||
break;
|
||||
case _YEE:
|
||||
if (F_is_TyB_TyC_TyD(SRC_CMD, AT_CURSOR+1))
|
||||
cmd_pchar(YEE_, AT_CURSOR);
|
||||
else
|
||||
cmd_pchar(YEE, AT_CURSOR);
|
||||
break;
|
||||
case _YE:
|
||||
if (F_is_TyB_TyC_TyD(SRC_CMD, AT_CURSOR+1))
|
||||
cmd_pchar(YE_, AT_CURSOR);
|
||||
else
|
||||
cmd_pchar(YE, AT_CURSOR);
|
||||
}
|
||||
|
||||
switch (c)
|
||||
|
||||
@@ -91,13 +91,43 @@ func Test_input_farsi()
|
||||
call feedkeys("aabc0123456789.+-^%#=xyz\<Esc>", 'tx')
|
||||
call assert_equal("\x8c旽蔭左重此虞項斑盛啪\x93<39>", getline('.'))
|
||||
|
||||
" all non-number special chars
|
||||
call feedkeys("aB E F H I K L M O P Q R T U W Y ` ! @ # $ % ^ & * () - _ = + \\ | : \" . / < > ? \<Esc>", 'tx')
|
||||
call assert_equal("\x8c旽蔭左重此虞項斑盛啪\x93捸𨨏嬟脃𠃮䭾删覉惽髗𦡆𦆭峁𦷜𣙷𧂭𨯂迚<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>貝<EFBFBD>𣳇𧒆𠼻𧙖𥻗舚朌僙<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", getline('.'))
|
||||
" all non-number special chars with spaces
|
||||
call feedkeys("oB E F H I K L M O P Q R T U W Y ` ! @ # $ % ^ & * () - _ = + \\ | : \" . / < > ? \<Esc>", 'tx')
|
||||
call assert_equal("<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>[髗𦡆𦆭峁𦷜𣙷𧂭𨯂迚<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>貝<EFBFBD>𣳇𧒆𠼻𧙖𥻗舚朌僙<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>", getline('.'))
|
||||
|
||||
" all letter chars
|
||||
call feedkeys("aa A b c C d D e f g G h i j J k l m n N o p q r s S t u v V w x X y z Z ; \ , [ ] \<Esc>", 'tx')
|
||||
call assert_equal("\x8c旽蔭左重此虞項斑盛啪\x93捸𨨏嬟脃𠃮䭾删覉惽髗𦡆𦆭峁𦷜𣙷𧂭𨯂迚<F0A8AF82><E8BF9A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>貝<EFBFBD>𣳇𧒆𠼻𧙖𥻗舚朌僙<E69C8C><E58399><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>煢蟎臈<E89F8E>", getline('.'))
|
||||
" all non-number special chars without spaces
|
||||
call feedkeys("oBEFHIKLMOPQRTUWY`!@#$%^&*()-_=+\\|:\"./<>?\<Esc>",'tx')
|
||||
call assert_equal("↑滙欉褅[]蘼襝蘘╯妙丰狀閮帛朣恨篝誚紋撚", getline('.'))
|
||||
|
||||
" all letter chars with spaces
|
||||
call feedkeys("oa A b c C d D e f g G h i j J k l m n N o p q r s S t u v V w x X y z Z ; \ , [ ] \<Esc>", 'tx')
|
||||
call assert_equal("<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>煢蟎臈<E89F8E>", getline('.'))
|
||||
|
||||
" all letter chars without spaces
|
||||
call feedkeys("oaAbcCdDefgGhijJklmnNopqrsStuvVwxXyzZ;\,[]\<Esc>", 'tx')
|
||||
call assert_equal("\x8c癵恘\x9f螰x86\x83媱縷x9d\x85\x80\x9c\x9b\x84佫\x8a\x89\x8e\x96\x8b餤x95\x90迋\x8d娵\x93淏\x97綅x87\x88", getline('.'))
|
||||
|
||||
bwipe!
|
||||
endfunc
|
||||
|
||||
func Test_command_line_farsi()
|
||||
set allowrevins altkeymap
|
||||
|
||||
" letter characters with spaces
|
||||
call feedkeys(":\"\<C-_>a A b c C d D e f g G h i j J k l m n N o p q r s S t u v V w x X y z Z ; \\ , [ ]\<CR>", 'tx')
|
||||
call assert_equal("\"\x88蟎煢𧙖㷛瑨瑨蟁覩覩趦眫眫涹𤀑𦍌㘵瓧<E398B5>螌詉貭貭畓憜㳑齐𦻑恷眤𤼎悤𦟌螩𦉫<E89EA9>蓚瓸譃䕢榲", getreg(':'))
|
||||
|
||||
" letter characters without spaces
|
||||
call feedkeys(":\"\<C-_>aAbcCdDefgGhijJklmnNopqrsStuvVwxXyzZ;\\,[]\<CR>", 'tx')
|
||||
call assert_equal("\"\x88\x87蜎祰惝x93娵\x8d迋\x90\x95餤x8b\x96\x8e\x89\x8a佫\x84\x9b\x9c\x80\x85\x9d霞鄃x83\x86螰x9f玴泂\x8c", getreg(':'))
|
||||
|
||||
" other characters with spaces
|
||||
call feedkeys(":\"\<C-_>0 1 2 3 4 5 6 7 8 9 ` . ! \" $ % ^ & / () = \\ ? + - _ * : # ~ @ < > { } | B E F H I K L M O P Q R T U W Y\<CR>", 'tx')
|
||||
call assert_equal("\"<22><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>]惽覉删䭾𠃮脃嬟𨨏嵗𥻗栂𣏵聢聛𡵆㗒矾舚㰘𣳇<E3B098>𠼻<EFBFBD><F0A0BCBB><EFBFBD><EFBFBD>岳<EFBFBD>䁥阸<E481A5>𨸹朌<F0A8B8B9><E69C8C>僙𨯂覔瓲甅絍聣聦稭糚𥼚糂", getreg(':'))
|
||||
|
||||
" other characters without spaces
|
||||
call feedkeys(":\"\<C-_>0123456789`.!\"$%^&/()=\\?+-_*:#~@<>{}|BEFHIKLMOPQRTUWY\<CR>", 'tx')
|
||||
call assert_equal("\"嚬貗齀][釐翫盪禲瞕{撫坍捏鴇重辨蔗辛洩奶誨弛兢毓絕陴掠", getreg(':'))
|
||||
|
||||
set noallowrevins noaltkeymap
|
||||
endfunc
|
||||
|
||||
@@ -764,6 +764,8 @@ static char *(features[]) =
|
||||
|
||||
static int included_patches[] =
|
||||
{ /* Add new patch number below this line */
|
||||
/**/
|
||||
263,
|
||||
/**/
|
||||
262,
|
||||
/**/
|
||||
|
||||
Reference in New Issue
Block a user