blob: 5cf2d9b034b7ba98493dfe36d8854a61c018f66b (
plain)
1
2
3
4
5
6
7
8
9
10
|
==================== Parser ====================
module ShouldCompile where
data R a
= R {field1 :: a,
field2 :: a comment for field2,
field3 :: a comment for field3,
field4 :: a comment for field4 }
|