diff options
Diffstat (limited to 'tex/context/base/core-spa.mkii')
-rw-r--r-- | tex/context/base/core-spa.mkii | 46 |
1 files changed, 46 insertions, 0 deletions
diff --git a/tex/context/base/core-spa.mkii b/tex/context/base/core-spa.mkii new file mode 100644 index 000000000..b3d71699d --- /dev/null +++ b/tex/context/base/core-spa.mkii @@ -0,0 +1,46 @@ +%D \module +%D [ file=core-spa, +%D version=1997.03.31, +%D title=\CONTEXT\ Core Macros, +%D subtitle=Spacing, +%D author=Hans Hagen, +%D date=\currentdate, +%D copyright={PRAGMA / Hans Hagen \& Ton Otten}] +%C +%C This module is part of the \CONTEXT\ macro||package and is +%C therefore copyrighted by \PRAGMA. See mreadme.pdf for +%C details. + +\unprotect + +% Just after we implemented the \MKIV\ code, Thanh posted a patch for +% \PDFTEX. The following code is untested! (\LUATEX\ does not contain +% this code!) + +\ifx\pdfkeeplinedimen\undefined + + \let\mksetupgridsnapping \relax + \let\mkenablegridsnapping \relax + \let\mkdisablegridsnapping\relax + +\else + + \def\mksetupgridsnapping + {\pdfeachlineheight \openstrutheight + \pdfeachlinedepth \openstrutdepth + \pdffirstlineheight \pdfeachlineheight + \pdflastlinedepth \pdfeachlinedepth} + + \def\mkenablegridsnapping + {\pdfkeeplinedimen\maxdimen + \topskip\strutht + \offinterlineskip} + + \def\mkdisablegridsnapping + {\pdfkeeplinedimen\zeropoint + % reset topskip + \oninterlineskip} + +\fi + +\protect \endinput |