我有一个类型如下:
data Stitch mark = OverStitch mark (Stitch mark) | TokenStitch | TerminalStitch
TerminalStitch 只能有一个值。所以我希望我可以在模块的顶层定义这个值,如下所示:
terminalStitch :: Stitch
terminalStitch = TerminalStitch -- <--- value = constructor()
但这似乎不起作用。我应该怎么做?