Skip to content

Commit 98d0ad9

Browse files
committed
Fied minor error where greedy evaluation was assumesd. Now this is made explixcit.
1 parent cb039e5 commit 98d0ad9

File tree

1 file changed

+4
-0
lines changed

1 file changed

+4
-0
lines changed

test/runtests.jl

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -30,7 +30,11 @@ import MathLink: WExpr, WSymbol
3030
@test W2Mstr(weval(W`a^2`)) == "(a^2)"
3131
@test W2Mstr(weval(W`e+a^(b+c)`)) == "((a^(b + c)) + e)"
3232
@test W2Mstr(weval(W`a + c + v + Sin[2 + x + Cos[q]]`)) == "(a + c + v + Sin[(2 + x + Cos[q])])"
33+
set_GreedyEval(true)
3334
@test W2Mstr(W"a"+W"c"+W"v"+W"Sin"(2 +W"x" + W"Cos"(W"q"))) == "(a + c + v + Sin[(2 + x + Cos[q])])"
35+
set_GreedyEval(false)
36+
@test W2Mstr(W"a"+W"c"+W"v"+W"Sin"(2 +W"x" + W"Cos"(W"q"))) == "(((a + c) + v) + Sin[((2 + x) + Cos[q])])"
37+
3438
@test W2Mstr(W`Sqrt[x+Sin[y]+z^(3/2)]`) == "Sqrt[(x + Sin[y] + (z^(3*(2^-1))))]"
3539

3640
end

0 commit comments

Comments
 (0)