MPE/iX - CI Programming for Stability

July 18, 2008 HP World '01 85
Assume variable X = "ab c;de,,fg;hij=k lmn,op=qr and 500 iterations for timing tests
Parse out all tokens in a string variable:
setvar j 0
while j<= len(x) do
setvar tok word(x, , , j, j+1)
endwhile 2136 millisecs
OR
setvar j 0
while setvar(j, j+1) <= wordcnt(x) do
setvar tok word(x, , j)
endwhile 2298 msecs
OR
setvar j 0 # fails on null token
while setvar(tok, word(x, , setvar(j, j+1))) <= “” do
endwhile 1686 msecs
String manipulations