From: Ben Harris <bjh21@bjh21.me.uk>
Date: Sun, 5 May 2024 21:13:35 +0000 (+0100)
Subject: A few more APL symbols
X-Git-Tag: bedstead-002.005~10
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~bjharris/git?a=commitdiff_plain;h=66546110d3610649ff99c600f0f4013c9971c6a5;p=bedstead.git

A few more APL symbols

U+2361 APL FUNCTIONAL SYMBOL UP TACK DIAERESIS
U+2362 APL FUNCTIONAL SYMBOL DEL DIAERESIS
U+2365 APL FUNCTIONAL SYMBOL CIRCLE DIAERESIS
---

diff --git a/bedstead.c b/bedstead.c
index 69d4ae3..b032e77 100644
--- a/bedstead.c
+++ b/bedstead.c
@@ -1495,8 +1495,11 @@ static struct glyph {
  {{037,025,025,021,021,021,037,000,000}, U(235E) }, /* APL quote quad */
  {{016,025,037,025,033,021,016,000,000}, U(235F) }, /* APL circle star */
  {{037,021,025,021,025,021,037,000,000}, U(2360) }, /* APL quad colon */
+ {{012,000,037,004,004,004,004,000,000}, U(2361) }, /* APL up tack dieresis */
+ {{012,000,037,021,012,012,004,000,000}, U(2362) }, /* APL del dieresis */
  {{012,000,025,016,004,016,025,000,000}, U(2363) }, /* APL star dieresis */
  {{012,000,004,012,012,004,000,000,000}, U(2364) }, /* APL jot dieresis */
+ {{012,000,016,021,021,016,000,000,000}, U(2365) }, /* APL circle dieresis */
  {{012,000,010,025,002,000,000,000,000}, U(2368) }, /* APL tilde dieresis */
  {{000,000,000,037,000,000,004,004,010}, U(236A) }, /* APL comma bar */
  {{037,021,021,016,033,004,004,000,000}, U(236B) }, /* APL del tilde */