[latex3-commits] [git/LaTeX3-latex3-latex3] master: Minor performance enhancements (1dfbfef9a)

Joseph Wright joseph.wright at morningstar2.co.uk
Wed Jun 10 18:45:36 CEST 2020


Repository : https://github.com/latex3/latex3
On branch  : master
Link       : https://github.com/latex3/latex3/commit/1dfbfef9aa2e902186fdc09f3c9e5758f9ce162e

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

commit 1dfbfef9aa2e902186fdc09f3c9e5758f9ce162e
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Wed Jun 10 17:42:00 2020 +0100

    Minor performance enhancements
    
    As the backend is now all internal, there is no
    need to re-apply \fp_eval:n to 'safe' values.


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

1dfbfef9aa2e902186fdc09f3c9e5758f9ce162e
 l3backend/CHANGELOG.md                             |  1 +
 l3backend/l3backend-draw.dtx                       | 39 ++++------------
 l3experimental/CHANGELOG.md                        |  1 +
 l3experimental/l3draw/l3draw-state.dtx             |  2 +-
 l3experimental/l3draw/testfiles/m3draw005.ptex.tlg |  6 +--
 .../l3draw/testfiles/m3draw005.uptex.tlg           |  6 +--
 l3experimental/l3draw/testfiles/m3draw006.ptex.tlg | 54 +++++++++++-----------
 .../l3draw/testfiles/m3draw006.uptex.tlg           | 54 +++++++++++-----------
 8 files changed, 71 insertions(+), 92 deletions(-)

diff --git a/l3backend/CHANGELOG.md b/l3backend/CHANGELOG.md
index bd4dc0f8a..c501bc5a6 100644
--- a/l3backend/CHANGELOG.md
+++ b/l3backend/CHANGELOG.md
@@ -9,6 +9,7 @@ this project uses date-based 'snapshot' version identifiers.
 ### Changed
 - Use `scn` operator for separations
 - Internal color model
+- Internal performance enhancements
 
 ## [2020-06-03]
 
