mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
20 lines
628 B
Plaintext
20 lines
628 B
Plaintext
puts "==========="
|
|
puts "OCC28428"
|
|
puts "==========="
|
|
puts ""
|
|
########################################################################
|
|
# BinMNaming_NamedShapeDriver fails if there are no nodes in NamedShape
|
|
########################################################################
|
|
|
|
pload QAcommands
|
|
|
|
NewDocument D1 BinOcaf
|
|
# Create TNaming_Builder on a label without putthing shapes
|
|
BuildNamedShape D1 0:1 P
|
|
SaveAs D1 $imagedir/bug28428_new.cbf
|
|
Close D1
|
|
# This produced a NamedShape driver failure with catching by general driver
|
|
# and output a failure message (caught by parse.rules)
|
|
Open $imagedir/bug28428_new.cbf D2
|
|
Close D2
|