mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-05-01 10:26:12 +03:00
DRAW commands stepwrite and brepiges modified to never ask for interactive input of file name or write mode; the behavior is completely defined by input arguments. String buffers causing access violation due to overflow are eliminated. Test case bugs xde bug23561 added for this issue; TODO 23651 in related test cases removed. Compiler warning (unrelated) is fixed in QABugs_11.cxx
31 lines
596 B
Plaintext
Executable File
31 lines
596 B
Plaintext
Executable File
set os $env(os_type)
|
|
|
|
puts "================"
|
|
puts "OCC51"
|
|
puts "================"
|
|
puts ""
|
|
|
|
puts " write STEP and IGES file "
|
|
box b 12 34 56
|
|
|
|
######################################################################
|
|
catch {exec rm ${imagedir}/box.step}
|
|
catch {exec rm ${imagedir}/box.igs}
|
|
|
|
stepwrite a b ${imagedir}/box.step
|
|
|
|
brepiges b ${imagedir}/box.igs
|
|
####################################################
|
|
dall
|
|
puts " Read STEP file "
|
|
stepread ${imagedir}/box.step a *
|
|
|
|
puts " Read IGES file "
|
|
igesbrep ${imagedir}/box.igs b *
|
|
|
|
compound a_1 b_1 result
|
|
puts [checkshape result]
|
|
|
|
set 2dviewer 0
|
|
|