[latex3-commits] [git/LaTeX3-latex3-pdfresources] testlinkstuff: added experimental shipout code (1003aaa)

[Ulrike Fischer]

Repository : https://github.com/latex3/pdfresources
On branch  : testlinkstuff
Link       : https://github.com/latex3/pdfresources/commit/1003aaa459612db636d905226239ee653453e44d

>---------------------------------------------------------------

commit 1003aaa459612db636d905226239ee653453e44d
Author: Ulrike Fischer <fischer at troubleshooting-tex.de>
Date:   Fri May 17 18:41:11 2019 +0200

    added experimental shipout code


>---------------------------------------------------------------

1003aaa459612db636d905226239ee653453e44d
 build.lua                                          |    2 +-
 experiments/atbegshi-tests.tex => tmpl3shipout.sty |   45 ++++----------------
 2 files changed, 10 insertions(+), 37 deletions(-)

diff --git a/build.lua b/build.lua
index 42b64b7..4f56812 100644
--- a/build.lua
+++ b/build.lua
@@ -7,7 +7,7 @@ bundle  = ""
 module  = "pdfresources"
 
 installfiles = {"*.sty","*.cls","*.def"}
-sourcefiles =  {"*.dtx","*.ins","hluatex-experimental.def"}
+sourcefiles =  {"*.dtx","*.ins","hluatex-experimental.def","tmpl3shipout.sty"}
 
 checkruns = 2
 checkengines = {"luatex","pdftex"}
diff --git a/experiments/atbegshi-tests.tex b/tmpl3shipout.sty
similarity index 86%
copy from experiments/atbegshi-tests.tex
copy to tmpl3shipout.sty
index 4b6b199..bccc4a8 100644
--- a/experiments/atbegshi-tests.tex
+++ b/tmpl3shipout.sty
@@ -1,17 +1,14 @@
-\documentclass{article}
-\usepackage{color}
-\usepackage{expl3}
-\usepackage{l3hooks}
-\usepackage{etoolbox}
-\usepackage{atbegshi}
-\usepackage{picture}
-\usepackage{zref-base,zref-user}
-\robustify\color
-
-\ExplSyntaxOn
+\RequirePackage{expl3}
+\ProvidesExplPackage{tmpl3shipout}{2019-05-15}{}
+  {XXXXXXXXXXXXXXXX L3 Experimental hooks}
+\RequirePackage{l3hooks}
 
+% \shipout_page_add:nn : #1 fg or bg
+% \shipout_box_add:nn  : #1 fg or bg
+% \shipout_header:n
 \hook_new:n { shipout }
 \int_new:N \g_shipout_page_int
+\int_gset:Nn \g_shipout_page_int{1}
 
 \int_new:N \l__shipout_group_level_int
 \box_new:N \l__shipout_main_box
@@ -223,29 +220,5 @@
 
 
 \cs_set_eq:NN \shipout \__shipout:w
-\shipout_header:n { \hbox:n { foo } }
-\makeatletter
-\zref at newprop*{kernelabspage}     [0] { \int_use:N \g_shipout_page_int }
-\zref at addprop {main} {kernelabspage}
-\ExplSyntaxOff
-\usepackage{fancyhdr}
-\pagestyle{fancy}
-\fancyhead[C]{XXXXXXXXXXXXXXXXXXXXXXXXX}
-\begin{document}
-\zlabel{blub}
-
-\ExplSyntaxOn
-\hook_pre_push:nn { shipout }
-  { \shipout_page_add:nn { fg } { \put(0.5\paperwidth,-0.5\paperheight){\circle{10}}} }
- \hook_pre_push:nn { shipout }
-  { \shipout_box_add:nn { fg } { \mode_leave_vertical: \color { red } \hbox:n { a } } }
-\hook_pre_push:nn { shipout }
-  { \shipout_box_add:nn { bg } { \mode_leave_vertical: \hbox:n { b } } }
-\ExplSyntaxOff
-
-Hello world
-\newpage
-\pagenumbering{alph}
-blblb\zlabel{test}
 
-\end{document} 
\ No newline at end of file
+\endinput