==================== Parser ==================== module ShouldCompile where test2 :: -- | doc1 a -> b {-^ doc2 -} -> -- | doc 3 a test2 x y = x