diff --git a/l3backend/l3backend-draw.dtx b/l3backend/l3backend-draw.dtx
index 8c48b6e2e..9e7f08afc 100644
--- a/l3backend/l3backend-draw.dtx
+++ b/l3backend/l3backend-draw.dtx
@@ -313,7 +313,7 @@
       { \dim_to_decimal_in_bp:n {#1} ~ setlinewidth }
   }
 \cs_new_protected:Npn \@@_backend_miterlimit:n #1
-  { \@@_backend_literal:x { \fp_eval:n {#1} ~ setmiterlimit } }
+  { \@@_backend_literal:n { #1 ~ setmiterlimit } }
 \cs_new_protected:Npn \@@_backend_cap_butt:
   { \@@_backend_literal:n { 0 ~ setlinecap } }
 \cs_new_protected:Npn \@@_backend_cap_round:
@@ -392,14 +392,7 @@
 \cs_new_protected:Npn \@@_backend_cm:nnnn #1#2#3#4
   {
     \@@_backend_literal:n
-      {
-        [
-          \fp_eval:n {#1} ~ \fp_eval:n {#2} ~
-          \fp_eval:n {#3} ~ \fp_eval:n {#4} ~
-          0 ~ 0
-        ] ~
-        concat
-      }
+      { [ #1 ~ #2 ~ #3 ~ #4 ~ 0 ~ 0 ] ~ concat }
   }
 %    \end{macrocode}
 % \end{macro}
@@ -607,7 +600,7 @@
       { \dim_to_decimal_in_bp:n {#1} ~ w }
   }
 \cs_new_protected:Npn \@@_backend_miterlimit:n #1
-  { \@@_backend_literal:x { \fp_eval:n {#1} ~ M } }
+  { \@@_backend_literal:x { #1 ~ M } }
 \cs_new_protected:Npn \@@_backend_cap_butt:
   { \@@_backend_literal:n { 0 ~ J } }
 \cs_new_protected:Npn \@@_backend_cap_round:
@@ -700,11 +693,7 @@
 \cs_new_protected:Npn \@@_backend_cm:nnnn #1#2#3#4
   {
 %<*pdfmode>
-    \__kernel_backend_matrix:x
-      {
-        \fp_eval:n {#1} ~ \fp_eval:n {#2} ~
-        \fp_eval:n {#3} ~ \fp_eval:n {#4}
-      }
+    \__kernel_backend_matrix:n { #1 ~ #2 ~ #3 ~ #4 }
 %</pdfmode>
 %<*dvipdfmx|xdvipdfmx>
     \@@_backend_cm_decompose:nnnnN {#1} {#2} {#3} {#4}
@@ -858,13 +847,8 @@
     \@@_backend_cm:nnnn {#2} {#3} {#4} {#5}
 %</pdfmode>
 %<*dvipdfmx|xdvipdfmx>
-    \__kernel_backend_literal:x
-      {
-        pdf:btrans~matrix~
-        \fp_eval:n {#2} ~ \fp_eval:n {#3} ~
-        \fp_eval:n {#4} ~ \fp_eval:n {#5} ~
-        0 ~ 0
-      }
+    \__kernel_backend_literal:n
+      { pdf:btrans~matrix~ #2 ~ #3 ~ #4 ~ #5 ~ 0 ~ 0 }
 %</dvipdfmx|xdvipdfmx>
     \hbox_overlap_right:n { \box_use:N #1 }
 %<*dvipdfmx|xdvipdfmx>
@@ -1153,7 +1137,7 @@
 \cs_new_protected:Npn \@@_backend_linewidth:n #1
   { \@@_backend_scope:x { stroke-width=" \dim_to_decimal:n {#1} " } }
 \cs_new_protected:Npn \@@_backend_miterlimit:n #1
-  { \@@_backend_scope:x { stroke-miterlimit=" \fp_eval:n {#1} " } }
+  { \@@_backend_scope:x { stroke-miterlimit=" #1 " } }
 \cs_new_protected:Npn \@@_backend_cap_butt:
   { \@@_backend_scope:n { stroke-linecap="butt" } }
 \cs_new_protected:Npn \@@_backend_cap_round:
@@ -1267,14 +1251,7 @@
     \@@_backend_scope:n
       {
        transform =
-         "
-           matrix
-             (
-               \fp_eval:n {#1} , \fp_eval:n {#2} ,
-               \fp_eval:n {#3} , \fp_eval:n {#4} ,
-               0pt , 0pt
-             )
-         "
+         " matrix ( #1 , #2 , #3 , #4 , 0pt , 0pt ) "
       }
   }
 %    \end{macrocode}
diff --git a/l3experimental/CHANGELOG.md b/l3experimental/CHANGELOG.md
index 5c3f82739..fc0de0c55 100644
--- a/l3experimental/CHANGELOG.md
+++ b/l3experimental/CHANGELOG.md
@@ -9,6 +9,7 @@ this project uses date-based 'snapshot' version identifiers.
 
 ### Changed
 - Internal color model
+- Internal performance enhancements
 
 ## [2020-06-03]
 
diff --git a/l3experimental/l3draw/l3draw-state.dtx b/l3experimental/l3draw/l3draw-state.dtx
index 2b6b6b368..2a511957e 100644
--- a/l3experimental/l3draw/l3draw-state.dtx
+++ b/l3experimental/l3draw/l3draw-state.dtx
@@ -124,7 +124,7 @@
 %   Pass through to the driver layer.
 %    \begin{macrocode}
 \cs_new_protected:Npn \draw_miterlimit:n #1
-  { \@@_backend_miterlimit:n { \fp_eval:n {#1} } }
+  { \exp_args:Nx \@@_backend_miterlimit:n { \fp_eval:n {#1} } }
 %    \end{macrocode}
 % \end{macro}
 %
diff --git a/l3experimental/l3draw/testfiles/m3draw005.ptex.tlg b/l3experimental/l3draw/testfiles/m3draw005.ptex.tlg
index 8e02314a4..3d7c5663b 100644
--- a/l3experimental/l3draw/testfiles/m3draw005.ptex.tlg
+++ b/l3experimental/l3draw/testfiles/m3draw005.ptex.tlg
@@ -67,9 +67,9 @@ TEST 2: \draw_suspend_begin:
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(285.52756+0.0)x0.0, glue set - 57.90552fil
diff --git a/l3experimental/l3draw/testfiles/m3draw005.uptex.tlg b/l3experimental/l3draw/testfiles/m3draw005.uptex.tlg
index 8e02314a4..3d7c5663b 100644
--- a/l3experimental/l3draw/testfiles/m3draw005.uptex.tlg
+++ b/l3experimental/l3draw/testfiles/m3draw005.uptex.tlg
@@ -67,9 +67,9 @@ TEST 2: \draw_suspend_begin:
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(285.52756+0.0)x0.0, glue set - 57.90552fil
diff --git a/l3experimental/l3draw/testfiles/m3draw006.ptex.tlg b/l3experimental/l3draw/testfiles/m3draw006.ptex.tlg
index 23e429540..8e8622592 100644
--- a/l3experimental/l3draw/testfiles/m3draw006.ptex.tlg
+++ b/l3experimental/l3draw/testfiles/m3draw006.ptex.tlg
@@ -34,9 +34,9 @@ TEST 1: \draw_box_use:N
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -89,9 +89,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {2} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {2} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[2 0 0 2 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -144,9 +144,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {1} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 1 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -199,9 +199,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -258,9 +258,9 @@ TEST 2: \draw_coffin_use:N
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -321,9 +321,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(3.47221+3.47223)x0.0, glue set - 11.25003fil
@@ -384,9 +384,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {2} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {2} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[2 0 0 2 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -447,9 +447,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {1} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 1 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -510,9 +510,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
diff --git a/l3experimental/l3draw/testfiles/m3draw006.uptex.tlg b/l3experimental/l3draw/testfiles/m3draw006.uptex.tlg
index 23e429540..8e8622592 100644
--- a/l3experimental/l3draw/testfiles/m3draw006.uptex.tlg
+++ b/l3experimental/l3draw/testfiles/m3draw006.uptex.tlg
@@ -34,9 +34,9 @@ TEST 1: \draw_box_use:N
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -89,9 +89,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {2} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {2} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[2 0 0 2 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -144,9 +144,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {1} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 1 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -199,9 +199,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -258,9 +258,9 @@ TEST 2: \draw_coffin_use:N
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -321,9 +321,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(3.47221+3.47223)x0.0, glue set - 11.25003fil
@@ -384,9 +384,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {2} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {2} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[2 0 0 2 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -447,9 +447,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {1} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 1 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil
@@ -510,9 +510,9 @@ l. ...  }
 ......\special{ps::save}
 ......\special{ps::currentpoint}
 ......\special{ps::currentpoint translate}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {1} 0 0]\ETC.}
-......\special{ps::[\fp_eval:n {1} \fp_eval:n {0} \fp_eval:n {0} \fp_eval:n {-1} 0 0\ETC.}
+......\special{ps::[1 0 0 -1 0 0] concat}
+......\special{ps::[1 0 0 1 0 0] concat}
+......\special{ps::[1 0 0 -1 0 0] concat}
 ......\special{ps::neg exch neg exch translate}
 ......\special{ps::[end]}
 ......\hbox(6.94444+0.0)x0.0, glue set - 22.50005fil





More information about the latex3-commits mailing list.