0027146: Create command checkplatform

[occt.git] / tests / bugs / vis / bug21091_9

diff --git a/tests/bugs/vis/bug21091_9 b/tests/bugs/vis/bug21091_9
index 3b41b1c..8eb7ddc 100755 (executable)
--- a/tests/bugs/vis/bug21091_9
+++ b/tests/bugs/vis/bug21091_9
@@ -47,10 +47,10 @@ set aFile ${imagedir}/${test_image}.pgf
 
 vexport ${aFile} PGF
 
-if { [string compare $tcl_platform(platform) "windows"] != 0 } {
-   set refsize 20438
-} else {
+if { [checkplatform -windows] } {
    set refsize 20810
+} else {
+   set refsize 20438
 }
 
 if { [file exists ${aFile}] } {