Revision: 70085
          http://sourceforge.net/p/brlcad/code/70085
Author:   n_reed
Date:     2017-08-17 12:13:32 +0000 (Thu, 17 Aug 2017)
Log Message:
-----------
add another simple overlap resolution test case

Modified Paths:
--------------
    brlcad/trunk/src/tclscripts/checker/test_checker.tcl

Modified: brlcad/trunk/src/tclscripts/checker/test_checker.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/checker/test_checker.tcl        2017-08-16 
23:50:57 UTC (rev 70084)
+++ brlcad/trunk/src/tclscripts/checker/test_checker.tcl        2017-08-17 
12:13:32 UTC (rev 70085)
@@ -457,4 +457,59 @@
 check_mged_result "subtract first solid in recipe with -F" \
   [subSelection "-F" 1 subLeft] $testdb_sub_r1_F
 
+# Random 3
+puts "== Subtraction Behavior, DB 3 =="
+write_db $testdb "
+  $make_solids
+  comb c1 u a.s u d.s
+  comb c2 u c1
+  r r1 u c1
+  r r2 u e.s u b.s
+  comb all u r1 u r2
+"
+file copy -force $testdb $testdb_bak
+
+write_file $olfile "/all/r2 /all/r1 212.1077"
+
+write_db $testdb_sub_r1_F "
+  $make_solids
+  comb c1 u a.s u d.s
+  comb c2 u c1
+  r r1 u c1
+  r r2 u e.s - a.s u b.s
+  comb all u r1 u r2
+"
+
+write_db $testdb_sub_r2_F "
+  $make_solids
+  comb c1 u a.s - e.s u d.s
+  comb c2 u c1
+  r r1 u c1
+  r r2 u e.s u b.s
+  comb all u r1 u r2
+"
+
+# shouldn't be able to subtract either side without -F
+check_mged_result "dont subtract recipe without -F" \
+  [subSelection "" 1 subLeft] $testdb [set expect_fail true]
+
+file copy -force $testdb_bak $testdb
+
+check_mged_result "dont subtract recipe without -F" \
+  [subSelection "" 1 subRight] $testdb [set expect_fail true]
+
+file copy -force $testdb_bak $testdb
+
+# should be able to subtract either side with -F
+check_mged_result "subtract first solid with -F" \
+  [subSelection "-F" 1 subLeft] $testdb_sub_r1_F
+
+file copy -force $testdb_bak $testdb
+
+check_mged_result "subtract first solid with -F" \
+  [subSelection "-F" 1 subRight] $testdb_sub_r2_F
+
+file copy -force $testdb_bak $testdb
+
+# cleanup
 file delete -force $testdir

This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.


------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
BRL-CAD Source Commits mailing list
brlcad-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/brlcad-commits

Reply via email to