[latex3-commits] [git/LaTeX3-latex3-latex2e] picture-lengths: old syntax version of test 01 (3189239c)

[David Carlisle]

Repository : https://github.com/latex3/latex2e
On branch  : picture-lengths
Link       : https://github.com/latex3/latex2e/commit/3189239ccefc2b418715df0e62800484d9159d97

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

commit 3189239ccefc2b418715df0e62800484d9159d97
Author: David Carlisle <d.p.carlisle at gmail.com>
Date:   Sun Aug 16 17:42:38 2020 +0100

    old syntax version of test 01


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

3189239ccefc2b418715df0e62800484d9159d97
 base/testfiles/tlb-picture-02.lvt                  | 42 ++++++++++++++++++++++
 .../{tlb-picture-01.tlg => tlb-picture-02.tlg}     |  0
 2 files changed, 42 insertions(+)

diff --git a/base/testfiles/tlb-picture-02.lvt b/base/testfiles/tlb-picture-02.lvt
new file mode 100644
index 00000000..7920420d
--- /dev/null
+++ b/base/testfiles/tlb-picture-02.lvt
@@ -0,0 +1,42 @@
+\documentclass{article}
+\input{test2e}
+
+% test new length syntax does not error and
+% generally improve coverage of picture mode in test suite
+
+% This version uses old syntax so no lengths and should
+% result in an indentical log to test tlb-picture-01
+
+\begin{document}
+
+\def\zzzb{0}
+
+\START
+
+\begin{picture}(200,400)
+
+\loop
+\edef\zzzb{\the\numexpr\zzzb+40\relax}%
+\put(\numexpr\zzzb+30,\numexpr\zzzb+40){\line(1,0){150}}
+\put(\numexpr\zzzb+30,\numexpr\zzzb+40){\line(0,1){60}}
+\put(\numexpr\zzzb+30,\numexpr\zzzb+100){\line(1,0){20}}
+\put(\numexpr\zzzb+50,\numexpr\zzzb+100){\line(1,-4){10}}
+\put(\numexpr\zzzb+60,\numexpr\zzzb+60){\line(1,0){100}}
+\put(\numexpr\zzzb+160,\numexpr\zzzb+60){\line(1,-1){20}}
+\put(\numexpr\zzzb+100,\numexpr\zzzb+50){\line(0,-1){80}}
+\put(\numexpr\zzzb+130,\numexpr\zzzb+50){\line(0,-1){80}}
+\put(\numexpr\zzzb+100,\numexpr\zzzb-30){\line(1,0){30}}
+\put(\numexpr\zzzb+100,\numexpr\zzzb+61){\line(0,1){49}}
+\put(\numexpr\zzzb+130,\numexpr\zzzb+61){\line(0,1){49}}
+\put(\numexpr\zzzb+100,\numexpr\zzzb+110){\line(1,0){30}}
+\ifnum\zzzb<200
+\repeat
+
+
+\multiput(0,10)(14.22636,14.22636){5}{\circle{14.22636}}
+\put(56.9055,2){\oval(20,10)}
+\put(28.45274,227.62204){\dashbox{2}(56.9055,56.9055)}
+\put(113.81102,284.52756){\framebox(56.9055,56.9055){hello}}
+\end{picture}
+
+\END
\ No newline at end of file
diff --git a/base/testfiles/tlb-picture-01.tlg b/base/testfiles/tlb-picture-02.tlg
similarity index 100%
copy from base/testfiles/tlb-picture-01.tlg
copy to base/testfiles/tlb-picture-02.tlg