0031999: Tests - request Core Profile on macOS for Ray-Tracing tests
[occt.git] / samples / tcl / vis_pbr_spheres.tcl
index 0f6904b..79dd2e5 100644 (file)
@@ -81,6 +81,9 @@ SetName D    [XFindShape     D ts]  "Smooth"
 SetName D {*}[XFindComponent D tr]  "Rough"
 SetName D    [XFindShape     D tr]  "Rough"
 
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
+
 vclear
 vinit View1 -width 768 -height 768
 vfront