1 2 3 4 5 6
==================== Parser ==================== module ShouldCompile where data A = <document comment> A | B | C | D