| Code Block |
|---|
|
objarray set <obj> {<value_1> ... <value_n>}|<index> <value> | -binary <data> |
Set the value of the item $index (from 0 to n-1) with the value $value, or all values from a list {value_1 ... value_n}. To set some index the array space must be allocated previously with a size greater of the index.
...
| Code Block |
|---|
|
set obj [objarray new intarray 3 0]
# -> 0 0 0
objarray set $obj {6 3 8}
# -> 6 3 8
# in floating point arrays, 'nan' values are also allowed
set oa [ objarray new doublearray 4 nan]
# --> NaN(7ffffffffffff) NaN(7ffffffffffff) NaN(7ffffffffffff) NaN(7ffffffffffff)
objarray set $oa 0 0.123
# --> 0.123 NaN(7ffffffffffff) NaN(7ffffffffffff) NaN(7ffffffffffff)
objarray set $oa 0 nan
# --> NaN(7ffffffffffff) NaN(7ffffffffffff) NaN(7ffffffffffff) NaN(7ffffffffffff)
set oa [ objarray new_from_to intarray 1 10]
# --> 1 2 3 4 5 6 7 8 9 10
set obj [objarray new intarray -values {5 6 7 8}]
# --> 5 6 7 8
objarray set $oa -binary [objarray get_binary $obj]]
# --> 5 6 7 8
set oa [ objarray new_from_to doublearray 1 10]
# --> 1.0 2.0 3.0 4.0 5.0 6.0 7.0 8.0 9.0
objarray set $oa -binary [objarray get_binary $obj]]
# --> 1.27319747483e-313 1.6975966331e-313 |