0029987: Request for translation of French comments in the code
[occt.git] / tests / bugs / step / bug26342
1 puts "============"
2 puts "OCC26342"
3 puts "============"
4 puts ""
5
6 #######################################################################
7 # No materials are read from STEP
8 #######################################################################
9
10 pload DCAF
11
12 ReadStep D [locate_data_file OCC23251-dm1-oc-214.stp]
13
14 set dump_info [ XDumpDF D ]
15
16 set XCAFDoc_Material_ID "efd212f8-6dfd-11d4-b9c8-0060b0ee281b"
17
18 if { [regexp ${XCAFDoc_Material_ID} ${dump_info}] == 1  } {
19     puts "OK: materials are read from STEP"
20 } else {
21     puts "Error : No materials are read from STEP"
22 }