OpenEuphoria

Re: ex.exe hangs in a while loop

• Posted by olddog <halletts at sasktel.net> Jul 12, 2006
• 496 views

Oops! Punched a wrong button half way thorugh my post:

My 2.5 interpreter hangs (even the trace() debugger hangs) with this code:

incude get.e
procedure main()
  integer crsr, price
  sequence text, t
  text = "/GRVY $.75 /GRVY $.75"
  price = 0
  crsr = find('$', text)
  while crsr do
    t = value(text[crsr+1..$])
    if t[1] = GET_SUCCESS then
      price += t[2]*100
    end if
    crsr = find('$', text[crsr+1..$])
  end while
end procedure

If text only equals "/GRVY $.75" then it works fine, but as it is above
it hangs (the debug trace locks up on the end while statement).

Workarounds, anyone?

BTW, I am enjoying using this interpreter on an old DOS box!