Changeset 5343

Timestamp:

Apr 28, 2015 8:42:22 PM (9 years ago)

Author:

ldelgass

Message:

Don't alloc vectors until we checked for failure cases in VtkDataSetToXy?

File:

• trunk/gui/scripts/field.tcl (modified) (2 diffs)

trunk/gui/scripts/field.tcl

@@ -1288 +1288 @@
     }
     set numPoints [$dataset GetNumberOfPoints]
+    set dataAttrs [$dataset GetPointData]
+    if { $dataAttrs == ""} {
+        puts stderr "WARNING: No point data found"
+        return 0
+    }
+    set array [$dataAttrs GetScalars]
+    if { $array == ""} {
+        puts stderr "WARNING: No scalar point data found"
+        return 0
+    }
+    # Multi-component scalars (e.g. color scalars) are not supported
+    if { [$array GetNumberOfComponents] != 1 } {
+        return 0
+    }
+    set numTuples [$array GetNumberOfTuples]
     set xv [blt::vector create \#auto]
     for { set i 0 } { $i < $numPoints } { incr i } {
@@ -1294 +1309 @@
     }
     set yv [blt::vector create \#auto]
-    set dataAttrs [$dataset GetPointData]
-    if { $dataAttrs == ""} {
-        puts stderr "WARNING: No point data found"
-        return 0
-    }
-    set array [$dataAttrs GetScalars]
-    if { $array == ""} {
-        puts stderr "WARNING: No scalar point data found"
-        return 0
-    }
-    # Multi-component scalars (e.g. color scalars) are not supported
-    if { [$array GetNumberOfComponents] != 1 } {
-        return 0
-    }
-    set numTuples [$array GetNumberOfTuples]
     for { set i 0 } { $i < $numTuples } { incr i } {
         $yv append [$array GetComponent $i 0]