git.iko.soy/elk
on master help sign in
Split Magnitude out into its own module
ed4528fEvan Czaplicki
compiler/src/Elm/Magnitude.hsnew file+24
compare with master
unifiedsplit
@@ -0,0 +1,24 @@
1+module Elm.Magnitude
2+ ( Magnitude(..)
3+ , toChars
4+ )
5+ where
6+
7+
8+
9+-- MAGNITUDE
10+
11+
12+data Magnitude
13+ = PATCH
14+ | MINOR
15+ | MAJOR
16+ deriving (Eq, Ord)
17+
18+
19+toChars :: Magnitude -> String
20+toChars magnitude =
21+ case magnitude of
22+ PATCH -> "PATCH"
23+ MINOR -> "MINOR"
24+ MAJOR -> "MAJOR"