on master help sign in
Fix the type of Either, addressing copy-paste error.
6d8a50devancz
elm/src/Types/Types.hs+1−1
@@ -61,7 +61,7 @@ listOf t = ADT "List" [t]
61signalOf t = ADT "Signal" [t]
61signalOf t = ADT "Signal" [t]
62tupleOf ts = ADT ("Tuple" ++ show (length ts)) ts
62tupleOf ts = ADT ("Tuple" ++ show (length ts)) ts
63maybeOf t = ADT "Maybe" [t]
63maybeOf t = ADT "Maybe" [t]
64−eitherOf a b = ADT "Maybe" [a,b]
64+eitherOf a b = ADT "Either" [a,b]
65pairOf t = tupleOf [t,t]
65pairOf t = tupleOf [t,t]
66point = pairOf int
66point = pairOf int
67appendable t = Super (Set.fromList [ string, text, listOf t ])
67appendable t = Super (Set.fromList [ string, text, listOf t ])