This looks like the bug:
noSpace q = q >>= maybe (return Nothing)
-(\c->case removeSpaces c of
- "" -> noSpace q
- ":{" -> multiLineCmd q
- c-> return (Just
Hmm so I think I validated a tree without my patches to make sure I
wasn't the offender.
I'll check again when I'm back at work on the 4th.
On 29 December 2011 21:28, Simon Peyton-Jones wrote:
> David
>
> Any comments? The patch to interactiveUI was yours I think. I have not
> binary-chopped
David
Any comments? The patch to interactiveUI was yours I think. I have not
binary-chopped to be sure this is the offending commit but it looks plausible.
And the test is failing consistently
Simon
commit a20cdb930a6f9e980521e0767867217ed96033f4
Author: David Terei
Date: Wed Dec 21 14:5