mirror/bedstead
1
0
Fork 1
mirror of https://bjh21.me.uk/bedstead/.git synced 2026-08-08 17:30:29 -04:00
Code Issues Packages Projects Releases Wiki Activity

Tolerable APL quad jot and del tilde

Browse Source 
That completes the IBM APL2 character set.
This commit is contained in:
Ben Harris 2020-05-25 09:24:10 +01:00
parent d8650d1063
commit f4484f7cde
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
bedstead.c
View File

@ -1317,6 +1317,7 @@ static struct glyph {
{{037,021,037,021,037,021,037,000,000}, U(2338) }, /* APL quad equal */
{{037,025,021,037,021,025,037,000,000}, U(2339) }, /* APL quad divide */
{{037,025,033,021,033,025,037,000,000}, U(233A) }, /* APL quad diamond */
{{037,021,025,033,025,021,037,000,000}, U(233B) }, /* APL quad jot */
{{004,016,025,025,025,016,004,000,000}, U(233D) }, /* APL circle stile */
{{000,001,012,004,012,020,000,000,000}, U(233F) }, /* APL slash bar */
{{000,020,012,004,012,001,000,000,000}, U(2340) }, /* APL backslash bar */
@ -1338,6 +1339,7 @@ static struct glyph {
{{012,000,004,012,012,004,000,000,000}, U(2364) }, /* APL jot 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 */
{{016,021,031,025,023,021,016,000,000}, U(236C) }, /* APL zilde */
{{010,025,002,000,021,012,004,000,000}, U(2371) }, /* APL nor */
{{010,025,002,000,004,012,021,000,000}, U(2372) }, /* APL nand */