]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/math/rectangles/rectangles-tests.factor
Fix conflict
[factor.git] / basis / math / rectangles / rectangles-tests.factor
index 332a3ef52dd3b5bda26e4130f16b9d4b0a305478..ca722859d261f6616faabe77ea2f32bcc9558690 100644 (file)
@@ -33,3 +33,10 @@ IN: math.rectangles.tests
     contains-rect?
 ] unit-test
 
+[ T{ rect f { 10 20 } { 20 20 } } ] [
+    {
+        { 20 20 }
+        { 10 40 }
+        { 30 30 }
+    } rect-containing
+] unit-test
\ No newline at end of file