// This will store the comma separated list
global [val indices 0]
// Set to expected size of indices (10)
global [val list_size [int 10]]
loop [val index [int 1]] {
global [val indices [concat $indices "," $index]] -override
if [$index | lt $list_size] {
recur [$index | plus 1]
}
}
$indices | split -sep "," | foreach [val item] {
with [get-editor "test.c" | get-text-viewer] {
try {
get-property [concat "markers['" $item "'][0].Type"]
| equals "text-to-verify" | verify-true
}
-catch {
// You will need to fine-tune this catch to not allow every sort of problems
}
}
}