git.iko.soy/elk
on master help sign in
cosmetic: try to make flags more readable
1c1158aEvan Czaplicki
compiler/Build/Flags.hs+23−11
compare with master
unifiedsplit
@@ -18,29 +18,41 @@ data Flags = Flags
18 , src_dir :: [FilePath]
18 , src_dir :: [FilePath]
19 }
19 }
20 deriving (Data,Typeable,Show,Eq)
20 deriving (Data,Typeable,Show,Eq)
21−
21+
22+flags :: Flags
22flags = Flags
23flags = Flags
23 { files = def &= args &= typ "FILES"
24 { files = def &= args &= typ "FILES"
25+
24 , make = False
26 , make = False
25− &= help "automatically compile dependencies."
27+ &= help "automatically compile dependencies."
28+
26 , only_js = False
29 , only_js = False
27− &= help "Compile only to JavaScript."
30+ &= help "Compile only to JavaScript."
31+
28 , no_prelude = False
32 , no_prelude = False
29− &= help "Do not import Prelude by default, used only when compiling standard libraries."
33+ &= help "Do not import Prelude by default, used only when compiling standard libraries."
34+
30 , scripts = [] &= typFile
35 , scripts = [] &= typFile
31− &= help "Load JavaScript files in generated HTML. Files will be included in the given order."
36+ &= help "Load JavaScript files in generated HTML. Files will be included in the given order."
37+
32 , set_runtime = Nothing &= typFile
38 , set_runtime = Nothing &= typFile
33− &= help "Specify a custom location for Elm's runtime system."
39+ &= help "Specify a custom location for Elm's runtime system."
40+
34 , get_runtime = False
41 , get_runtime = False
35− &= help "Print the absolute path to the default Elm runtime."
42+ &= help "Print the absolute path to the default Elm runtime."
43+
36 , cache_dir = "cache" &= typFile
44 , cache_dir = "cache" &= typFile
37− &= help "Directory for files cached to make builds faster. Defaults to cache/ directory."
45+ &= help "Directory for files cached to make builds faster. Defaults to cache/ directory."
46+
38 , build_dir = "build" &= typFile
47 , build_dir = "build" &= typFile
39− &= help "Directory for generated HTML and JS files. Defaults to build/ directory."
48+ &= help "Directory for generated HTML and JS files. Defaults to build/ directory."
49+
40 , src_dir = ["."] &= typFile
50 , src_dir = ["."] &= typFile
41− &= help "Additional source directories besides project root. Searched when using --make"
51+ &= help "Additional source directories besides project root. Searched when using --make"
52+
42 , print_types = False
53 , print_types = False
43− &= help "Print out inferred types of top-level definitions."
54+ &= help "Print out inferred types of top-level definitions."
55+
44 } &= help "Compile Elm programs to HTML, CSS, and JavaScript."
56 } &= help "Compile Elm programs to HTML, CSS, and JavaScript."
45 &= helpArg [explicit, name "help", name "h"]
57 &= helpArg [explicit, name "help", name "h"]
46 &= versionArg [explicit, name "version", name "v", summary (show Version.elmVersion)]
58 &= versionArg [explicit, name "version", name "v", summary (show Version.elmVersion)]