[Gzz-commits] gzz/lava/test/gzz/loom SimpleView.test WheelVie...

[Benja Fallenstein]

CVSROOT:        /cvsroot/gzz
Module name:    gzz
Changes by:     Benja Fallenstein <address@hidden>      03/02/26 15:45:16

Modified files:
        lava/test/gzz/loom: SimpleView.test WheelView.test 

Log message:
        Some easy tests just copied from SimpleView.test

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gzz/gzz/lava/test/gzz/loom/SimpleView.test.diff?tr1=1.18&tr2=1.19&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/gzz/gzz/lava/test/gzz/loom/WheelView.test.diff?tr1=1.1&tr2=1.2&r1=text&r2=text

Patches:
Index: gzz/lava/test/gzz/loom/SimpleView.test
diff -u gzz/lava/test/gzz/loom/SimpleView.test:1.18 
gzz/lava/test/gzz/loom/SimpleView.test:1.19
--- gzz/lava/test/gzz/loom/SimpleView.test:1.18 Wed Feb 26 14:37:45 2003
+++ gzz/lava/test/gzz/loom/SimpleView.test      Wed Feb 26 15:45:16 2003
@@ -107,6 +107,9 @@
     # this works only if all nodes are same size... XXX
     assert (ps.x - pr.x) == (pr.x - pw.x)
 
+    # Test that SimpleView calls its NodeView
+    # with all the correct parameters.
+
     assert nodes[r] == cs_r
     assert nodes[s] == cs_s
     assert nodes[t] == cs_t
Index: gzz/lava/test/gzz/loom/WheelView.test
diff -u gzz/lava/test/gzz/loom/WheelView.test:1.1 
gzz/lava/test/gzz/loom/WheelView.test:1.2
--- gzz/lava/test/gzz/loom/WheelView.test:1.1   Wed Feb 26 15:19:22 2003
+++ gzz/lava/test/gzz/loom/WheelView.test       Wed Feb 26 15:45:16 2003
@@ -68,4 +68,18 @@
 
     assert pw.y == pr.y == ps.y
     assert pt.y < ps.y < pv.y
-    assert pt.x < ps.x > pv.x
\ No newline at end of file
+    assert pt.x < ps.x > pv.x
+
+    # Test that WheelView calls its NodeView
+    # with all the correct parameters.
+
+    assert nodes[r] == cs_r
+    assert nodes[s] == cs_s
+    assert nodes[t] == cs_t
+    assert nodes[u] == cs_u
+    assert nodes[v] == cs_v
+    assert nodes[w] == cs_w
+
+    assert dirs[r] == 0
+    assert dirs[s] == dirs[t] == dirs[u] == dirs[v] == 1
+    assert dirs[w] == -1