tests/bugs/fclasses/bug30775

   1 puts "================"
   2 puts "0030775: OSD::SetSignal() within OSD_ThreadPool should not override global handlers"
   3 puts "================"
   4 puts ""
   5
   6 pload QAcommands
   7
   8 dsetsignal set
   9
  10 set IsDone [catch {set aResult [OCC30775]} result]
  11
  12 if { ${IsDone} != 0 } {
  13   puts "result = ${result}"
  14   puts "Error: command raised exception"
  15 } else {
  16   if { [string first "NbRaised: 100" $aResult] != -1 } {
  17     puts "OK test case"
  18   } else {
  19     puts "Error: expected to have 100 raised exceptions"
  20   }
  21 }
  22
  23 # restore defaults
  24 dsetsignal