emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/pyim 9825016: 更新 pyim-pymap.


From: ELPA Syncer
Subject: [elpa] externals/pyim 9825016: 更新 pyim-pymap.
Date: Thu, 9 Dec 2021 07:57:30 -0500 (EST)

branch: externals/pyim
commit 9825016023c89c712052dff1936effa814daedd1
Author: Feng Shu <tumashu@163.com>
Commit: Feng Shu <tumashu@163.com>

    更新 pyim-pymap.
    
        * pyim-pymap.el (pyim-pymap-build-pymap): Improve.
    
        * pyim-pymap.el (pyim-pymap-add-commonly-used-sep): Removed.
        (pyim-pymap): updated.
    
        * tests/pyim-tests.el (pyim-test-pyim-pymap): test pyim-pymap.
---
 pyim-pymap.el       | 72 +++++++++++++++++++++++++++--------------------------
 tests/pyim-tests.el |  4 +++
 2 files changed, 41 insertions(+), 35 deletions(-)

diff --git a/pyim-pymap.el b/pyim-pymap.el
index 87f302f..313ead1 100644
--- a/pyim-pymap.el
+++ b/pyim-pymap.el
@@ -118,7 +118,7 @@
     ("dei" "得|嘚||䮻哋")
     ("deng" "等登邓灯澄凳瞪蹬|噔磴嶝镫簦戥|澂憕璒|䔲嬁鐙鄧䠬霯邆隥䒭墱䮴覴櫈燈僜竳朩豋")
     ("di" 
"的地第提低底抵弟迪递帝敌堤蒂缔滴涤翟娣笛棣荻谛狄邸嘀|砥坻诋嫡镝碲骶犒氐莜柢籴笫羝睇觌玓杕|轪茋浟菂媂髢禘䗖踶鞮蹢|䲦赿䞾䨢䨀樀㰅焍蔐鸐頔唙䴞怟眡䨤㼵䀸阺䀿䱃奃詆啇㹍坔䍕摕䩘坘偙䩚聜遞䵠腣潪鉪䑭䑯䱱㡳虳楴豴祶慸㭽嵽嚁隄㦅㪆墆趆掋䶍䢑墑梑肑袛䂡䮤㢩䊮馰嶳䞶覿僀埊䣌滌䏑鏑苖㣙䧝埞拞締䟡藡仢諦軧旳糴䯼仾磾扚魡儥埅鬄碮苐俤䪘眱䐭䏄蚳哋甋蔋逓蔕弤渧鍉呧靮啲牴敵彽梊螮藋觝菧釱篴珶廸適惸諟揥墬遰厎蝃")
-    ("dia" "嗲||")
+    ("dia" "|嗲||")
     ("dian" 
"电点店典奠甸碘淀殿垫颠滇癫巅惦掂|癜玷佃踮靛钿簟坫丶阽|扂琔磹|䀡頕䩚㸃蜔錪㼭鈿橂䍄㥆蕇奌顚顛婝敟㵤㝪嵮婰癲齻墊㶘㞟厧澱㚲嚸壂䧃槇䟍巓巔槙點㓠䓦橝痶蒧琠攧瘨敁蹎傎痁電跕腍驔詀")
     ("diao" 
"调掉雕鸟吊钓刁貂凋|碉鲷叼啁莜踔铫铞汈|窎椆嬥|䳝䄪䄷䲽伄訋弔䔙鈟鼦弴瘹䠼鑃䉆扚奝魡虭鵰䵲㹿鮉㪕瞗銚㒛殦䂪銱䂽調鯛釣竨鳭矵鋽㢯錭絩䳂䯾軺雿鵃淍㣿藋琱屌彫誂窵蛁蓧鉥匽劚")
     ("die" 
"跌叠蝶迭碟爹谍牒|耋喋堞鳎瓞鲽垤揲蹀|昳咥绖䏲楪|䳻蹛嵽㦅鰈耊褋氎䴑挕戜䠟㬪䘭眰褺牃詄㥈恎聑艓㑙㭯㩸㩹䲀嶀疂趃䞇疉疊䞕䮢䪥㲲㲳㦶䳀胅峌諜㻡曡惵苵臷㷸㫼啑䩞崼鰨怢㤴鞢軼殜挃螲䫕㗧跮哋攧眣蜨絰畳镻跕槢柣")
@@ -132,7 +132,7 @@
     ("dun" "不吨顿盾敦蹲墩囤沌钝炖|盹遁趸砘镦礅惇楯蹾坉扽||鐓鐜憞伅逇鈍䤜踲蜳崸㬿驐腞潡噸撉躉犜鶨墪撴燉橔頓遯庉")
     ("duo" 
"多度夺朵躲铎咄堕沱舵驮垛惰|锗哆踱跺掇剁柁缍沲裰哚埵杕|饳剟亸|㤞䁟奲袳㪜腏跢悳䄍挅挆鬌㔍夛崜䠤茤䤪鈬尮椯刴鐸䤻䐾䙃陊陏㙐敓䩔桗襗敚䅜䙟敠䩣䙤䑨㥩奪剫䍴鵽貀嚉袉莌趓垜憜綞炧炨墮墯躱馱䒳鮵㖼䫂軃㛆㛊痑㻔凙㣞痥跥㻧䯬毲㧷飿隓跿䲊㨊䝐鍺㡯誃喥朶敪嶞嚲駄柮媠沰柂硾")
     ("e" 
"额阿俄恶鹅遏鄂厄饿峨扼娥鳄哦蛾噩愕|讹锷垩婀垭鹗萼桠谔莪腭锇颚呃阏屙苊轭蚵硪丨钶|姶涐堨崿|娾呝匎䜙洝痷騀蘁㼂䄉堊㠋鈋椏砐鰐餓圔唖訛頟㼢琧砨㔩㼰阸戹搹䔾娿蝁湂硆䝈㡋睋譌遌額㕎顎䕏偔鍔蕚鵝啞鵞豟魤䑥魥㱦鑩䑪䱮䙳㩵屵鱷䩹歺卾蚅岋㦍讍誐䆓貖㮙鶚覨䞩䖸妸咹閼㖾妿磀㗁㷈㗉峉䓊㧖䛖䳗迗䳘軛䣞埡諤㟧鋨峩僫䳬櫮珴㓵軶䫷廅鰪齃佮頋歞閜擜砈䚰礘㩽䛩㧴㣂㫊㛕齾囐隲頞搤阨餩吪堮齶詻皒枙咢悪嶭惡囮痾輵噁")
-    ("ei" "诶欸||誒")
+    ("ei" "|诶欸||誒")
     ("en" "恩|嗯唔摁蒽||䬶奀䭓䭡䅰㕶煾䊐糦峎饎")
     ("er" 
"而二尔儿耳迩饵洱蛾|贰铒珥佴鸸鲕|陑耏咡峏谞臑|餌㜨栮鴯眲䌺荋聏兒轜鉺誀㒃㖇邇㮕侕䮘鮞䎟䎠隭貮䎶㚷袻㢽檽㛅䋙毦䋩䏪㧫䣵髵粫杒髶腝輀弍洏弐尒尓栭唲樲刵爾衈児貳薾駬胹陾卲")
     ("fa" "发法罚乏伐阀筏|砝垡珐|酦擿|笩彂撥貶㳒栰㘺琺橃灋蕟罰佱罸㕹瞂醗傠䒥閥醱䂲疺姂䇅藅髮㛲䣹茷発發髪沷")
