Improvements to SAA5051 and SAA5052 characters

In addition to their obviously distinctive national characters, the
SAA5051 and SAA5052 also change the shape of some standard characters
compared to the SAA5050.  I had spotted some of these, but noticed
several more when using an actual SAA5051 in my Acorn System 3.  The
unusual characters are apparently much easier to spot on screen than
in a datasheet.

Now, I think, we actually have the correct characters for each of
these chips.  In many cases, they're the same as one another, and in
those cases I've aliased the glyphs.

diff --git a/bedstead.c b/bedstead.c
index 5634c95f7360788edec8599fbca276e24027e513..db65ec823b0ba44bb6b0c0c64f8ea589416445e0 100644 (file)
--- a/bedstead.c
+++ b/bedstead.c
@@ -372,10 +372,15 @@ static struct glyph {
  {{000,000,000,010,000,000,010,000,000}, 0xf1d2, "colon.saa5051" },
  {{000,000,010,000,000,010,010,020,000}, 0xf1d3, "semicolon.saa5051" },
  {{016,021,020,016,021,016,001,021,016}, 0x00a7, "section" },
+ {{036,011,011,011,011,011,036,000,000}, -1, "D.saa5051" },
+ {{002,002,002,002,002,022,014,000,000}, -1, "J.saa5051" },
+ {{010,010,010,010,010,010,017,000,000}, 0xf1d5, "L.saa5051" },
  {{012,000,016,021,037,021,021,000,000}, 0x00c4, "Adieresis" },
  {{012,000,016,021,021,021,016,000,000}, 0x00d6, "Odieresis" },
  {{012,000,021,021,021,021,016,000,000}, 0x00dc, "Udieresis" },
  {{006,011,006,000,000,000,000,000,000}, 0x00b0, "degree" },
+ {{004,000,014,004,004,004,004,004,010}, -1, "j.saa5051" },
+ {{000,004,016,004,004,004,002,000,000}, -1, "t.saa5051" },
  {{012,000,016,001,017,021,017,000,000}, 0x00e4, "adieresis" },
  {{000,012,000,016,021,021,016,000,000}, 0x00f6, "odieresis" },
  {{000,012,000,021,021,021,017,000,000}, 0x00fc, "udieresis" },
@@ -383,10 +388,17 @@ static struct glyph {
 
  /* Extra characters found in the Swedish (SAA5052) character set */
  {{000,000,021,016,012,016,021,000,000}, 0x00a4, "currency" },
+ ALIAS("comma.saa5052", "comma.saa5051"),
+ ALIAS("period.saa5052", "period.saa5051"),
+ ALIAS("colon.saa5052", "colon.saa5051"),
+ ALIAS("semicolon.saa5052", "semicolon.saa5051"),
  {{002,004,037,020,036,020,037,000,000}, 0x00c9, "Eacute" },
  {{016,011,011,011,011,011,016,000,000}, 0xf1d4, "D.saa5052" },
- {{010,010,010,010,010,010,017,000,000}, 0xf1d5, "L.saa5052" },
+ ALIAS("J.saa5052", "J.saa5051"),
+ ALIAS("L.saa5052", "L.saa5051"),
  {{004,000,016,021,037,021,021,000,000}, 0x00c5, "Aring" },
+ ALIAS("j.saa5052", "j.saa5051"),
+ ALIAS("t.saa5052", "t.saa5051"),
  {{002,004,016,021,037,020,016,000,000}, 0x00e9, "eacute" },
  {{004,000,016,001,017,021,017,000,000}, 0x00e5, "aring" },