1 2 3 4 5 6 7
==================== Parser ==================== module ShouldCompile where data A = " A comment that documents the first constructor" A | B | C | D