@@ -231,7 +231,7 @@
     ("lin" 
"林临邻赁琳磷淋麟霖鳞凛拎遴蔺吝粼|嶙躏廪檩啉辚膦瞵懔璘|箖潾翷|癝㖼玪顲䚏㔂㨆崊甐焛㐭鄰瀶橉驎轔繗鱗癛㝝恡轥罧䉮䕲蹸晽㖁檁疄碄悋躙撛綝澟粦躪䚬䢯斴閵厸䮼暽賃懍䫐凜矝㷠壣臨廩䫰䗲痳藺魿㡘㝺䢧䟹獜亃麐隣惏燐僯菻鏻溓")
     ("ling" 
"领令另零灵龄陵岭凌玲铃菱棱伶拎羚苓聆翎泠|瓴囹绫呤棂蛉酃鲮柃祾|坽姈昤鸰堎舲㥄澪|㭩倰䮚靇錂䴇䈊琌朎䴒䔖霗輘領霛欞㬡䌢刢䄥蘦爧䨩䴫䰱砱䠲㸳鈴紷阾䉁孁䍅婈靈衑䉖䕘齡㱥䙥㡵蕶鹷䉹䡼彾䡿魿䖅㲆㾉皊袊碐掕䚖龗閝麢炩㖫㦭㪮岺嶺綾跉䯍㻏狑駖䧙竛秢㯪鯪裬燯櫺蔆稜〇霊夌鴒霝笭詅睖齢呬醽軨淩")
     ("liu" 
"流刘六留陆柳瘤硫泵溜碌浏榴琉馏|铆遛鎏骝绺硐镏旒熘蒌鹨锍镠|珋飗罶鹠瑬疁|䒥㳅㧕㚹䉹䝀㝋㵳熮蟉鷚栁䄂鐂瀏䰘䬟鰡㨨㐬騮鬸嬼餾㙀畂畄癅橊㽌驑䱖鉚㽞䱞瑠䉧嵧橮塯畱䭷桺羀䶉劉麍澑嚠沠璢蒥鎦䚧㶯媹綹磂蓅飅廇旈鷎裗䗜駠雡藰駵鋶䋷飹窌摎飂霤蹓坴陸鶹飀翏鏐懰磟")
-    ("lo" "咯||")
+    ("lo" "|咯||")
     ("long" 
"龙隆弄垄笼拢聋陇胧珑窿|茏咙砻垅泷栊癃挦眬|昽哢祲漋|谾簼㳥挊㰍攏爖鸗贚蘢朧瀧蠪蠬礱㴳霳挵䡁豅靇㙙㑝籠驡䥢㡣硦鑨䙪㝫湰襱屸聾㚅㢅梇䪊䆍龍嶐龒龓㦕嚨隴徿巄竉䏊瓏矓㟖㛞槞壟壠䃧鏧曨篭櫳䰱䮾蕯篢儱礲衖躘巃竜滝捰")
     ("lou" 
"楼露漏陋娄搂篓|喽镂偻瘘髅耧蝼嵝蒌窭䁖|剅溇|㡞甊嘍簍樓䄛蔞耬謱㔷瘻婁䝏屚艛摟㥪遱䅹䱾嶁㲎㺏瞜熡䮫㪹螻鞻軁僂髏廔䣚鷜鏤䫫㟺慺寠漊瘺塿")
     ("lu" 
"路六陆录绿露鲁卢炉鹿禄赂芦庐碌麓颅泸卤潞鹭辘虏璐|漉噜闾戮鲈掳橹轳逯渌蓼撸鸬栌氇胪镥簏舻辂垆箓甪|垏菉琭稑僇勠澛蕗|賁璷繆㪹鱳觻䍡䐂椂瀂錄輅蘆氌蔍攎樐爐䌒䰕鸕瀘㜙樚踛㠠圥蠦鈩㔪䴪鐪舮錴䘵簶騼娽㼾虂轆硉䡎㭔蹗籙䱚䡜虜摝䕡轤鑥鵦睩艪艫䩮顱鵱魲硵鹵塶塷鱸剹獹㱺祿䚄㦇䮉㪐䲐䎑侓膔嚕㪖㢚熝趢枦嚧㖨㪭螰㢳粶䎼鏀賂擄峍勎㓐瓐矑櫓淕鏕㿖髗廘䃙壚臚㯝㯟㟤曥淥盧櫨㛬廬㯭觮鏴滷黸鷺擼㫽蓾䟿䥨櫚坴陸翏騄簬録盧穋罏彔籚艣鑪魯醁玈纑盝磟磠鯥緑")
@@ -268,7 +268,7 @@
     ("nei" "内那哪馁|||㐻䜆䇣㨅㼏餒㘨脮腇㕯䡾䲎㖏鮾䳖鯘娞錗氝內婑浽")
     ("nen" "嫩|恁|媆臑|㒄㜛㶧黁㯎腝嫰")
     ("neng" "能|||䪏䘅㴰㲌薴濘䏻螚儜竜")
