summaryrefslogtreecommitdiff
path: root/tex/context/base/mkiv/pack-rul.mkiv
diff options
context:
space:
mode:
authorContext Git Mirror Bot <phg42.2a@gmail.com>2016-01-18 23:15:08 +0100
committerContext Git Mirror Bot <phg42.2a@gmail.com>2016-01-18 23:15:08 +0100
commit975f4f9f2d71d8021900955404f8b144ca6895f5 (patch)
treece7dcd5288845a485bc8d457e6c705a87a020b10 /tex/context/base/mkiv/pack-rul.mkiv
parente200230205ec1297f8d3ade3d491585f85d87fff (diff)
downloadcontext-975f4f9f2d71d8021900955404f8b144ca6895f5.tar.gz
2016-01-18 22:24:00
Diffstat (limited to 'tex/context/base/mkiv/pack-rul.mkiv')
-rw-r--r--tex/context/base/mkiv/pack-rul.mkiv78
1 files changed, 37 insertions, 41 deletions
diff --git a/tex/context/base/mkiv/pack-rul.mkiv b/tex/context/base/mkiv/pack-rul.mkiv
index 0d6ab20bd..5fa938bda 100644
--- a/tex/context/base/mkiv/pack-rul.mkiv
+++ b/tex/context/base/mkiv/pack-rul.mkiv
@@ -507,19 +507,19 @@
%D \macros
%D {overlayfakebox}
-\unexpanded\def\overlayfakebox
- {\hpack
- {\setbox\scratchbox\emptyhbox
- \wd\scratchbox\d_overlay_width
- \ht\scratchbox\d_overlay_height
- \box\scratchbox}}
-
% \unexpanded\def\overlayfakebox
-% {\hpack % redundant but needs testing
-% {\novrule
-% \s!width \d_overlay_width
-% \s!height\d_overlay_height
-% \s!depth \zeropoint}}
+% {\hpack
+% {\setbox\scratchbox\emptyhbox
+% \wd\scratchbox\d_overlay_width
+% \ht\scratchbox\d_overlay_height
+% \box\scratchbox}}
+
+\unexpanded\def\overlayfakebox
+ {\hpack % redundant but needs testing
+ {\novrule
+ \s!width \d_overlay_width
+ \s!height\d_overlay_height
+ \s!depth \zeropoint}}
%D For testing we provide:
@@ -697,41 +697,17 @@
\box\b_framed_normal
\box\b_framed_extra}}
-\def\pack_framed_stroked_box_normal
- {\setbox\scratchbox\emptyhbox
- \wd\scratchbox\d_framed_target_wd
- \ht\scratchbox\d_framed_target_ht
- \dp\scratchbox\d_framed_target_dp
- \setbox\scratchbox\vpack \bgroup
- \csname \??framedtop\p_framed_frame\framedparameter\c!topframe \endcsname
- \nointerlineskip % new (needed for fences)
- \hbox \bgroup
- \csname \??framedleft\p_framed_frame\framedparameter\c!leftframe \endcsname
- \box\scratchbox
- \csname \??framedright\p_framed_frame\framedparameter\c!rightframe \endcsname
- \egroup
- \nointerlineskip % new (needed for fences)
- \csname \??framedbottom\p_framed_frame\framedparameter\c!bottomframe\endcsname
- \egroup
- \wd\scratchbox\d_framed_target_wd
- \ht\scratchbox\d_framed_target_ht
- \dp\scratchbox\d_framed_target_dp
- \box\scratchbox}
-
% \def\pack_framed_stroked_box_normal
-% {%\setbox\scratchbox\emptyhbox
-% %\wd\scratchbox\d_framed_target_wd
-% %\ht\scratchbox\d_framed_target_ht
-% %\dp\scratchbox\d_framed_target_dp
+% {\setbox\scratchbox\emptyhbox
+% \wd\scratchbox\d_framed_target_wd
+% \ht\scratchbox\d_framed_target_ht
+% \dp\scratchbox\d_framed_target_dp
% \setbox\scratchbox\vpack \bgroup
% \csname \??framedtop\p_framed_frame\framedparameter\c!topframe \endcsname
% \nointerlineskip % new (needed for fences)
% \hbox \bgroup
% \csname \??framedleft\p_framed_frame\framedparameter\c!leftframe \endcsname
-% \novrule
-% \s!width \d_framed_target_wd
-% \s!height\d_framed_target_ht
-% \s!depth \d_framed_target_dp
+% \box\scratchbox
% \csname \??framedright\p_framed_frame\framedparameter\c!rightframe \endcsname
% \egroup
% \nointerlineskip % new (needed for fences)
@@ -742,6 +718,26 @@
% \dp\scratchbox\d_framed_target_dp
% \box\scratchbox}
+\def\pack_framed_stroked_box_normal
+ {\setbox\scratchbox\vpack \bgroup
+ \csname \??framedtop\p_framed_frame\framedparameter\c!topframe \endcsname
+ \nointerlineskip % new (needed for fences)
+ \hbox \bgroup
+ \csname \??framedleft\p_framed_frame\framedparameter\c!leftframe \endcsname
+ \novrule
+ \s!width \d_framed_target_wd
+ \s!height\d_framed_target_ht
+ \s!depth \d_framed_target_dp
+ \csname \??framedright\p_framed_frame\framedparameter\c!rightframe \endcsname
+ \egroup
+ \nointerlineskip % new (needed for fences)
+ \csname \??framedbottom\p_framed_frame\framedparameter\c!bottomframe\endcsname
+ \egroup
+ \wd\scratchbox\d_framed_target_wd
+ \ht\scratchbox\d_framed_target_ht
+ \dp\scratchbox\d_framed_target_dp
+ \box\scratchbox}
+
\def\pack_framed_t_rule{\hrule\s!height\d_framed_linewidth\kern-\d_framed_linewidth}
\def\pack_framed_b_rule{\kern-\d_framed_linewidth\hrule\s!height\d_framed_linewidth}
\def\pack_framed_r_rule{\kern-\d_framed_linewidth\vrule\s!width\d_framed_linewidth}