tests/perf/fclasses/bug24947

   1 # Test performance of dynamic loading / unloading of large OCCT library
   2
   3 set libname TKSTEP
   4
   5 switch -nocase $env(os_type) {
   6   windows {set libname    ${libname}.dll}
   7   linux   {set libname lib${libname}.so}
   8   macos   {set libname lib${libname}.dylib}
   9 }
  10
  11 for {set i 0} {$i < 1000} {incr i} {
  12   puts "Iteration $i"
  13   dtryload $libname
  14 }