[latex3-commits] [git/LaTeX3-latex3-latex2e] gh648: Evil tests (7d5e6a4d)

[PhelypeOleinik]

Repository : https://github.com/latex3/latex2e
On branch  : gh648
Link       : https://github.com/latex3/latex2e/commit/7d5e6a4d199f86d456e4b11f5b67f794b88b6741

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

commit 7d5e6a4d199f86d456e4b11f5b67f794b88b6741
Author: PhelypeOleinik <phelype.oleinik at latex-project.org>
Date:   Fri Aug 27 21:14:20 2021 -0300

    Evil tests


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

7d5e6a4d199f86d456e4b11f5b67f794b88b6741
 base/testfiles-lthooks/github-0648b.lvt | 52 +++++++++++++++++++++++++++++++++
 base/testfiles-lthooks/github-0648b.tlg | 15 ++++++++++
 2 files changed, 67 insertions(+)

diff --git a/base/testfiles-lthooks/github-0648b.lvt b/base/testfiles-lthooks/github-0648b.lvt
new file mode 100644
index 00000000..de056b08
--- /dev/null
+++ b/base/testfiles-lthooks/github-0648b.lvt
@@ -0,0 +1,52 @@
+
+\RequirePackage[enable-debug]{expl3}
+\ExplSyntaxOn
+\debug_on:n { check-declarations , deprecation }
+\ExplSyntaxOff
+
+\input{regression-test}
+
+\begin{filecontents}{after.sty}
+\end{filecontents}
+\begin{filecontents}{before.sty}
+\end{filecontents}
+
+\START
+
+\AddToHook{package/after/after}[x]{\typeout{after after.sty}}
+\AddToHook{package/after/before}[x]{\typeout{before after.sty}}
+\AddToHook{package/before/after}[x]{\typeout{after before.sty}}
+\AddToHook{package/before/before}[x]{\typeout{before before.sty}}
+
+\AddToHookNext{package/after/after}{\typeout{next after after.sty}}
+\AddToHookNext{package/after/before}{\typeout{next before after.sty}}
+\AddToHookNext{package/before/after}{\typeout{next after before.sty}}
+\AddToHookNext{package/before/before}{\typeout{next before before.sty}}
+
+% \ShowHook and \DeclareHookRule fail miserably due to the deprecation
+% code when used with a 'package', 'class', or 'include' hook with
+% files named 'before' or 'after' (the name becomes indistinguishable
+% from the position), but hopefully nobody actually uses that ;-)
+
+% \ShowHook{package/after/after}[x]
+% \ShowHook{package/after/before}[x]
+% \ShowHook{package/before/after}[x]
+% \ShowHook{package/before/before}[x]
+
+\typeout{-------------------------------}
+\RequirePackage{before}
+\typeout{-------------------------------}
+\RequirePackage{after}
+\typeout{-------------------------------}
+
+\RemoveFromHook{package/after/after}[x]
+\RemoveFromHook{package/after/before}[x]
+\RemoveFromHook{package/before/after}[x]
+\RemoveFromHook{package/before/before}[x]
+
+% \DeclareHookRule{package/after/after}{x}{after}{y}
+% \DeclareHookRule{package/after/before}{x}{after}{y}
+% \DeclareHookRule{package/before/after}{x}{after}{y}
+% \DeclareHookRule{package/before/before}{x}{after}{y}
+
+\END
diff --git a/base/testfiles-lthooks/github-0648b.tlg b/base/testfiles-lthooks/github-0648b.tlg
new file mode 100644
index 00000000..db30b7d2
--- /dev/null
+++ b/base/testfiles-lthooks/github-0648b.tlg
@@ -0,0 +1,15 @@
+This is a generated file for the l3build validation system.
+Don't change this file in any respect.
+-------------------------------
+before before.sty
+next before before.sty
+(before.sty)
+after before.sty
+next after before.sty
+-------------------------------
+before after.sty
+next before after.sty
+(after.sty)
+after after.sty
+next after after.sty
+-------------------------------