-    ("ng" "嗯唔唵||㕶㐻")
+    ("ng" "|嗯唔唵||㕶㐻")
     ("ni" 
"你尼呢泥拟逆倪妮腻匿霓溺|旎昵坭铌鲵伲怩睨祢疒猊慝|鹝鹢薿麑|懝兒䮘㧱聻㮞檷䀑抐誽䍲㮏㲡䘌縌㠜儞䘦鈮䰯伱愵嬺氼䘽䵑䵒屔婗䝚䁥䕥孨㵫屰䭲孴㹸譺㥾籾㦐㪒馜隬蚭抳䦵㲻㞾痆㣇䧇狋䛏胒鯓狔秜跜嫟迡鯢淣苨擬觬埿鑈棿腝蛪㘈眤㩘晲掜禰妳堄儗輗蜺鉨齯鶂貎膩暱惄柅鷊臡郳衵")
     ("nian" "年念粘辗碾廿|捻撵拈蔫鲶埝鲇辇黏||䟢㮟䧔痆攆簐㘝輦䄭䬯鼰䄹艌䩞蹨㞋躎鮎䚓撚㲽跈秊秥姩鯰㜤䴴輾蹍榐唸卄齞涊淰溓")
     ("niang" "娘酿|||孃䖆釀嬢醸")
