0031999: Tests - request Core Profile on macOS for Ray-Tracing tests

[occt.git] / samples / tcl / pathtrace_ball.tcl

diff --git a/samples/tcl/pathtrace_ball.tcl b/samples/tcl/pathtrace_ball.tcl
index 911c0eb..9e9f79e 100644 (file)
--- a/samples/tcl/pathtrace_ball.tcl
+++ b/samples/tcl/pathtrace_ball.tcl
@@ -7,6 +7,8 @@
 set aBallPath [locate_data_file occ/Ball.brep]
 
 pload MODELING VISUALIZATION
+# Ray-Tracing doesn't work with Compatible Profile on macOS
+if { $::tcl_platform(os) == "Darwin" } { vcaps -core }
 
 # Setup 3D viewer
 vclear