Turn on line-drawing mode on long brackets etc

It doesn't work quite properly: some characters hit the left side of the
character cell, so I might want to separate the joins-leftward and
joins-upward flags.

diff --git a/bedstead.c b/bedstead.c
index 3a5f1a18add7cb602d7fd372378ca4db6b67ac85..044fc33ba4d5576223d37656a9016627ddceca7e 100644 (file)
--- a/bedstead.c
+++ b/bedstead.c
@@ -1774,8 +1774,8 @@ static struct glyph {
  {"\00\00\01\01\01\01\37\00\00", U(231F) }, /* bottom right corner */
  {"\00\00\02\05\04\04\04\04\04", 0x2320, "integraltp" },
  {"\00\00\10\24\04\04\04\04\04", 0xf111, "integraltp.rtlm" },
- {"\04\04\04\04\04\24\10\00\00", 0x2321, "integralbt" },
- {"\04\04\04\04\04\05\02\00\00", 0xf112, "integralbt.rtlm" },
+ {"\04\04\04\04\04\24\10\00\00", 0x2321, "integralbt", LINE },
+ {"\04\04\04\04\04\05\02\00\00", 0xf112, "integralbt.rtlm", LINE },
  {"\02\02\04\10\04\02\02\00\00", 0x2329, "angleleft" },
  {"\10\10\04\02\04\10\10\00\00", 0x232a, "angleright" },
  {"\00\37\04\04\04\37\00\00\00", U(2336) }, /* APL I-beam */
@@ -1832,25 +1832,25 @@ static struct glyph {
  {"\00\00\37\00\25\00\00\00\00", U(2393) }, /* directcurrent */
  {"\37\21\21\21\21\21\37\00\00", U(2395) }, /* APL quad */
  {"\02\04\10\10\10\10\10\10\10", U(239B) }, /* long parenleft top */
- {"\10\10\10\10\10\10\10\10\10", U(239C) }, /* long parenleft middle */
- {"\10\10\10\10\10\04\02\00\00", U(239D) }, /* long parenleft bottom */
+ {"\10\10\10\10\10\10\10\10\10", U(239C), LINE }, /* long parenleft middle */
+ {"\10\10\10\10\10\04\02\00\00", U(239D), LINE }, /* long parenleft bottom */
  {"\10\04\02\02\02\02\02\02\02", U(239E) }, /* long parenright top */
- {"\02\02\02\02\02\02\02\02\02", U(239F) }, /* long parenright middle */
- {"\02\02\02\02\02\04\10\00\00", U(23A0) }, /* long parenright bottom */
+ {"\02\02\02\02\02\02\02\02\02", U(239F), LINE }, /* long parenright middle */
+ {"\02\02\02\02\02\04\10\00\00", U(23A0), LINE }, /* long parenright bottom */
  {"\17\10\10\10\10\10\10\10\10", U(23A1) }, /* long bracketleft top */
- {"\10\10\10\10\10\10\10\10\10", U(23A2) }, /* long bracketleft mid */
- {"\10\10\10\10\10\10\17\00\00", U(23A3) }, /* long bracketleft bot */
+ {"\10\10\10\10\10\10\10\10\10", U(23A2), LINE }, /* long bracketleft mid */
+ {"\10\10\10\10\10\10\17\00\00", U(23A3), LINE }, /* long bracketleft bot */
  {"\36\02\02\02\02\02\02\02\02", U(23A4) }, /* long bracketright top */
- {"\02\02\02\02\02\02\02\02\02", U(23A5) }, /* long bracketright mid */
- {"\02\02\02\02\02\02\36\00\00", U(23A6) }, /* long bracketright bot */
+ {"\02\02\02\02\02\02\02\02\02", U(23A5), LINE }, /* long bracketright mid */
+ {"\02\02\02\02\02\02\36\00\00", U(23A6), LINE }, /* long bracketright bot */
  {"\03\04\04\04\04\04\04\04\04", U(23A7) }, /* long braceleft top */
- {"\04\04\04\10\04\04\04\04\04", U(23A8) }, /* long braceleft middle */
- {"\04\04\04\04\04\04\03\00\00", U(23A9) }, /* long braceleft bottom */
- {"\04\04\04\04\04\04\04\04\04", U(23AA) }, /* long brace extension */
+ {"\04\04\04\10\04\04\04\04\04", U(23A8), LINE }, /* long braceleft middle */
+ {"\04\04\04\04\04\04\03\00\00", U(23A9), LINE }, /* long braceleft bottom */
+ {"\04\04\04\04\04\04\04\04\04", U(23AA), LINE }, /* long brace extension */
  {"\30\04\04\04\04\04\04\04\04", U(23AB) }, /* long braceright top */
- {"\04\04\04\02\04\04\04\04\04", U(23AC) }, /* long braceright middle */
- {"\04\04\04\04\04\04\30\00\00", U(23AD) }, /* long braceright bottom */
- {"\04\04\04\04\04\04\04\04\04", U(23AE) }, /* integral extension */
+ {"\04\04\04\02\04\04\04\04\04", U(23AC), LINE }, /* long braceright middle */
+ {"\04\04\04\04\04\04\30\00\00", U(23AD), LINE }, /* long braceright bottom */
+ {"\04\04\04\04\04\04\04\04\04", U(23AE), LINE }, /* integral extension */
  {"\03\04\04\04\04\04\04\04\30", U(23B0) }, /* two-level brace / */
  {"\30\04\04\04\04\04\04\04\03", U(23B1) }, /* two-level brace \ */
  {"\37\20\10\10\04\04\02\02\01", U(23B2) }, /* summation top */