1 USING: tools.test math.rectangles prettyprint io.streams.string
3 IN: math.rectangles.tests
5 { RECT: { 10 10 } { 20 20 } }
7 RECT: { 10 10 } { 50 50 }
8 RECT: { -10 -10 } { 40 40 }
12 { RECT: { 200 200 } { 0 0 } }
14 RECT: { 100 100 } { 50 50 }
15 RECT: { 200 200 } { 40 40 }
20 RECT: { 100 100 } { 50 50 }
21 RECT: { 200 200 } { 40 40 }
26 RECT: { 100 100 } { 50 50 }
27 RECT: { 120 120 } { 40 40 }
32 RECT: { 1000 100 } { 50 50 }
33 RECT: { 120 120 } { 40 40 }
37 { RECT: { 10 20 } { 20 20 } } [
45 ! Prettyprint for RECT: didn't do nesting check properly
46 { } [ [ RECT: f f dup >>dim . ] with-string-writer drop ] unit-test