git.iko.soy/elk
on master help sign in
The --warn flag is not an option for code generation
e913cf0Evan Czaplicki
builder/src/Generate/Output.hs+2−3
compare with master
unifiedsplit
@@ -41,8 +41,7 @@ import Terminal.Args (Parser(..), suggestFiles)
41
41
42data Options =
42data Options =
43 Options
43 Options
44− { _warn :: Bool
45− , _mode :: Obj.Mode
44+ { _mode :: Obj.Mode
46 , _target :: Obj.Target
45 , _target :: Obj.Target
47 , _output :: Maybe Output
46 , _output :: Maybe Output
48 }
47 }
@@ -63,7 +62,7 @@ generate options summary graph@(Crawl.Graph args _ _ _ _) =
63
62
64
63
65generateMonolith :: Options -> Summary.Summary -> Crawl.Result -> [Module.Raw] -> Task.Task ()
64generateMonolith :: Options -> Summary.Summary -> Crawl.Result -> [Module.Raw] -> Task.Task ()
66−generateMonolith (Options _ debug target output_) summary@(Summary.Summary _ project _ ifaces _) graph names =
65+generateMonolith (Options debug target output_) summary@(Summary.Summary _ project _ ifaces _) graph names =
67 do
66 do
68 objectGraph <- organize summary graph
67 objectGraph <- organize summary graph
69 let pkg = Project.getName project
68 let pkg = Project.getName project