mikeslab/Iosevka
1
0
Fork 0
Code Issues Pull requests Projects Releases 1 Packages Wiki Activity Actions 1

Need to keep correspondence

Browse source
This commit is contained in:
Belleve Invis 2020-04-13 02:47:21 -07:00
parent 2fbc3eb289
commit adbd928fb4
2 changed files with 6 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

12
otl/gsub-ligation.ptl
View file

@ -525,18 +525,14 @@ define [buildLigationsImpl sink para glyphs featureName mappedFeature rankedLook
local stickTermLeft {}
local stickConnLeft {}
foreach [lc : items-of {'l' 'l1' 'j' 'j1' 'c' 'z'}] : begin
local freeCls : [CBar "\(lc)f"] barCls
foreach [g : items-of freeCls] : if glyphs.(g) : stickTermLeft.push g
local connCls : [CBar "\(lc)c"] barCls
foreach [g : items-of connCls] : if glyphs.(g) : stickConnLeft.push g
set stickTermLeft : stickTermLeft.concat : [CBar "\(lc)f"] barCls
set stickConnLeft : stickConnLeft.concat : [CBar "\(lc)c"] barCls
local stickTermRight {}
local stickConnRight {}
foreach [rc : items-of {'r' 'r1' 'j' 'j1' 'c' 'z'}] : begin
local freeCls : [CBar "f\(rc)"] barCls
foreach [g : items-of freeCls] : if glyphs.(g) : stickTermRight.push g
local connCls : [CBar "c\(rc)"] barCls
foreach [g : items-of connCls] : if glyphs.(g) : stickConnRight.push g
set stickTermRight : stickTermRight.concat : [CBar "f\(rc)"] barCls
set stickConnRight : stickConnRight.concat : [CBar "c\(rc)"] barCls
CreateLigationLookup : list
chain-rule

3
otl/table-util.ptl
View file

@ -1,6 +1,7 @@
export : define [CreateEmptyTable] {.languages {.} .features {.} .lookups {.}}
extern Map
extern Set
export : define [pick-language sink tag] : begin
if sink.languages.(tag) : return sink.languages.(tag)
@ -112,7 +113,7 @@ export : define [ChainRuleBuilder sink] : begin
set founde true
foreach [j : range 0 terms.length] : begin
local term terms.(j)
subtable.match.push term.left
subtable.match.push : Array.from : new Set term.left
local lutn : getSubLookup term.left term.right
if lutn : subtable.apply.push {.at j .lookup lutn}
return subtable