unittest.scad
1 module assertEqualPoint(expected, actual, epsilon = 0.0001) { 2 leng_expected = len(expected); 3 leng_actual = len(actual); 4 5 assert( 6 leng_expected == leng_actual, 7 str("expected length: ", leng_expected, ", but: ", leng_actual) 8 ); 9 10 assert( 11 norm(expected - actual) <= epsilon, 12 str("expected: ", expected, ", but: ", actual) 13 ); 14 } 15 16 module assertEqualPoints(expected, actual, epsilon = 0.0001) { 17 leng_expected = len(expected); 18 leng_actual = len(actual); 19 20 assert( 21 leng_expected == leng_actual, 22 str("expected length: ", leng_expected, ", but: ", leng_actual) 23 ); 24 25 for(i = [0:len(actual) - 1]) { 26 assertEqualPoint(expected[i], actual[i], epsilon); 27 } 28 } 29 30 module assertEqualNum(expected, actual, epsilon = 0.0001) { 31 assert( 32 abs(expected - actual) <= epsilon, 33 str("expected: ", expected, ", but: ", actual) 34 ); 35 }