[project @ 1998-02-03 11:34:30 by simonm]

duplicate constructor test

ghc/tests/rename/should_fail/rnfail015.hs

+module ShouldFail where
+
+--!!! duplicate constructors in datatype
+-- (bug report from Alex Ferguson, c. 2.06)
+
+data Token
+     =  TokNewline
+     |  TokLiteral
+     |  TokCount
+     |  TokCheck
+     |  TokIs
+     |  TokDeref
+     |  TokFind
+     |  TokLiteral		-- Duplicated!
+     |  TokThe
+
+      deriving Show
+
+main = print TokCount
+

ghc/tests/rename/should_fail/rnfail015.stderr

+ 
+rnfail015.hs:9:
+    Conflicting definitions for `TokLiteral' in the data type declaration for Token
+
+
+Compilation had errors