diff --git a/changes/27.3.3.md b/changes/27.3.3.md
index c4da366f5..9c2864677 100644
--- a/changes/27.3.3.md
+++ b/changes/27.3.3.md
@@ -1,2 +1,4 @@
 * Make `cv96` take effect on math asterisk operators (#2066).
 * Fix serifs of italic small Yat in Etoile (#2067).
+* Add characters:
+  - LEFTWARDS HARPOON WITH BARB UP TO BAR (`U+2952`) .. DOWNWARDS HARPOON WITH BARB LEFT FROM BAR (`U+2961`).
diff --git a/font-src/glyphs/symbol/arrow.ptl b/font-src/glyphs/symbol/arrow.ptl
index f01ab7991..b24dc5360 100644
--- a/font-src/glyphs/symbol/arrow.ptl
+++ b/font-src/glyphs/symbol/arrow.ptl
@@ -855,6 +855,72 @@ glyph-block Symbol-Arrow : for-width-kinds WideWidth1
 			refer-glyph : MangleName 'arrowDownSK'
 			HBar.m (arrowMidX - arrowHeadSize) (arrowMidX + arrowHeadSize) arrowTop fine
 
+		MkArrow [HalfArrowShape RHSHalfArrowHead] [MangleName 'arrowLeftHRK']   null arrowRSB SymbolMid (arrowSB + fine) SymbolMid
+		MkArrow [HalfArrowShape LHSHalfArrowHead] [MangleName 'arrowLeftHLK']   null arrowRSB SymbolMid (arrowSB + fine) SymbolMid
+		MkArrow [HalfArrowShape RHSHalfArrowHead] [MangleName 'arrowRightHRK']  null arrowSB SymbolMid (arrowRSB - fine) SymbolMid
+		MkArrow [HalfArrowShape LHSHalfArrowHead] [MangleName 'arrowRightHLK']  null arrowSB SymbolMid (arrowRSB - fine) SymbolMid
+		MkArrow [HalfArrowShape RHSHalfArrowHead] [MangleName 'arrowUpHRK']     null arrowMidX arrowBot arrowMidX (arrowTop - fine)
+		MkArrow [HalfArrowShape LHSHalfArrowHead] [MangleName 'arrowUpHLK']     null arrowMidX arrowBot arrowMidX (arrowTop - fine)
+		MkArrow [HalfArrowShape RHSHalfArrowHead] [MangleName 'arrowDownHRK']   null arrowMidX arrowTop arrowMidX (arrowBot + fine)
+		MkArrow [HalfArrowShape LHSHalfArrowHead] [MangleName 'arrowDownHLK']   null arrowMidX arrowTop arrowMidX (arrowBot + fine)
+		MkArrow [HalfArrowShape RHSHalfArrowHead] [MangleName 'arrowLeftHRSK']  null (arrowRSB - fine / 2) SymbolMid arrowSB SymbolMid
+		MkArrow [HalfArrowShape LHSHalfArrowHead] [MangleName 'arrowLeftHLSK']  null (arrowRSB - fine / 2) SymbolMid arrowSB SymbolMid
+		MkArrow [HalfArrowShape RHSHalfArrowHead] [MangleName 'arrowRightHRSK'] null (arrowSB + fine / 2) SymbolMid arrowRSB SymbolMid
+		MkArrow [HalfArrowShape LHSHalfArrowHead] [MangleName 'arrowRightHLSK'] null (arrowSB + fine / 2) SymbolMid arrowRSB SymbolMid
+		MkArrow [HalfArrowShape RHSHalfArrowHead] [MangleName 'arrowUpHRSK']    null arrowMidX (arrowBot + fine / 2) arrowMidX arrowTop
+		MkArrow [HalfArrowShape LHSHalfArrowHead] [MangleName 'arrowUpHLSK']    null arrowMidX (arrowBot + fine / 2) arrowMidX arrowTop
+		MkArrow [HalfArrowShape RHSHalfArrowHead] [MangleName 'arrowDownHRSK']  null arrowMidX (arrowTop - fine / 2) arrowMidX arrowBot
+		MkArrow [HalfArrowShape LHSHalfArrowHead] [MangleName 'arrowDownHLSK']  null arrowMidX (arrowTop - fine / 2) arrowMidX arrowBot
+
+		create-glyph [MangleName 'arrowBarLeftHR'] [MangleUnicode 0x2952] : composite-proc
+			refer-glyph : MangleName 'arrowLeftHRK'
+			VBar.m arrowSB (SymbolMid - arrowHeadSize) (SymbolMid + arrowHeadSize) fine
+		create-glyph [MangleName 'arrowBarRightHL'] [MangleUnicode 0x2953] : composite-proc
+			refer-glyph : MangleName 'arrowRightHLK'
+			VBar.m arrowRSB (SymbolMid - arrowHeadSize) (SymbolMid + arrowHeadSize) fine
+		create-glyph [MangleName 'arrowBarUpHR'] [MangleUnicode 0x2954] : composite-proc
+			refer-glyph : MangleName 'arrowUpHRK'
+			HBar.m (arrowMidX - arrowHeadSize) (arrowMidX + arrowHeadSize) arrowTop fine
+		create-glyph [MangleName 'arrowBarDownHL'] [MangleUnicode 0x2955] : composite-proc
+			refer-glyph : MangleName 'arrowDownHLK'
+			HBar.m (arrowMidX - arrowHeadSize) (arrowMidX + arrowHeadSize) arrowBot fine
+		create-glyph [MangleName 'arrowBarLeftHL'] [MangleUnicode 0x2956] : composite-proc
+			refer-glyph : MangleName 'arrowLeftHLK'
+			VBar.m arrowSB (SymbolMid - arrowHeadSize) (SymbolMid + arrowHeadSize) fine
+		create-glyph [MangleName 'arrowBarRightHR'] [MangleUnicode 0x2957] : composite-proc
+			refer-glyph : MangleName 'arrowRightHRK'
+			VBar.m arrowRSB (SymbolMid - arrowHeadSize) (SymbolMid + arrowHeadSize) fine
+		create-glyph [MangleName 'arrowBarUpHL'] [MangleUnicode 0x2958] : composite-proc
+			refer-glyph : MangleName 'arrowUpHLK'
+			HBar.m (arrowMidX - arrowHeadSize) (arrowMidX + arrowHeadSize) arrowTop fine
+		create-glyph [MangleName 'arrowBarDownHR'] [MangleUnicode 0x2959] : composite-proc
+			refer-glyph : MangleName 'arrowDownHRK'
+			HBar.m (arrowMidX - arrowHeadSize) (arrowMidX + arrowHeadSize) arrowBot fine
+		create-glyph [MangleName 'barArrowLeftHR'] [MangleUnicode 0x295A] : composite-proc
+			refer-glyph : MangleName 'arrowLeftHRSK'
+			VBar.m arrowRSB (SymbolMid - arrowHeadSize) (SymbolMid + arrowHeadSize) fine
+		create-glyph [MangleName 'barArrowRightHL'] [MangleUnicode 0x295B] : composite-proc
+			refer-glyph : MangleName 'arrowRightHLSK'
+			VBar.m arrowSB (SymbolMid - arrowHeadSize) (SymbolMid + arrowHeadSize) fine
+		create-glyph [MangleName 'barArrowUpHR'] [MangleUnicode 0x295C] : composite-proc
+			refer-glyph : MangleName 'arrowUpHRSK'
+			HBar.m (arrowMidX - arrowHeadSize) (arrowMidX + arrowHeadSize) arrowBot fine
+		create-glyph [MangleName 'barArrowDownHL'] [MangleUnicode 0x295D] : composite-proc
+			refer-glyph : MangleName 'arrowDownHLSK'
+			HBar.m (arrowMidX - arrowHeadSize) (arrowMidX + arrowHeadSize) arrowTop fine
+		create-glyph [MangleName 'barArrowLeftHL'] [MangleUnicode 0x295E] : composite-proc
+			refer-glyph : MangleName 'arrowLeftHLSK'
+			VBar.m arrowRSB (SymbolMid - arrowHeadSize) (SymbolMid + arrowHeadSize) fine
+		create-glyph [MangleName 'barArrowRightHR'] [MangleUnicode 0x295F] : composite-proc
+			refer-glyph : MangleName 'arrowRightHRSK'
+			VBar.m arrowSB (SymbolMid - arrowHeadSize) (SymbolMid + arrowHeadSize) fine
+		create-glyph [MangleName 'barArrowUpHL'] [MangleUnicode 0x2960] : composite-proc
+			refer-glyph : MangleName 'arrowUpHLSK'
+			HBar.m (arrowMidX - arrowHeadSize) (arrowMidX + arrowHeadSize) arrowBot fine
+		create-glyph [MangleName 'barArrowDownHR'] [MangleUnicode 0x2961] : composite-proc
+			refer-glyph : MangleName 'arrowDownHRSK'
+			HBar.m (arrowMidX - arrowHeadSize) (arrowMidX + arrowHeadSize) arrowTop fine
+
 		MkArrow TrigArrowShape [MangleName 'trigArrowLeftK']    null arrowRSB SymbolMid (arrowSB + fine) SymbolMid
 		MkArrow TrigArrowShape [MangleName 'trigArrowRightK']   null arrowSB SymbolMid (arrowRSB - fine) SymbolMid
 		MkArrow TrigArrowShape [MangleName 'trigArrowUpK']      null arrowMidX arrowBot arrowMidX (arrowTop - fine)