@@ -278,7 +278,7 @@
     ("ning" "宁凝拧泞柠|咛坭狞佞聍甯|苧|䆨薴濘鸋鬡嬣䔭鑏㝕䭢橣獰聹嚀侫㲰檸矃寍寕寗寜㿦寧擰㣷䗿㩶鬤儜")
     ("niu" "牛纽扭钮|拗妞蚴忸狃杻||䮗抝牜莥䤔㽱䂇怓紐䀔鈕靵汼炄䒜㺲䏔䋴衂沑㖻")
     ("nong" "农浓弄脓侬|哝秾||㺜莀䂇憹繷欁儂鬞癑䵜噥䁸蕽檂䢉禯辳㶶膿濃挊挵齈襛穠農醲")
-    ("nou" "耨|嬬|檽䫖㕢䔈㜌㳶鐞䘫䰭䨲啂譨譳䅶㝹羺槈嗕搙獳鎒")
+    ("nou" "|耨|嬬|檽䫖㕢䔈㜌㳶鐞䘫䰭䨲啂譨譳䅶㝹羺槈嗕搙獳鎒")
     ("nu" "努怒汝奴弩|驽帑呶孥胬|砮笯傉媆|䢪詉黁搙伮蒘䢞㚢駑㣽")
     ("nuan" "暖||臑|奻㬉渜愞䙇煗䎡湪餪煖")
     ("nuo" "诺挪娜糯|懦傩喏搦锘砹||䎟䎠㖠袳毭搙愞砈㰙㐡稬㔮儺搻挼逽蹃㡅㑚橠穤鍩榒梛䚥㛂郍糑糥懧䇔捼掿諾媠袲")
