33 include <primitives.scad>;
93 ? (pf?
true : str(
"passed: '", d,
"'"))
96 "FAILED: '", d,
"'. Got '", cv,
97 "'. Expected to equal '", ev,
"'"
104 ? (pf?
true : str(
"passed: '", d,
"'"))
107 "FAILED: '", d,
"'. Got '", cv,
108 "'. Expected to not equal '", ev,
"'"
112 : ( (t ==
true) || (t ==
"true") ) ?
validate(d, cv,
"equals",
true, p, pf)
113 : ( (t ==
false) || (t ==
"false") ) ?
validate(d, cv,
"equals",
false, p, pf)
117 ? (pf?
true : str(
"passed: '", d,
"'"))
120 "FAILED: '", d,
"'. Got '", cv,
121 "'. Expected to almost equal '", ev,
"'",
126 : (pf?
false : str(
"FAILED: '", d,
"'. Unknown test '", t,
"'"));
function almost_equal(v1, v2, p=4)
Test if all elements of two values are approximately equal.
function validate(d, cv, t, ev, p=4, pf=false)
Compare a computed test value with an known good result.