🚀 go-pugleaf

Here's a couple of gml tags defined for proper dashes (m and n):dash.they
work for both font devices and nonfont devices.

+======================================== Beginning of GML@DASH SCRIPT
:* Dashes
:* ------
:*     DASH tag defined (two hyphens if no font-device,
:*           proper dash if font-device)
:*           (also &dash for use in headings and following other tags)
:*     ENDASH tag defined (one hyphen if no font-device,
:*           proper en-dash if font-device)
:*           (can't get en-dash following other tags since must
:*               do a .bf EQSY . . . . .pf)
:*     Note on dashes, hyphens, and minus sign:
:*           dash = BF (available in all non-symbol fonts)
:*           en-dash = 43 on PiSerif font (fontname = EQSY)
:*                     will default to 10-point
:*               (used for inclusive dates, pages, etc.: 87-103)
:*           hyphen = 60 (available on all fonts)
:*           minus = 60 on PiSerif font (fontname = EQSY)
:*           lengths: dash > minus > en-dash > hyphen
:*           get minus by &m or &um--see gml@math
.* --------------------------------------------------DASH---------------
..gt DASH add DASH att cont
..ga * DASH auto '--'
..dm DASH begin
..'ct &*DASH.&V'&*
..dm DASH end
..sr dash = '--'
.* ------------------------------------------------ENDASH---------------
..gt ENDASH add ENDASH att cont
..ga * ENDASH auto '-'
..dm ENDASH begin
..sr *hysave = &SYSHY
..hy off;.* to prevent hyphen being conditional (when no font-device)
..bf EQSY =
..'ct &*ENDASH
..pf
..'ct &V'&*
..hy &*hysave
..dm ENDASH end
.if '&@@FONTDEV' = 'Y'
.   ..th ..do
.        ..ga DASH DASH reset "&x'BF."
.        ..sr dash = &x'BF
.        ..ga ENDASH ENDASH reset "&x'43."
.   ..do end
.* ---------------------------------------------------MSQ----------------
..gt MSQ add MSQ att cont
..ga * MSQ auto "'"
..dm MSQ begin
..bf MONO =
..'ct &*MSQ
..pf
..'ct &V'&*
..dm MSQ end
.* ---------------------------------------------------MDQ----------------
..gt MDQ add MDQ att cont
..ga * MDQ auto '"'
..dm MDQ begin
..bf MONO =
..'ct &*MDQ
..pf
..'ct &V'&*
..dm MDQ end
-============================================== End of GML@DASH SCRIPT