From: Ben Harris <bjh21@bjh21.me.uk>
Date: Thu, 30 Jan 2025 21:07:41 +0000 (+0000)
Subject: Glyphs for G, K, L, N, and R with comma below
X-Git-Tag: bedstead-3.251~5
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~bjharris/git?a=commitdiff_plain;h=0d8f1b4c6f658c65669ddf5eab9a1f9c94de1196;p=bedstead.git

Glyphs for G, K, L, N, and R with comma below

These are the remaining characters that Unicode calls "WITH CEDILLA" but
that the standard (and code charts) say should actually have a comma
below by default.
---

diff --git a/bedstead.c b/bedstead.c
index 2e6db01..93c49da 100644
--- a/bedstead.c
+++ b/bedstead.c
@@ -752,6 +752,10 @@ static struct glyph {
  {"\04\00\17\20\23\21\17\00\00", 0x0120, "Gdotaccent" },
  {"\04\00\17\21\21\21\17\01\16", 0x0121, "gdotaccent" },
  ALIAS("gdotaccent.sc", "Gdotaccent"),
+ {"\16\21\20\20\23\21\17\04\10", U(0122) }, /* Gcommaaccent */
+ {"\00\00\17\20\23\21\17\04\10", -1, "uni0122.c2sc" },
+ {"\02\04\17\21\21\21\17\01\16", U(0123) }, /* gcommaaccent */
+ ALIAS("uni0123.sc", "uni0122.c2sc"),
  {"\21\37\21\37\21\21\21\00\00", 0x0126, "Hbar" },
  {"\00\00\21\37\21\37\21\00\00", 0xf194, "Hbar.c2sc" },
  {"\10\34\10\16\11\11\11\00\00", 0x0127, "hbar" },
@@ -778,7 +782,18 @@ static struct glyph {
  {"\04\12\00\04\04\04\04\04\10", 0x0135, "jcircumflex" },
  {"\04\12\00\14\04\04\04\04\10", -1, "jcircumflex.serif" },
  ALIAS("jcircumflex.sc", "Jcircumflex"),
+ {"\21\21\22\34\22\21\25\04\10", U(0136) }, /* Kcommaaccent */
+ {"\00\00\21\22\34\22\21\04\10", -1, "uni0136.c2sc" },
+ {"\20\20\21\22\34\22\21\04\10", U(0137) }, /* kcommaaccent */
+ ALIAS("uni0137.sc", "uni0136.c2sc"),
  {"\00\00\21\22\34\22\21\00\00", 0x0138, "kgreenlandic" },
+ {"\20\20\20\20\20\20\37\04\10", U(013B) }, /* Lcommaaccent */
+ {"\10\10\10\10\10\10\17\02\04", -1, "uni013B.narrow" },
+ {"\00\00\20\20\20\20\37\04\10", -1, "uni013B.c2sc" },
+ {"\00\00\10\10\10\10\17\02\04", -1, "uni013B.c2sc.narrow" },
+ {"\14\04\04\04\04\04\16\04\10", U(013C) }, /* lcommaaccent */
+ ALIAS("uni013C.sc", "uni013B.c2sc"),
+ ALIAS("uni013C.sc.narrow", "uni013B.c2sc.narrow"),
  {"\22\22\24\20\20\20\37\00\00", 0x013d, "Lcaron" },
  {"\11\11\12\10\10\10\17\00\00", -1, "Lcaron.narrow" },
  {"\00\00\22\22\24\20\37\00\00", 0xf197, "Lcaron.c2sc" },
@@ -800,6 +815,10 @@ static struct glyph {
  {"\02\04\21\31\25\23\21\00\00", 0x0143, "Nacute" },
  {"\02\04\36\21\21\21\21\00\00", 0x0144, "nacute" },
  ALIAS("nacute.sc", "Nacute"),
+ {"\21\21\31\25\23\21\25\04\10", U(0145) }, /* Ncommaaccent */
+ {"\00\00\31\25\23\21\25\04\10", -1, "uni0145.c2sc" },
+ {"\00\00\36\21\21\21\25\04\10", U(0146) }, /* ncommaaccent */
+ ALIAS("uni0146.sc", "uni0145.c2sc"),
  {"\12\04\21\31\25\23\21\00\00", 0x0147, "Ncaron" },
  {"\12\04\36\21\21\21\21\00\00", 0x0148, "ncaron" },
  ALIAS("ncaron.sc", "Ncaron"),
@@ -819,6 +838,10 @@ static struct glyph {
  {"\02\04\36\21\36\22\21\00\00", 0x0154, "Racute" },
  {"\01\02\13\14\10\10\10\00\00", 0x0155, "racute" },
  ALIAS("racute.sc", "Racute"),
+ {"\36\21\21\36\22\21\25\04\10", U(0156) }, /* Rcommaaccent */
+ {"\00\00\36\21\36\21\25\04\10", -1, "uni0156.c2sc" },
+ {"\00\00\13\14\10\10\12\02\04", U(0157) }, /* rcommaaccent */
+ ALIAS("uni0157.sc", "uni0156.c2sc"),
  {"\12\04\36\21\36\22\21\00\00", 0x0158, "Rcaron" },
  {"\05\02\13\14\10\10\10\00\00", 0x0159, "rcaron" },
  ALIAS("rcaron.sc", "Rcaron"),
@@ -2879,7 +2902,9 @@ static struct alt_sub_override {
 #define CV42(V) V("J", ".narrow") V("J.c2sc", ".narrow")	\
 	V("j.sc", ".narrow") V("uni1D0A", ".narrow")
 #define CV44(V) V("L", ".narrow") V("L.c2sc", ".narrow")	\
-	V("l.sc", ".narrow") V("Lcaron", ".narrow")		\
+	V("l.sc", ".narrow") V("uni013B", ".narrow")		\
+	V("uni013B.c2sc", ".narrow") V("uni013C.sc", ".narrow") \
+	V("Lcaron", ".narrow")					\
 	V("Lcaron.c2sc", ".narrow") V("lcaron.sc", ".narrow")	\
 	V("Ldot", ".narrow") V("Ldot.c2sc", ".narrow")		\
 	V("ldot.sc", ".narrow") V("uni029F", ".narrow")		\