summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pgfplots/test/pgfplots.assert.code.tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2013-10-03 22:23:41 +0000
committerKarl Berry <karl@freefriends.org>2013-10-03 22:23:41 +0000
commit17c26f8a0e90231c7f95311cd8270fcd345002e4 (patch)
treeb0378783b5421fc11bc25ca967c349d4938fd923 /Master/texmf-dist/tex/generic/pgfplots/test/pgfplots.assert.code.tex
parent9334469d545fb017cccf5b7f4075005dc17a4949 (diff)
pgfplots (3oct13)
git-svn-id: svn://tug.org/texlive/trunk@31822 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/pgfplots/test/pgfplots.assert.code.tex')
-rw-r--r--Master/texmf-dist/tex/generic/pgfplots/test/pgfplots.assert.code.tex50
1 files changed, 50 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/pgfplots/test/pgfplots.assert.code.tex b/Master/texmf-dist/tex/generic/pgfplots/test/pgfplots.assert.code.tex
new file mode 100644
index 00000000000..4f913922266
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/pgfplots/test/pgfplots.assert.code.tex
@@ -0,0 +1,50 @@
+
+% Token-wise equals; will expand arguments with \edef
+% #1: expected
+% #2: actual
+% #3: message
+\def\pgfplotsassertequalstok#1#2#3{%
+ \edef\pgfplots@assert@a{#1}%
+ \edef\pgfplots@assert@b{#2}%
+ \pgfplotscommandtostring\pgfplots@assert@a\pgfplots@assert@a
+ \pgfplotscommandtostring\pgfplots@assert@b\pgfplots@assert@b
+ \ifx\pgfplots@assert@a\pgfplots@assert@b
+ \else
+ \pgfplotsassertfail{#3 ^^Jexpected '#1'^^J but was '#2'}%
+ \fi
+}%
+
+% Token-wise equals of two MACROS; no expansion
+% #1: expected
+% #2: actual
+% #3: message
+\def\pgfplotsassertequalstoknoexpand#1#2#3{%
+ \ifx#1#2%
+ \else
+ \pgfplotsassertfail{#3 expected '\meaning#1' but was '\meaning#2'}%
+ \fi
+}%
+
+\def\pgfplotsassertfail#1{%
+ \pgfplots@error{Assertion failed: #1}%
+}%
+
+% Float-equals
+% #1: expected
+% #2: actual
+% #3: message
+\def\pgfplotsassertequalsfloat#1#2#3{%
+ \edef\pgfplots@assert@a{#1}%
+ \edef\pgfplots@assert@b{#2}%
+ %
+ \pgfmathfloatparsenumber{\pgfplots@assert@a}%
+ \let\pgfplots@assert@a\pgfmathresult
+ %
+ \pgfmathfloatparsenumber{\pgfplots@assert@b}%
+ \let\pgfplots@assert@b\pgfmathresult
+ %
+ \pgfmathfloatifapproxequalrel{\pgfplots@assert@a}{\pgfplots@assert@b}{%
+ }{%
+ \pgfplotsassertfail{#3 ^^Jexpected '#1'^^J but was '#2'}%
+ }%
+}%