@@ -394,7 +394,7 @@
     ("weng" "翁嗡|瓮蓊蕹滃|鹟|䨴㙂霐㘢䐥䤰㜲嵡奣聬浻瞈鎓暡勜㹙甕齆罋塕螉鶲")
     ("wo" 
"我握窝沃卧挝涡斡渥幄|蜗喔倭莴龌肟嗌硪踒|偓涴馧|㠗䮸艧蒦瓁矆臒龏蝸渦濄䙠䁷䇶䀑腛媉踠䩊䂺仴瞃䰀䠎㠛焥唩嬳萵楃䁊㱧齷捾窩㦱涹撾濣臥㧴枂雘擭薶捼婑猧婐捰")
     ("wu" 
"务物无五武午吴舞伍污乌误亡恶屋晤悟吾雾芜梧勿巫侮坞毋诬呜钨邬捂鹜兀婺|妩於戊鹉垭仡浯蜈唔骛仵焐芴鋈庑鼯牾怃圬忤痦迕杌寤阢靰铻屼|旿郚胠洿峿珸珷鹀煟|㤇㘬蘁堊䓊埡䨁陚釫鼿㱱扝趶䚈䁷堥㝟䀛霿雺無䉑蟱㒇墲䅶䜑渞㐅伆鄔洖騖弙霚逜鰞茣霧娪娬鴮㐳㬳吳倵摀齀䑁㑄乄敄嵍歍鵐陓㡔譕腛鵡䍢塢奦瑦䡧嵨蕪剭㵲㹳㽾莁熃粅誈䒉媉岉躌䦍䮏窏螐璑禑隖䦜玝悞鎢誣誤溩憮瞴䎸箼鯃䳇俉㻍䫓䃖務嗚廡鷡忢䛩蓩䳱嫵矹㷻䟼兦亾熓䵦扜齬盓悪惡膴鶩兀甒儛噁橆杇呉啎潕汙汚扤祦遻卼麌碔沕悮窹烏軏鋘鋙杅皁")
-    ("xi" 
"系西席息希习吸喜细析戏洗悉锡溪惜稀袭夕晰昔牺腊烯熙媳栖膝隙犀蹊硒兮熄曦禧茜嬉玺奚汐徙羲铣淅嘻|歙熹矽蟋畦褶郗唏皙隰樨浠蜥檄郄翕阋鳃舾屣葸匚螅咭酾粞觋欷僖醯鼷裼穸饩舄禊菥蓰郤恓晞豨潟窸䜣|屃钖肸咥俙饻枲绤棤睎傒㴔嶍嶲憙暿熻谿釐鳛巇酅爔觿|娭䑂誒䚫糦遟㒆㓾欪䵱䚂㦦戲㰥㱱㗲摡㳀嵆繫䒁墍旣䴛鼳瓕鈢鉩臈臘蝷嚊㜎䬣捿䚉䫔棲䦧䧿䘮㪪鰓䈢䨛㱇趇雭蜤杫燍䁯餙謚衋錫䯜䜁焁礂舃㠄嬆漇焈琋㸍㔒䀘縘漝椞焟稧鬩䈪怬焬欯戱騱䨳㤴謵怷㤸匸椺䐼霼餼唽騽橀豀齂恄葈噏屓煕屖歖㩗鵗鱚嵠㥡㭡䩤卥獥繥赥驨赩㹫蕮㽯豯襲晳㑶扸桸敼䙽㙾㵿䂀厀覀熂薂莃䢄徆螇熈䮎鎎媐銑㞒犔悕貕憘趘澙㚛螝隟䊠蒠覡覤瞦犧躧䲪嚱鎴蒵隵䚷肹喺熺㦻榽璽僁惁飁係蓆㿇䓇黊郋䧍壐矖翖黖瓗忚㣟䫣䛥忥㳧㗩鏭䏮諰磶觹觽㨙慀㩉奊䙎㩦㾙䚿䐅㘊餏䐖�
 �羛緆戯扢蔇鈒繋莔鉨呬鸂磎巂雟瞚簁褉鄎謑渓瘜氥霫細縰蠵怸鰼譆卌潝蹝虩屭扱鑴綌纚犠疧徯滊囍習凞闟槢蟢燨釳狶釸盻諠")
+    ("xi" 
"系西席息希习吸喜细析戏洗悉锡溪惜稀袭夕晰昔牺腊烯熙媳栖膝隙犀蹊硒兮熄曦禧茜嬉玺奚汐徙羲铣淅嘻|歙熹矽蟋畦褶郗唏皙隰樨浠蜥檄郄翕阋鳃舾屣葸匚螅咭酾粞觋欷僖醯鼷裼穸饩舄禊菥蓰郤恓晞豨潟窸䜣|屃钖肸咥俙饻枲绤棤睎傒㴔嶍嶲憙暿熻谿釐鳛巇酅爔|觿娭䑂誒䚫糦遟㒆㓾欪䵱䚂㦦戲㰥㱱㗲摡㳀嵆繫䒁墍旣䴛鼳瓕鈢鉩臈臘蝷嚊㜎䬣捿䚉䫔棲䦧䧿䘮㪪鰓䈢䨛㱇趇雭蜤杫燍䁯餙謚衋錫䯜䜁焁礂舃㠄嬆漇焈琋㸍㔒䀘縘漝椞焟稧鬩䈪怬焬欯戱騱䨳㤴謵怷㤸匸椺䐼霼餼唽騽橀豀齂恄葈噏屓煕屖歖㩗鵗鱚嵠㥡㭡䩤卥獥繥赥驨赩㹫蕮㽯豯襲晳㑶扸桸敼䙽㙾㵿䂀厀覀熂薂莃䢄徆螇熈䮎鎎媐銑㞒犔悕貕憘趘澙㚛螝隟䊠蒠覡覤瞦犧躧䲪嚱鎴蒵隵䚷肹喺熺㦻榽璽僁惁飁係蓆㿇䓇黊郋䧍壐矖翖黖瓗忚㣟䫣䛥忥㳧㗩鏭䏮諰磶觹觽㨙慀㩉奊䙎㩦㾙䚿䐅㘊餏䐖�
 �羛緆戯扢蔇鈒繋莔鉨呬鸂磎巂雟瞚簁褉鄎謑渓瘜氥霫細縰蠵怸鰼譆卌潝蹝虩屭扱鑴綌纚犠疧徯滊囍習凞闟槢蟢燨釳狶釸盻諠")
     ("xia" 
"下夏峡厦辖霞虾狭吓侠暇遐瞎匣瑕|唬浃呷黠硖罅狎柙岈|叚翈鹡|䞩㵤䯟䒠蝦㙈㔠㭱嚇螛䒩㮫㿣敮閜挾浹徦埉䠍䨐䶝㰰㥦㛍廈陝陿捾縀丅夓鰕縖笚㘡䘥欱搳㰺谺轄鍜㽠㙤硤筪赮睱煵魻傄鎋䖎芐閕䖖䦖䪗疜炠疨颬鶷冾䛅㗇磍䫗懗烚俠珨鏬狹㗿諕仮舺憍陜謑舝騢祫蕸碬峽煆")
     ("xian" 
"现先县见线限显险献鲜洗宪纤陷闲贤仙衔掀咸嫌羡弦腺痫娴舷馅酰铣癣|冼涎暹籼锨苋蚬跹岘藓燹钐鹇氙锬莶霰跣痃猃彡祆筅挦伣|伭忺狝玹盷崄硍葴缐禒㬎孅|䦘䍎䐄譀㽉闞㦥㸝塪㰹礆㔓鰔䄯稴䵖䵛䵤筧見梘䶠覸糮䙹㔾䇒顈䡅㜷㲽壏懢蘚㱹䭑㦑薟㾾㯗欦譣㩮膁槏㯠臤㥦㛍攕姍釤揱錟饀銑㘅䘆蜆攇甉娊㘋唌錎䀏嬐贒嘕㬗瀗䨘搟尠餡䜢縣礥娨㜪訮輱㔵䨷鼸娹䤼褼鍁䁂䵇癇㩈㡉橌鍌䕔衘㭠啣䱤絤灦䝨㵪䥪獫癬蹮䉯顯婱䉳屳襳齴㭹鹹獻赻鱻㡾奾涀䞁㪇㺌㶍纎撏㦓澖纖䲗䚚躚銜咞䶟䶢誢䦥馦莧羨險羬㮭枮鮮瞯粯憲箲麲垷䒸㢺䢾㯀㳄㿅燅㧋䧋烍軐蓒臔藖珗胘蛝䧟賢㧥铦鋧毨㫫㳭姭䧮苮哯廯韯䃱僲僴峴櫶䃸䏹嫺嫻鷼臽㛾䗾搚䩙妶誸軒㰊麙䢭醶咁醎閒溓綅佡鏾縿県尟絃繊睍癎豏顕晛轞陥獮幰杴険玁撊閑銛憪綫嶮憸蚿韅秈僊俔仚線僩韱鷳諴鷴姺現鶱綖")
     ("xiang" 
"向项相想乡象响香降像享箱祥湘详橡巷翔襄厢镶飨|饷缃骧芗庠鲞舡葙蟓|珦瓖|䄈䛠䴂䦳䣈瓨缿銗塂䇨楿䤔夅䙹䒂鴹亯䬕銄姠欀項鄉餉鄊鐌鄕䔗栙䐟萫㐮䜶啌鱌襐晑潒饗鱜驤恦佭鑲詳絴鱶蚃薌羏䊑嶑麘鮝䖮䢽闀廂闂㟄緗鯗㟟勨跭㗽響皀澒閧鴂衖愬啍膷蠁饟纕嚮忀曏郷")
@@ -459,11 +459,12 @@
     ("zui" "最罪嘴醉咀|羧蕞觜|衒槜|濢槯嗺䓱㵃酨嫢㭰稡欈䯿洅錊㰎㠑栬樶䘹絊㝡酻祽噿嶉嶊檌䮔纗嶵璻蟕鋷朘脧蕝睟酔晬檇厜辠墬")
     ("zun" "尊遵|鳟樽撙|僔僎噂嶟|袸䔿拵罇譐鱒繜銌鷷栫瀳跧鐏捘墫壿")
     ("zuo" 
"作做座左坐昨佐馈琢凿撮祚|柞唑嘬酢怍笮砟阼胙捽|岞|侳䟶䬤㶡䦈㩇䟄䩦䟭㤰㘸䜊鑿諎䇥㣱唨䯿㘀夎稓䔘㸲㘴鈼葃㑅繓䝫㭮㝾袏咗䞢䎰䞰䋏毑㛗秨糳飵莋椊葄筰岝"))
-  "拼音汉字对照表
+  "拼音汉字对照表.
+
 
 第一个元素为拼音,第二个元素为拼音对应的汉字组成的字符串,字符串
-中汉字按照使用频率排序, 字符串用 “|” 隔开,分成一级常用汉字,二
-级常用汉字,三级常用汉字和不常用汉字。分类方式参考了国务院公布的
+中汉字按照使用频率排序,字符串用 “|” 隔开,分成一级常用汉字,二级
+常用汉字,三级常用汉字和不常用汉字。分类方式参考了国务院公布的
 《通用规范汉字表》:
 
     国务院关于公布《通用规范汉字表》的通知(国发〔2013〕23号)
@@ -850,7 +851,8 @@ If FORCE is non-nil, FORCE build."
     (reverse pymap)))
 
 (defun pyim-pymap-build-pymap ()
-  "使用 libpinyin 自带的 data 文件创建 `pyim-pymap'."
+  "使用 libpinyin 自带的 data 文件创建 `pyim-pymap'.
+这个函数运行估计需要5分钟。"
   (interactive)
   (let* ((dir (read-directory-name "请输入 libpinyin 的 data 目录:"))
          (hash-table (make-hash-table :test #'equal))
@@ -876,14 +878,21 @@ If FORCE is non-nil, FORCE build."
      (with-temp-buffer
        (maphash
         (lambda (key value)
-          (let* ((value (sort (delete-dups (reverse value)) 
#'pyim-pymap-cchar<))
-                 (string (mapconcat #'identity value ""))
-                 ;; 添加一级常用汉字分割符。
-                 (string (pyim-pymap-add-commonly-used-sep string 4000))
-                 ;; 添加二级常用汉字分割符。
-                 (string (pyim-pymap-add-commonly-used-sep string 7000))
-                 ;; 添加三级常用汉字分割符。
-                 (string (pyim-pymap-add-commonly-used-sep string)))
+          (let* ((n (- (length pyim-pymap-commonly-used-cchar) 1))
+                 (value (reverse (delete-dups value)))
+                 (seps (mapcar
+                        (lambda (n)
+                          (propertize (nth n pyim-pymap-commonly-used-cchar)
+                                      'sep t))
+                        (list 4000 7000 n)))
+                 (string
+                  (mapconcat #'identity
+                             (mapcar (lambda (str)
+                                       (if (get-text-property 0 'sep str)
+                                           "|"
+                                         str))
+                                     (sort (append seps value) 
#'pyim-pymap-cchar<))
+                             "")))
             (insert (format "(%S %S)\n" key string))))
         hash-table)
        (sort-lines nil (point-min) (point-max))
@@ -891,28 +900,21 @@ If FORCE is non-nil, FORCE build."
        (insert "(defvar pyim-pymap\n'(")
        (goto-char (point-max))
        (delete-char -1)
-       (insert ")\n\"拼音汉字对照表\n
+       (insert ")\n\"拼音汉字对照表.\n
+
 第一个元素为拼音,第二个元素为拼音对应的汉字组成的字符串,字符串
-中汉字按照使用频率排序, 字符串用 “|” 隔开,分成一级常用汉字,二
-级常用汉字,三级常用汉字和不常用汉字。分类方式参考国务院公布的
-《通用规范汉字表》,但不完全一致。\")")
+中汉字按照使用频率排序,字符串用 “|” 隔开,分成一级常用汉字,二级
+常用汉字,三级常用汉字和不常用汉字。分类方式参考了国务院公布的
+《通用规范汉字表》:
+
+    国务院关于公布《通用规范汉字表》的通知(国发〔2013〕23号)
+    http://www.gov.cn/zwgk/2013-08/19/content_2469793.htm
+
+但不是完全一致。\")")
        (emacs-lisp-mode)
        (indent-region (point-min) (point-max))
        (buffer-string)))))
 
-(defun pyim-pymap-add-commonly-used-sep (string &optional n)
-  "在 STRING 中添加一个 |, 用来分割常用字和不常用字。"
-  (let ((chars (reverse (string-to-list string)))
-        add-sep output)
-    (while chars
-      (let ((char (char-to-string (pop chars))))
-        (when (and (not add-sep)
-                   (member char (cl-subseq pyim-pymap-commonly-used-cchar 0 
n)))
-          (push "|" output)
-          (setq add-sep t))
-        (push char output)))
-    (mapconcat #'identity output "")))
-
 ;; * Footer
 (provide 'pyim-pymap)
 
diff --git a/tests/pyim-tests.el b/tests/pyim-tests.el
index fb1f6c9..9eec1f1 100644
--- a/tests/pyim-tests.el
+++ b/tests/pyim-tests.el
@@ -71,6 +71,10 @@
 
 ;; ** pyim-pymap 相关单元测试
 (ert-deftest pyim-test-pyim-pymap ()
+  (should-not (cl-find-if-not
+               (lambda (x)
+                 (= (length (split-string (cadr x) "|")) 4))
+               pyim-pymap))
   (should (equal (pyim-pymap-cchar< "的" "成") t))
   (should (equal (pyim-pymap-cchar2py-get "阿")
                  '("e" "a")))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]