summaryrefslogtreecommitdiff
path: root/tex/context/base/back-pdf.mkiv
diff options
context:
space:
mode:
Diffstat (limited to 'tex/context/base/back-pdf.mkiv')
-rw-r--r--tex/context/base/back-pdf.mkiv28
1 files changed, 15 insertions, 13 deletions
diff --git a/tex/context/base/back-pdf.mkiv b/tex/context/base/back-pdf.mkiv
index 7e910f07f..9e441e224 100644
--- a/tex/context/base/back-pdf.mkiv
+++ b/tex/context/base/back-pdf.mkiv
@@ -68,17 +68,16 @@
{\ctxcommand{setxmpfile("\backendparameter{xmpfile}")}}%
\to \everysetupbackend
-% \doifsomething{\backendparameter\c!format} .. at the lua end
-
\appendtoks
- \ctxcommand{setformat {
+ \doifsomething{\backendparameter\c!format}
+ {\ctxcommand{setformat {
format = "\backendparameter\c!format",
level = "\backendparameter\c!level",
option = "\backendparameter\c!option",
profile = "\backendparameter\c!profile",
intent = "\backendparameter\c!intent",
file = "\backendparameter\c!file",
- }}%
+ }}}%
\to \everysetupbackend
%D For the moment we keep these.
@@ -221,12 +220,12 @@
\newbox\objectbox
-\unexpanded\def\dostartobject#1#2#3#4#5% needs to be \unexpanded
+\def\dostartobject#1#2#3#4#5%
{\bgroup
\setbox\objectbox\vbox\bgroup
\def\back_object_stop{\egroup\back_object_register{#1}{#2}}}
-\unexpanded\def\dostopobject % needs to be \unexpanded
+\def\dostopobject
{\back_object_stop
\egroup}
@@ -238,6 +237,9 @@
\immediate\pdfxform resources {\pdfbackendcurrentresources}\objectbox
\dosetobjectreference{#1}{#2}{\the\pdflastxform}}
+\def\doresetobjects
+ {}
+
\let\m_back_object_reference\empty
\def\doinsertobject#1#2%
@@ -261,7 +263,7 @@
% for the moment here
%D \macros
-%D {back_ovalbox}
+%D {doovalbox}
%D
%D Drawing frames with round corners is inherited from the
%D main module.
@@ -274,7 +276,7 @@
% \def\back_oval_calculate#1#2#3%
% {\PointsToBigPoints{\dimexpr#2+#3\relax}#1}
-\unexpanded\def\back_ovalbox#1#2#3#4#5#6#7#8%
+\unexpanded\def\doovalbox#1#2#3#4#5#6#7#8%
{\forcecolorhack
\bgroup
% \scratchdimen#4%
@@ -304,16 +306,16 @@
\PointsToBigPoints{\dimexpr #2-\scratchdimen}\yymax
\PointsToBigPoints{\dimexpr-#3+\scratchdimen}\yymin
%
- \edef\dostroke{\number#6}%
- \edef\dofill{\number#7}%
- \edef\mode{\number#8}%
+ \edef\dostroke{#6}%
+ \edef\dofill{#7}%
+ \edef\mode{\number#8 \space}%
% no \ifcase, else \relax in pdfcode
\setbox\scratchbox\hbox
{\ifnum\dostroke\dofill>\zerocount
\pdfliteral
{q
\stroke\space w
- \ifcase\mode\space
+ \ifcase\mode
\xxmin\space \ymin \space m
\xxmax\space \ymin \space l
\xmax \space \ymin \space \xmax \space \yymin\space y
@@ -493,7 +495,7 @@
\xmin \space \ymin \space \xmin \space \yymin\space y
\or % 28
\fi
- \ifnum\mode>8\space
+ \ifnum\mode>8
S
\else
\ifnum\dostroke=\plusone S \fi