id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc
64	Parsing problems with when/irrefutable patterns	benl		"This code fails to parse:

{{{
fun ()
 = do	when (True)
 	 do	Just x	= Just ""wibble""
	 	putStr x
}}}

{{{
ddc: ""./test/Broken-skip/ParseIrrefutable/Test.ds"" (line 5, column 5):
unexpected ()
}}}

Test is {{{T64-ParseWhenIrref}}}"	defect	closed	blocker	0.1.3	Source Parser	0.1.2	fixed