Parse and wait changed

parse uses map'cps now
[rec wait = ...wait] changed to [wait = while... ]