0031851: Data Exchange, STEP - enable Unicode symbols in STEP export
[occt.git] / tests / bugs / xde / bug31851
1 puts "# =============================================================================="
2 puts "# 0031851: Data Exchange, STEP - enable Unicode symbols in STEP export"
3 puts "# =============================================================================="
4
5 pload OCAF XDE MODELING
6
7 puts "# Generate XDE document with a solid having name encoded in Japanese"
8 set name "\u30DC\u30C3\u30AF\u30B9" ;# "box"
9 box box 10 10 10
10 NewDocument D XCAF
11 SetName D [XAddShape D box] $name
12
13 WriteStep D $imagedir/${casename}.stp
14 ReadStep T $imagedir/${casename}.stp
15
16 set result [GetName T 0:1:1:1]
17 if { $result != $name } {
18    puts "Error: name has been lost on conversion"
19 }