tests/bugs/xde/bug22898

   1 # Test for issue #22898 and other functionality that can be affected by locale.
   2 # Just run multiple conversions of the shape to and from diferent formats and
   3 # check that the result is good shape with expected area
   4
   5 set anOS $tcl_platform(os)
   6 if { ${anOS} == "Linux" } {
   7   dlocale LC_ALL fr_FR
   8 } else {
   9   dlocale LC_ALL French
  10 }
  11
  12 pload MODELING
  13 pload XSTEP
  14
  15 # original shape
  16 restore [locate_data_file hammer.brep] hammer
  17 checkshape hammer
  18 tolerance hammer
  19 checkarea hammer 3.978e8 1e6 0.001
  20
  21 # BREP
  22 save hammer $imagedir/hammer.brep
  23 restore $imagedir/hammer.brep brep
  24 checkshape brep
  25 tolerance brep
  26 checkarea brep 3.978e8 1e6 0.001
  27
  28 # IGES
  29 brepiges hammer $imagedir/hammer.igs
  30 igesbrep $imagedir/hammer.igs iges *
  31 checkshape iges
  32 tolerance iges
  33 checkarea iges 3.978e8 1e6 0.001
  34
  35 # STEP
  36 stepwrite a hammer $imagedir/hammer.stp
  37 stepread $imagedir/hammer.stp step *
  38 checkshape step_1
  39 tolerance step_1
  40 checkarea step_1 3.978e8 1e6 0.001
  41
  42 # STL
  43 writestl hammer $imagedir/hammer.stl
  44 readstl stl $imagedir/hammer.stl
  45 checkshape stl
  46 tolerance stl
  47 checkarea stl 3.978e8 1e6 0.001
  48
  49 # VRML: reading does not work regardless of locale...
  50 writevrml hammer $imagedir/hammer.vrml
  51 #loadvrml vrml $imagedir/hammer.vrml
  52 #checkshape vrml
  53 #tolerance vrml