tests/bugs/caf/bug738_1

   1 puts "========"
   2 puts "OCC738"
   3 puts "========"
   4 puts ""
   5 ###################################
   6 ## The GUIDs in XCAFDoc have incorrect format.
   7 ###################################
   8
   9 pload QAcommands
  10
  11 if [catch { OCC738_Assembly }] then {
  12   puts "Faulty OCC738"
  13 } else {
  14   puts "OCC738 OK"
  15 }
  16
  17