stable 2000.05.11

1 files changed, 40 insertions, 0 deletions

diff --git a/tex/context/base/spec-dvi.tex b/tex/context/base/spec-dvi.tex
index 4266b36c4..ad80d2ee1 100644
--- a/tex/context/base/spec-dvi.tex
+++ b/tex/context/base/spec-dvi.tex
@@ -59,6 +59,46 @@
    \unvbox0\setbox0=\lastbox\unhbox0
    \egroup}
 
+%D \macros
+%D   {dosetposition,
+%D    dosetpositionwhd}
+%D
+%D The next specials only identify a position. It is up to 
+%D a \DVI\ postprocessing utility to merge the right commands
+%D into the utility file. Since in \CONTEXT, we only deal 
+%D with relative positions, the reference point is not so 
+%D important.  
+%D
+%D The postprocessor should translate the specials into 
+%D commands and append these to \type {jobname.tuo} using the 
+%D format: 
+%D 
+%D \starttypen
+%D \pospxy   {identifier}{page}{x}{y} 
+%D \pospxywhd{identifier}{page}{x}{y}{w}{h}{d}
+%D \stoptypen
+%D 
+%D The postprocessor should, of course, provide the \type 
+%D {page}, \type {x}, and \type {y} values. 
+
+\definespecial\dosetposition#1%
+  {\special{pos:pxy "#1"}}
+
+\definespecial\dosetpositionwhd#1#2#3#4%
+  {\special{pos:pxywhd "#1" #2 #3 #4}}
+
+%D The next special tells the position postprocessor what 
+%D page dimensions were used.  
+
+\let\flushDVIpositionpapersize\relax
+
+\definespecial\dosetpositionpapersize#1#2%
+  {\xdef\flushDVIpositionpapersize%
+     {\special{pos:papersize #1 #2}%
+      \global\noexpand\let\noexpand\flushDVIpositionpapersize\relax}}
+
+\prependtoks \flushDVIpositionpapersize \to \everyshipout
+
 \stopspecials
 
 \protect