mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
Added new condition for first indicated element at Draw_ProgressIndicator::Show(), because it’s more logical that at start progress starts at 0 Changed usage of Next() to Next(step) for increment progress to IND_THRESHOLD in RWStl::writeASCII() and RWStl::writeBinary() Changed condition for continuation of writing and add interrupt to this function Added possibility to use Progress indicator in writestl Changed paremeter in constructor Message_ProgressSentry aPS() IND_THRESHOLD to 1 Changed test
30 lines
994 B
Plaintext
30 lines
994 B
Plaintext
puts "# ============"
|
|
puts "# 0031092: Foundation Classes - incorrect last output value for Infinite progress indicator"
|
|
puts "# ============"
|
|
puts ""
|
|
puts "# Test output of progress indicator in text mode (infinite scale)"
|
|
|
|
pload QAcommands
|
|
set out [OCC28478 3 2 -inf]
|
|
|
|
set expected {
|
|
{Progress: 0% Outer: 0 / 3}
|
|
{Progress: 11% Outer: 1 / 3 Inner: 1}
|
|
{Progress: 17% Outer: 1 / 3 Inner: 2}
|
|
{Progress: 20% Outer: 1 / 3 Inner: 3}
|
|
{Progress: 33% Outer: 1 / 3 Inner: finished}
|
|
{Progress: 44% Outer: 2 / 3 Inner: 1}
|
|
{Progress: 50% Outer: 2 / 3 Inner: 2}
|
|
{Progress: 53% Outer: 2 / 3 Inner: 3}
|
|
{Progress: 67% Outer: 2 / 3 Inner: finished}
|
|
{Progress: 78% Outer: 3 / 3 Inner: 1}
|
|
{Progress: 83% Outer: 3 / 3 Inner: 2}
|
|
{Progress: 87% Outer: 3 / 3 Inner: 3}
|
|
{Progress: 100% Outer: 3 / 3 Inner: finished}
|
|
}
|
|
|
|
if { [string compare [string trim $out] [join $expected "\n"]] } {
|
|
puts "Error: output (see above) does not match expected one:"
|
|
puts "[join $expected "\n"]"
|
|
puts ""
|
|
} |