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

Optimize glyphs of three accented tilde punctuations. (#2784)

Browse source
This commit is contained in:
John McWilliams 2025-05-28 20:45:53 -04:00 • committed by GitHub
parent 6479b62a62
commit 80470d26eb
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
4 changed files with 13 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

3
changes/33.2.4.md
View file

@ -13,6 +13,9 @@
- MANAT SIGN (`U+20BC`). - MANAT SIGN (`U+20BC`).
- NUMERO SIGN (`U+2116`). - NUMERO SIGN (`U+2116`).
- DOUBLE STRUCK CAPITAL GAMMA (`U+213E`). - DOUBLE STRUCK CAPITAL GAMMA (`U+213E`).
- TILDE WITH RING ABOVE (`U+2E18`).
- TILDE WITH DOT ABOVE (`U+2E1E`).
- TILDE WITH DOT BELOW (`U+2E1F`).
- LATIN CAPITAL LETTER LAMBDA WITH STROKE (`U+A7DC`). - LATIN CAPITAL LETTER LAMBDA WITH STROKE (`U+A7DC`).
- LATIN SMALL LETTER SCRIPT R (`U+AB4B`). - LATIN SMALL LETTER SCRIPT R (`U+AB4B`).
- LATIN SMALL LETTER SCRIPT R WITH RING (`U+AB4C`). - LATIN SMALL LETTER SCRIPT R WITH RING (`U+AB4C`).

10
packages/font-glyphs/src/marks/above.ptl
View file

@ -134,8 +134,8 @@ glyph-block Mark-Above : begin
set-width 0 set-width 0
local [object radiusIn radiusOut] : RingDims local [object radiusIn radiusOut] : RingDims
local k : 2 * (radiusOut - (radiusOut - radiusIn) * 0.25) local k : 2 * (radiusOut - (radiusOut - radiusIn) * 0.25)
include : with-transform [Translate (+k / 2) 0] : refer-glyph 'ringAbove' include : with-transform [Translate (k * (+0.5)) 0] : refer-glyph 'ringAbove'
include : with-transform [Translate (-k / 2) 0] : refer-glyph 'ringAbove' include : with-transform [Translate (k * (-0.5)) 0] : refer-glyph 'ringAbove'
include : StdAnchors.wide include : StdAnchors.wide
foreach { suffix { DrawAt kdr } } [Object.entries DotVariants] : do foreach { suffix { DrawAt kdr } } [Object.entries DotVariants] : do
@ -358,7 +358,7 @@ glyph-block Mark-Above : begin
include : StdAnchors.wide include : StdAnchors.wide
include : TildeShape include : TildeShape
ttop -- aboveMarkTop ttop -- aboveMarkTop
tbot -- aboveMarkBot + markFine / 2 tbot -- (aboveMarkBot + markFine / 2)
leftEnd -- (markMiddle - markExtend * 1.5) leftEnd -- (markMiddle - markExtend * 1.5)
rightEnd -- (markMiddle + markExtend * 1.5) rightEnd -- (markMiddle + markExtend * 1.5)
hs -- markHalfStroke hs -- markHalfStroke
@ -808,7 +808,7 @@ glyph-block Mark-Above : begin
archv archv
g4.up.end (markMiddle + radius) yDot [heading Upward] g4.up.end (markMiddle + radius) yDot [heading Upward]
include : DrawAt markMiddle yDot (fine * kdr) include : DrawAt markMiddle yDot (fine * kdr)
include : ApparentTranslate 0 (fine * 0.5) include : ApparentTranslate 0 (fine * (+0.5))
include : StdAnchors.mediumWide include : StdAnchors.mediumWide
create-glyph "largeFermataAbove.\(suffix)" : glyph-proc create-glyph "largeFermataAbove.\(suffix)" : glyph-proc
set-width 0 set-width 0
@ -846,7 +846,7 @@ glyph-block Mark-Above : begin
select-variant 'candrabinduAbove' 0x310 (follow -- 'diacriticDot') select-variant 'candrabinduAbove' 0x310 (follow -- 'diacriticDot')
turned 'fermataAbove' 0x352 'candrabinduAbove' markMiddle aboveMarkMid turned 'fermataAbove' 0x352 'candrabinduAbove' markMiddle aboveMarkMid
select-variant 'largeFermataAbove' (follow -- 'diacriticDot') select-variant 'largeFermataAbove' (follow -- 'diacriticDot')
select-variant 'cyrlKavykaWithDotAbove' null (follow -- 'diacriticDot') select-variant 'cyrlKavykaWithDotAbove' (follow -- 'diacriticDot')
alias 'graveToneAbove' 0x340 'graveAbove' alias 'graveToneAbove' 0x340 'graveAbove'
alias 'acuteToneAbove' 0x341 'acuteAbove' alias 'acuteToneAbove' 0x341 'acuteAbove'

6
packages/font-glyphs/src/marks/overlay.ptl
View file

@ -48,10 +48,10 @@ glyph-block Mark-Overlay : begin
include : addTilde include : addTilde
include : ApparentTranslate 0 (shift * (-0.5)) include : ApparentTranslate 0 (shift * (-0.5))
create-glyph 'asciiTilde.symbolMid' : glyph-proc create-glyph 'asciiTilde/sMid' : glyph-proc
include : TildeShape include : TildeShape
ttop -- (SymbolMid + tildeHeight * 0.5 * asciiMarkZoomY) ttop -- (SymbolMid + (AccentHeight / 2 - markFine / 4) * asciiMarkZoomY)
tbot -- (SymbolMid - tildeHeight * 0.5 * asciiMarkZoomY) tbot -- (SymbolMid - (AccentHeight / 2 - markFine / 4) * asciiMarkZoomY)
leftEnd -- SB leftEnd -- SB
rightEnd -- RightSB rightEnd -- RightSB
hs -- (OperatorStroke / 2) hs -- (OperatorStroke / 2)

4
packages/font-glyphs/src/symbol/punctuation/ascii-marks.ptl
View file

@ -40,11 +40,11 @@ glyph-block Symbol-Punctuation-Ascii-Marks : begin
select-variant 'asciiCaret' '^' select-variant 'asciiCaret' '^'
create-glyph 'ringTilde' 0x2E1B : glyph-proc create-glyph 'ringTilde' 0x2E1B : glyph-proc
include : refer-glyph 'asciiTilde.symbolMid' include : refer-glyph 'asciiTilde/sMid'
include : RingShape Middle (PlusTop + AccentClearance) include : RingShape Middle (PlusTop + AccentClearance)
WithDotVariants 'dotTilde' 0x2E1E : function [DrawAt kr ov] : composite-proc WithDotVariants 'dotTilde' 0x2E1E : function [DrawAt kr ov] : composite-proc
refer-glyph 'asciiTilde.symbolMid' refer-glyph 'asciiTilde/sMid'
DrawAt Middle PlusTop (DotRadius * kr * OperatorStroke / Stroke - ov) DrawAt Middle PlusTop (DotRadius * kr * OperatorStroke / Stroke - ov)
turned 'tildeDot' 0x2E1F 'dotTilde' Middle SymbolMid turned 'tildeDot' 0x2E1F 'dotTilde' Middle SymbolMid