moving trunk for module inkscape

(bzr r1)

1 files changed, 107 insertions, 0 deletions

diff --git a/src/libnr/nr-point-fns-test.cpp b/src/libnr/nr-point-fns-test.cpp
new file mode 100644
index 000000000..11181436b
--- /dev/null
+++ b/src/libnr/nr-point-fns-test.cpp
@@ -0,0 +1,107 @@
+#include <cassert>
+#include <cmath>
+#include <glib/gmacros.h>
+#include <stdlib.h>
+
+#include "utest/utest.h"
+#include "libnr/nr-point-fns.h"
+#include "isnan.h"
+
+using NR::Point;
+
+int main(int argc, char *argv[])
+{
+    utest_start("nr-point-fns");
+
+    Point const p3n4(3.0, -4.0);
+    Point const p0(0.0, 0.0);
+    double const small = pow(2.0, -1070);
+    double const inf = 1e400;
+    double const nan = inf - inf;
+
+    Point const small_left(-small, 0.0);
+    Point const small_n3_4(-3.0 * small, 4.0 * small);
+    Point const part_nan(3., nan);
+    Point const inf_left(-inf, 5.0);
+
+    assert(isNaN(nan));
+    assert(!isNaN(small));
+
+    UTEST_TEST("L1") {
+        UTEST_ASSERT( NR::L1(p0) == 0.0 );
+        UTEST_ASSERT( NR::L1(p3n4) == 7.0 );
+        UTEST_ASSERT( NR::L1(small_left) == small );
+        UTEST_ASSERT( NR::L1(inf_left) == inf );
+        UTEST_ASSERT( NR::L1(small_n3_4) == 7.0 * small );
+        UTEST_ASSERT(isNaN(NR::L1(part_nan)));
+    }
+
+    UTEST_TEST("L2") {
+        UTEST_ASSERT( NR::L2(p0) == 0.0 );
+        UTEST_ASSERT( NR::L2(p3n4) == 5.0 );
+        UTEST_ASSERT( NR::L2(small_left) == small );
+        UTEST_ASSERT( NR::L2(inf_left) == inf );
+        UTEST_ASSERT( NR::L2(small_n3_4) == 5.0 * small );
+        UTEST_ASSERT(isNaN(NR::L2(part_nan)));
+    }
+
+    UTEST_TEST("LInfty") {
+        UTEST_ASSERT( NR::LInfty(p0) == 0.0 );
+        UTEST_ASSERT( NR::LInfty(p3n4) == 4.0 );
+        UTEST_ASSERT( NR::LInfty(small_left) == small );
+        UTEST_ASSERT( NR::LInfty(inf_left) == inf );
+        UTEST_ASSERT( NR::LInfty(small_n3_4) == 4.0 * small );
+        UTEST_ASSERT(isNaN(NR::LInfty(part_nan)));
+    }
+
+    UTEST_TEST("is_zero") {
+        UTEST_ASSERT(NR::is_zero(p0));
+        UTEST_ASSERT(!NR::is_zero(p3n4));
+        UTEST_ASSERT(!NR::is_zero(small_left));
+        UTEST_ASSERT(!NR::is_zero(inf_left));
+        UTEST_ASSERT(!NR::is_zero(small_n3_4));
+        UTEST_ASSERT(!NR::is_zero(part_nan));
+    }
+
+    UTEST_TEST("atan2") {
+        UTEST_ASSERT( NR::atan2(p3n4) == atan2(-4.0, 3.0) );
+        UTEST_ASSERT( NR::atan2(small_left) == atan2(0.0, -1.0) );
+        UTEST_ASSERT( NR::atan2(small_n3_4) == atan2(4.0, -3.0) );
+    }
+
+    UTEST_TEST("unit_vector") {
+        UTEST_ASSERT( NR::unit_vector(p3n4) == Point(.6, -0.8) );
+        UTEST_ASSERT( NR::unit_vector(small_left) == Point(-1.0, 0.0) );
+        UTEST_ASSERT( NR::unit_vector(small_n3_4) == Point(-.6, 0.8) );
+    }
+
+    UTEST_TEST("is_unit_vector") {
+        UTEST_ASSERT(!NR::is_unit_vector(p3n4));
+        UTEST_ASSERT(!NR::is_unit_vector(small_left));
+        UTEST_ASSERT(!NR::is_unit_vector(small_n3_4));
+        UTEST_ASSERT(!NR::is_unit_vector(part_nan));
+        UTEST_ASSERT(!NR::is_unit_vector(inf_left));
+        UTEST_ASSERT(!NR::is_unit_vector(Point(.5, 0.5)));
+        UTEST_ASSERT(NR::is_unit_vector(Point(.6, -0.8)));
+        UTEST_ASSERT(NR::is_unit_vector(Point(-.6, 0.8)));
+        UTEST_ASSERT(NR::is_unit_vector(Point(-1.0, 0.0)));
+        UTEST_ASSERT(NR::is_unit_vector(Point(1.0, 0.0)));
+        UTEST_ASSERT(NR::is_unit_vector(Point(0.0, -1.0)));
+        UTEST_ASSERT(NR::is_unit_vector(Point(0.0, 1.0)));
+    }
+
+    return ( utest_end()
+             ? EXIT_SUCCESS
+             : EXIT_FAILURE );
+}
+
+/*
+  Local Variables:
+  mode:c++
+  c-file-style:"stroustrup"
+  c-file-offsets:((innamespace . 0)(inline-open . 0)(case-label . +))
+  indent-tabs-mode:nil
+  fill-column:99
+  End:
+*/
+// vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:encoding=utf-8:textwidth=99 :