build checks.x86_64-linux.mutation-opt-env-conf
1496.74 s
[opt-env-conf-test] @@ -370,7 +370,7 @@
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test] . go 11 p2
1496.74 s
[opt-env-conf-test] ParserSetting mLoc p ->
1496.74 s
[opt-env-conf-test] - showParen (d > 10) $
1496.74 s
[opt-env-conf-test] + showParen True $
1496.74 s
[opt-env-conf-test] showString "Setting "
1496.74 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test]
1496.74 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:373:20-26
1496.74 s
[opt-env-conf-test] @@ -370,7 +370,7 @@
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test] . go 11 p2
1496.74 s
[opt-env-conf-test] ParserSetting mLoc p ->
1496.74 s
[opt-env-conf-test] - showParen (d > 10) $
1496.74 s
[opt-env-conf-test] + showParen (True) $
1496.74 s
[opt-env-conf-test] showString "Setting "
1496.74 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test]
1496.74 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:373:24-26
1496.74 s
[opt-env-conf-test] @@ -370,7 +370,7 @@
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test] . go 11 p2
1496.74 s
[opt-env-conf-test] ParserSetting mLoc p ->
1496.74 s
[opt-env-conf-test] - showParen (d > 10) $
1496.74 s
[opt-env-conf-test] + showParen (d > -10) $
1496.74 s
[opt-env-conf-test] showString "Setting "
1496.74 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test]
1496.74 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:373:24-26
1496.74 s
[opt-env-conf-test] @@ -370,7 +370,7 @@
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test] . go 11 p2
1496.74 s
[opt-env-conf-test] ParserSetting mLoc p ->
1496.74 s
[opt-env-conf-test] - showParen (d > 10) $
1496.74 s
[opt-env-conf-test] + showParen (d > 1) $
1496.74 s
[opt-env-conf-test] showString "Setting "
1496.74 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test]
1496.74 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:373:24-26
1496.74 s
[opt-env-conf-test] @@ -370,7 +370,7 @@
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test] . go 11 p2
1496.74 s
[opt-env-conf-test] ParserSetting mLoc p ->
1496.74 s
[opt-env-conf-test] - showParen (d > 10) $
1496.74 s
[opt-env-conf-test] + showParen (d > 0) $
1496.74 s
[opt-env-conf-test] showString "Setting "
1496.74 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.74 s
[opt-env-conf-test] . showString " "
1496.74 s
[opt-env-conf-test]
1496.74 s
[opt-env-conf-test] Negate at src/OptEnvConf/Parser.hs:365:19-27
1496.74 s
[opt-env-conf-test] @@ -362,7 +362,7 @@
1496.74 s
[opt-env-conf-test] showCommandABit
1496.74 s
[opt-env-conf-test] cs
1496.74 s
[opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
1496.74 s
[opt-env-conf-test] - showParen (d > 10) $
1496.74 s
[opt-env-conf-test] + showParen not (d > 10) $
1496.74 s
[opt-env-conf-test] showString "WithConfig _ "
1496.74 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.74 s
[opt-env-conf-test] . showString " "
1496.75 s
[opt-env-conf-test]
1496.75 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:19-27
1496.75 s
[opt-env-conf-test] @@ -362,7 +362,7 @@
1496.75 s
[opt-env-conf-test] showCommandABit
1496.75 s
[opt-env-conf-test] cs
1496.75 s
[opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
1496.75 s
[opt-env-conf-test] - showParen (d > 10) $
1496.75 s
[opt-env-conf-test] + showParen False $
1496.75 s
[opt-env-conf-test] showString "WithConfig _ "
1496.75 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.75 s
[opt-env-conf-test] . showString " "
1496.75 s
[opt-env-conf-test]
1496.75 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:19-27
1496.75 s
[opt-env-conf-test] @@ -362,7 +362,7 @@
1496.75 s
[opt-env-conf-test] showCommandABit
1496.75 s
[opt-env-conf-test] cs
1496.75 s
[opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
1496.75 s
[opt-env-conf-test] - showParen (d > 10) $
1496.75 s
[opt-env-conf-test] + showParen True $
1496.75 s
[opt-env-conf-test] showString "WithConfig _ "
1496.75 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.75 s
[opt-env-conf-test] . showString " "
1496.75 s
[opt-env-conf-test]
1496.75 s
[opt-env-conf-test] Negate at src/OptEnvConf/Parser.hs:365:20-26
1496.75 s
[opt-env-conf-test] @@ -362,7 +362,7 @@
1496.75 s
[opt-env-conf-test] showCommandABit
1496.75 s
[opt-env-conf-test] cs
1496.75 s
[opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
1496.75 s
[opt-env-conf-test] - showParen (d > 10) $
1496.75 s
[opt-env-conf-test] + showParen (not d > 10) $
1496.75 s
[opt-env-conf-test] showString "WithConfig _ "
1496.75 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.75 s
[opt-env-conf-test] . showString " "
1496.75 s
[opt-env-conf-test]
1496.75 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:20-26
1496.75 s
[opt-env-conf-test] @@ -362,7 +362,7 @@
1496.75 s
[opt-env-conf-test] showCommandABit
1496.75 s
[opt-env-conf-test] cs
1496.75 s
[opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
1496.75 s
[opt-env-conf-test] - showParen (d > 10) $
1496.75 s
[opt-env-conf-test] + showParen (False) $
1496.75 s
[opt-env-conf-test] showString "WithConfig _ "
1496.75 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.75 s
[opt-env-conf-test] . showString " "
1496.75 s
[opt-env-conf-test]
1496.75 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:20-26
1496.75 s
[opt-env-conf-test] @@ -362,7 +362,7 @@
1496.75 s
[opt-env-conf-test] showCommandABit
1496.75 s
[opt-env-conf-test] cs
1496.75 s
[opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
1496.75 s
[opt-env-conf-test] - showParen (d > 10) $
1496.75 s
[opt-env-conf-test] + showParen (True) $
1496.75 s
[opt-env-conf-test] showString "WithConfig _ "
1496.75 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.75 s
[opt-env-conf-test] . showString " "
1496.75 s
[opt-env-conf-test]
1496.75 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:365:24-26
1496.75 s
[opt-env-conf-test] @@ -362,7 +362,7 @@
1496.75 s
[opt-env-conf-test] showCommandABit
1496.75 s
[opt-env-conf-test] cs
1496.75 s
[opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
1496.75 s
[opt-env-conf-test] - showParen (d > 10) $
1496.75 s
[opt-env-conf-test] + showParen (d > -10) $
1496.75 s
[opt-env-conf-test] showString "WithConfig _ "
1496.75 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.75 s
[opt-env-conf-test] . showString " "
1496.75 s
[opt-env-conf-test]
1496.75 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:365:24-26
1496.75 s
[opt-env-conf-test] @@ -362,7 +362,7 @@
1496.75 s
[opt-env-conf-test] showCommandABit
1496.75 s
[opt-env-conf-test] cs
1496.75 s
[opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
1496.75 s
[opt-env-conf-test] - showParen (d > 10) $
1496.75 s
[opt-env-conf-test] + showParen (d > 1) $
1496.75 s
[opt-env-conf-test] showString "WithConfig _ "
1496.75 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.75 s
[opt-env-conf-test] . showString " "
1496.75 s
[opt-env-conf-test]
1496.75 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:365:24-26
1496.75 s
[opt-env-conf-test] @@ -362,7 +362,7 @@
1496.75 s
[opt-env-conf-test] showCommandABit
1496.75 s
[opt-env-conf-test] cs
1496.75 s
[opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
1496.75 s
[opt-env-conf-test] - showParen (d > 10) $
1496.75 s
[opt-env-conf-test] + showParen (d > 0) $
1496.75 s
[opt-env-conf-test] showString "WithConfig _ "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:355:19-27
1496.76 s
[opt-env-conf-test] @@ -352,7 +352,7 @@
1496.76 s
[opt-env-conf-test] . showString " _ "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCommands mLoc mDefault cs ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen True $
1496.76 s
[opt-env-conf-test] showString "Commands "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:355:20-26
1496.76 s
[opt-env-conf-test] @@ -352,7 +352,7 @@
1496.76 s
[opt-env-conf-test] . showString " _ "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCommands mLoc mDefault cs ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen (True) $
1496.76 s
[opt-env-conf-test] showString "Commands "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:355:24-26
1496.76 s
[opt-env-conf-test] @@ -352,7 +352,7 @@
1496.76 s
[opt-env-conf-test] . showString " _ "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCommands mLoc mDefault cs ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen (d > -10) $
1496.76 s
[opt-env-conf-test] showString "Commands "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:355:24-26
1496.76 s
[opt-env-conf-test] @@ -352,7 +352,7 @@
1496.76 s
[opt-env-conf-test] . showString " _ "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCommands mLoc mDefault cs ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen (d > 1) $
1496.76 s
[opt-env-conf-test] showString "Commands "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:355:24-26
1496.76 s
[opt-env-conf-test] @@ -352,7 +352,7 @@
1496.76 s
[opt-env-conf-test] . showString " _ "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCommands mLoc mDefault cs ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen (d > 0) $
1496.76 s
[opt-env-conf-test] showString "Commands "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:345:19-27
1496.76 s
[opt-env-conf-test] @@ -342,7 +342,7 @@
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen True $
1496.76 s
[opt-env-conf-test] showString "Check "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:345:20-26
1496.76 s
[opt-env-conf-test] @@ -342,7 +342,7 @@
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen (True) $
1496.76 s
[opt-env-conf-test] showString "Check "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:345:24-26
1496.76 s
[opt-env-conf-test] @@ -342,7 +342,7 @@
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen (d > -10) $
1496.76 s
[opt-env-conf-test] showString "Check "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:345:24-26
1496.76 s
[opt-env-conf-test] @@ -342,7 +342,7 @@
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen (d > 1) $
1496.76 s
[opt-env-conf-test] showString "Check "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:345:24-26
1496.76 s
[opt-env-conf-test] @@ -342,7 +342,7 @@
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen (d > 0) $
1496.76 s
[opt-env-conf-test] showString "Check "
1496.76 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test]
1496.76 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:333:19-27
1496.76 s
[opt-env-conf-test] @@ -330,7 +330,7 @@
1496.76 s
[opt-env-conf-test] . showString " "
1496.76 s
[opt-env-conf-test] . go 11 p
1496.76 s
[opt-env-conf-test] ParserSome mLoc p ->
1496.76 s
[opt-env-conf-test] - showParen (d > 10) $
1496.76 s
[opt-env-conf-test] + showParen True $
1496.77 s
[opt-env-conf-test] showString "Some "
1496.77 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test]
1496.77 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:333:20-26
1496.77 s
[opt-env-conf-test] @@ -330,7 +330,7 @@
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test] . go 11 p
1496.77 s
[opt-env-conf-test] ParserSome mLoc p ->
1496.77 s
[opt-env-conf-test] - showParen (d > 10) $
1496.77 s
[opt-env-conf-test] + showParen (True) $
1496.77 s
[opt-env-conf-test] showString "Some "
1496.77 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test]
1496.77 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:333:24-26
1496.77 s
[opt-env-conf-test] @@ -330,7 +330,7 @@
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test] . go 11 p
1496.77 s
[opt-env-conf-test] ParserSome mLoc p ->
1496.77 s
[opt-env-conf-test] - showParen (d > 10) $
1496.77 s
[opt-env-conf-test] + showParen (d > -10) $
1496.77 s
[opt-env-conf-test] showString "Some "
1496.77 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test]
1496.77 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:333:24-26
1496.77 s
[opt-env-conf-test] @@ -330,7 +330,7 @@
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test] . go 11 p
1496.77 s
[opt-env-conf-test] ParserSome mLoc p ->
1496.77 s
[opt-env-conf-test] - showParen (d > 10) $
1496.77 s
[opt-env-conf-test] + showParen (d > 1) $
1496.77 s
[opt-env-conf-test] showString "Some "
1496.77 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test]
1496.77 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:333:24-26
1496.77 s
[opt-env-conf-test] @@ -330,7 +330,7 @@
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test] . go 11 p
1496.77 s
[opt-env-conf-test] ParserSome mLoc p ->
1496.77 s
[opt-env-conf-test] - showParen (d > 10) $
1496.77 s
[opt-env-conf-test] + showParen (d > 0) $
1496.77 s
[opt-env-conf-test] showString "Some "
1496.77 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test]
1496.77 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:327:19-27
1496.77 s
[opt-env-conf-test] @@ -324,7 +324,7 @@
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test] . go 11 p2
1496.77 s
[opt-env-conf-test] ParserMany mLoc p ->
1496.77 s
[opt-env-conf-test] - showParen (d > 10) $
1496.77 s
[opt-env-conf-test] + showParen True $
1496.77 s
[opt-env-conf-test] showString "Many "
1496.77 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test]
1496.77 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:327:20-26
1496.77 s
[opt-env-conf-test] @@ -324,7 +324,7 @@
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test] . go 11 p2
1496.77 s
[opt-env-conf-test] ParserMany mLoc p ->
1496.77 s
[opt-env-conf-test] - showParen (d > 10) $
1496.77 s
[opt-env-conf-test] + showParen (True) $
1496.77 s
[opt-env-conf-test] showString "Many "
1496.77 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test]
1496.77 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:327:24-26
1496.77 s
[opt-env-conf-test] @@ -324,7 +324,7 @@
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test] . go 11 p2
1496.77 s
[opt-env-conf-test] ParserMany mLoc p ->
1496.77 s
[opt-env-conf-test] - showParen (d > 10) $
1496.77 s
[opt-env-conf-test] + showParen (d > -10) $
1496.77 s
[opt-env-conf-test] showString "Many "
1496.77 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test]
1496.77 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:327:24-26
1496.77 s
[opt-env-conf-test] @@ -324,7 +324,7 @@
1496.77 s
[opt-env-conf-test] . showString " "
1496.77 s
[opt-env-conf-test] . go 11 p2
1496.77 s
[opt-env-conf-test] ParserMany mLoc p ->
1496.77 s
[opt-env-conf-test] - showParen (d > 10) $
1496.77 s
[opt-env-conf-test] + showParen (d > 1) $
1496.77 s
[opt-env-conf-test] showString "Many "
1496.77 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test]
1496.78 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:327:24-26
1496.78 s
[opt-env-conf-test] @@ -324,7 +324,7 @@
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test] . go 11 p2
1496.78 s
[opt-env-conf-test] ParserMany mLoc p ->
1496.78 s
[opt-env-conf-test] - showParen (d > 10) $
1496.78 s
[opt-env-conf-test] + showParen (d > 0) $
1496.78 s
[opt-env-conf-test] showString "Many "
1496.78 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test]
1496.78 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:321:19-27
1496.78 s
[opt-env-conf-test] @@ -318,7 +318,7 @@
1496.78 s
[opt-env-conf-test] showString "Empty "
1496.78 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.78 s
[opt-env-conf-test] ParserAlt p1 p2 ->
1496.78 s
[opt-env-conf-test] - showParen (d > 10) $
1496.78 s
[opt-env-conf-test] + showParen True $
1496.78 s
[opt-env-conf-test] showString "Alt "
1496.78 s
[opt-env-conf-test] . go 11 p1
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test]
1496.78 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:321:20-26
1496.78 s
[opt-env-conf-test] @@ -318,7 +318,7 @@
1496.78 s
[opt-env-conf-test] showString "Empty "
1496.78 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.78 s
[opt-env-conf-test] ParserAlt p1 p2 ->
1496.78 s
[opt-env-conf-test] - showParen (d > 10) $
1496.78 s
[opt-env-conf-test] + showParen (True) $
1496.78 s
[opt-env-conf-test] showString "Alt "
1496.78 s
[opt-env-conf-test] . go 11 p1
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test]
1496.78 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:321:24-26
1496.78 s
[opt-env-conf-test] @@ -318,7 +318,7 @@
1496.78 s
[opt-env-conf-test] showString "Empty "
1496.78 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.78 s
[opt-env-conf-test] ParserAlt p1 p2 ->
1496.78 s
[opt-env-conf-test] - showParen (d > 10) $
1496.78 s
[opt-env-conf-test] + showParen (d > -10) $
1496.78 s
[opt-env-conf-test] showString "Alt "
1496.78 s
[opt-env-conf-test] . go 11 p1
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test]
1496.78 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:321:24-26
1496.78 s
[opt-env-conf-test] @@ -318,7 +318,7 @@
1496.78 s
[opt-env-conf-test] showString "Empty "
1496.78 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.78 s
[opt-env-conf-test] ParserAlt p1 p2 ->
1496.78 s
[opt-env-conf-test] - showParen (d > 10) $
1496.78 s
[opt-env-conf-test] + showParen (d > 1) $
1496.78 s
[opt-env-conf-test] showString "Alt "
1496.78 s
[opt-env-conf-test] . go 11 p1
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test]
1496.78 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:321:24-26
1496.78 s
[opt-env-conf-test] @@ -318,7 +318,7 @@
1496.78 s
[opt-env-conf-test] showString "Empty "
1496.78 s
[opt-env-conf-test] . showsPrec 11 mLoc
1496.78 s
[opt-env-conf-test] ParserAlt p1 p2 ->
1496.78 s
[opt-env-conf-test] - showParen (d > 10) $
1496.78 s
[opt-env-conf-test] + showParen (d > 0) $
1496.78 s
[opt-env-conf-test] showString "Alt "
1496.78 s
[opt-env-conf-test] . go 11 p1
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test]
1496.78 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:306:19-27
1496.78 s
[opt-env-conf-test] @@ -303,7 +303,7 @@
1496.78 s
[opt-env-conf-test] go d = \case
1496.78 s
[opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.78 s
[opt-env-conf-test] ParserAp pf pa ->
1496.78 s
[opt-env-conf-test] - showParen (d > 10) $
1496.78 s
[opt-env-conf-test] + showParen True $
1496.78 s
[opt-env-conf-test] showString "Ap "
1496.78 s
[opt-env-conf-test] . go 11 pf
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test]
1496.78 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:306:20-26
1496.78 s
[opt-env-conf-test] @@ -303,7 +303,7 @@
1496.78 s
[opt-env-conf-test] go d = \case
1496.78 s
[opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.78 s
[opt-env-conf-test] ParserAp pf pa ->
1496.78 s
[opt-env-conf-test] - showParen (d > 10) $
1496.78 s
[opt-env-conf-test] + showParen (True) $
1496.78 s
[opt-env-conf-test] showString "Ap "
1496.78 s
[opt-env-conf-test] . go 11 pf
1496.78 s
[opt-env-conf-test] . showString " "
1496.78 s
[opt-env-conf-test]
1496.78 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:306:24-26
1496.78 s
[opt-env-conf-test] @@ -303,7 +303,7 @@
1496.78 s
[opt-env-conf-test] go d = \case
1496.78 s
[opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.78 s
[opt-env-conf-test] ParserAp pf pa ->
1496.78 s
[opt-env-conf-test] - showParen (d > 10) $
1496.78 s
[opt-env-conf-test] + showParen (d > -10) $
1496.78 s
[opt-env-conf-test] showString "Ap "
1496.78 s
[opt-env-conf-test] . go 11 pf
1496.79 s
[opt-env-conf-test] . showString " "
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:306:24-26
1496.79 s
[opt-env-conf-test] @@ -303,7 +303,7 @@
1496.79 s
[opt-env-conf-test] go d = \case
1496.79 s
[opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] ParserAp pf pa ->
1496.79 s
[opt-env-conf-test] - showParen (d > 10) $
1496.79 s
[opt-env-conf-test] + showParen (d > 1) $
1496.79 s
[opt-env-conf-test] showString "Ap "
1496.79 s
[opt-env-conf-test] . go 11 pf
1496.79 s
[opt-env-conf-test] . showString " "
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:306:24-26
1496.79 s
[opt-env-conf-test] @@ -303,7 +303,7 @@
1496.79 s
[opt-env-conf-test] go d = \case
1496.79 s
[opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] ParserAp pf pa ->
1496.79 s
[opt-env-conf-test] - showParen (d > 10) $
1496.79 s
[opt-env-conf-test] + showParen (d > 0) $
1496.79 s
[opt-env-conf-test] showString "Ap "
1496.79 s
[opt-env-conf-test] . go 11 pf
1496.79 s
[opt-env-conf-test] . showString " "
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:304:33-41
1496.79 s
[opt-env-conf-test] @@ -301,7 +301,7 @@
1496.79 s
[opt-env-conf-test] where
1496.79 s
[opt-env-conf-test] go :: Int -> Parser a -> ShowS
1496.79 s
[opt-env-conf-test] go d = \case
1496.79 s
[opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] + ParserPure _ -> showParen True $ showString "Pure _"
1496.79 s
[opt-env-conf-test] ParserAp pf pa ->
1496.79 s
[opt-env-conf-test] showParen (d > 10) $
1496.79 s
[opt-env-conf-test] showString "Ap "
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:304:34-40
1496.79 s
[opt-env-conf-test] @@ -301,7 +301,7 @@
1496.79 s
[opt-env-conf-test] where
1496.79 s
[opt-env-conf-test] go :: Int -> Parser a -> ShowS
1496.79 s
[opt-env-conf-test] go d = \case
1496.79 s
[opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] + ParserPure _ -> showParen (True) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] ParserAp pf pa ->
1496.79 s
[opt-env-conf-test] showParen (d > 10) $
1496.79 s
[opt-env-conf-test] showString "Ap "
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:304:38-40
1496.79 s
[opt-env-conf-test] @@ -301,7 +301,7 @@
1496.79 s
[opt-env-conf-test] where
1496.79 s
[opt-env-conf-test] go :: Int -> Parser a -> ShowS
1496.79 s
[opt-env-conf-test] go d = \case
1496.79 s
[opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] + ParserPure _ -> showParen (d > -10) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] ParserAp pf pa ->
1496.79 s
[opt-env-conf-test] showParen (d > 10) $
1496.79 s
[opt-env-conf-test] showString "Ap "
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:304:38-40
1496.79 s
[opt-env-conf-test] @@ -301,7 +301,7 @@
1496.79 s
[opt-env-conf-test] where
1496.79 s
[opt-env-conf-test] go :: Int -> Parser a -> ShowS
1496.79 s
[opt-env-conf-test] go d = \case
1496.79 s
[opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] + ParserPure _ -> showParen (d > 1) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] ParserAp pf pa ->
1496.79 s
[opt-env-conf-test] showParen (d > 10) $
1496.79 s
[opt-env-conf-test] showString "Ap "
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:304:38-40
1496.79 s
[opt-env-conf-test] @@ -301,7 +301,7 @@
1496.79 s
[opt-env-conf-test] where
1496.79 s
[opt-env-conf-test] go :: Int -> Parser a -> ShowS
1496.79 s
[opt-env-conf-test] go d = \case
1496.79 s
[opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] + ParserPure _ -> showParen (d > 0) $ showString "Pure _"
1496.79 s
[opt-env-conf-test] ParserAp pf pa ->
1496.79 s
[opt-env-conf-test] showParen (d > 10) $
1496.79 s
[opt-env-conf-test] showString "Ap "
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.79 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.79 s
[opt-env-conf-test] where
1496.79 s
[opt-env-conf-test] go p =
1496.79 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.79 s
[opt-env-conf-test] in case p of
1496.79 s
[opt-env-conf-test] ParserPure a -> ParserPure a
1496.79 s
[opt-env-conf-test] ParserAp {} -> p'
1496.79 s
[opt-env-conf-test] ParserSelect {} -> p'
1496.79 s
[opt-env-conf-test] ParserEmpty _ -> ParserPure defaultValue
1496.79 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.79 s
[opt-env-conf-test] ParserMany {} -> p'
1496.79 s
[opt-env-conf-test] ParserSome {} -> p'
1496.79 s
[opt-env-conf-test] ParserAllOrNothing {} -> p'
1496.79 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.79 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.79 s
[opt-env-conf-test] - ParserWithConfig {} -> p'
1496.79 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.79 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.79 s
[opt-env-conf-test] Just _ -> p
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.79 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.79 s
[opt-env-conf-test]
1496.79 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.79 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.79 s
[opt-env-conf-test] where
1496.79 s
[opt-env-conf-test] go p =
1496.79 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.79 s
[opt-env-conf-test] in case p of
1496.79 s
[opt-env-conf-test] ParserPure a -> ParserPure a
1496.79 s
[opt-env-conf-test] ParserAp {} -> p'
1496.79 s
[opt-env-conf-test] ParserSelect {} -> p'
1496.79 s
[opt-env-conf-test] ParserEmpty _ -> ParserPure defaultValue
1496.79 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.80 s
[opt-env-conf-test] ParserMany {} -> p'
1496.80 s
[opt-env-conf-test] ParserSome {} -> p'
1496.80 s
[opt-env-conf-test] ParserAllOrNothing {} -> p'
1496.80 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.80 s
[opt-env-conf-test] - ParserCommands {} -> p'
1496.80 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.80 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.80 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.80 s
[opt-env-conf-test] Just _ -> p
1496.80 s
[opt-env-conf-test]
1496.80 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.80 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.80 s
[opt-env-conf-test]
1496.80 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.80 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.80 s
[opt-env-conf-test] where
1496.80 s
[opt-env-conf-test] go p =
1496.80 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.80 s
[opt-env-conf-test] in case p of
1496.80 s
[opt-env-conf-test] ParserPure a -> ParserPure a
1496.80 s
[opt-env-conf-test] ParserAp {} -> p'
1496.80 s
[opt-env-conf-test] ParserSelect {} -> p'
1496.80 s
[opt-env-conf-test] ParserEmpty _ -> ParserPure defaultValue
1496.80 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.80 s
[opt-env-conf-test] ParserMany {} -> p'
1496.80 s
[opt-env-conf-test] ParserSome {} -> p'
1496.80 s
[opt-env-conf-test] ParserAllOrNothing {} -> p'
1496.80 s
[opt-env-conf-test] - ParserCheck {} -> p'
1496.80 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.80 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.80 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.80 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.80 s
[opt-env-conf-test] Just _ -> p
1496.80 s
[opt-env-conf-test]
1496.80 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.80 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.80 s
[opt-env-conf-test]
1496.80 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.80 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.80 s
[opt-env-conf-test] where
1496.80 s
[opt-env-conf-test] go p =
1496.80 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.80 s
[opt-env-conf-test] in case p of
1496.80 s
[opt-env-conf-test] ParserPure a -> ParserPure a
1496.80 s
[opt-env-conf-test] ParserAp {} -> p'
1496.80 s
[opt-env-conf-test] ParserSelect {} -> p'
1496.80 s
[opt-env-conf-test] ParserEmpty _ -> ParserPure defaultValue
1496.80 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.80 s
[opt-env-conf-test] ParserMany {} -> p'
1496.80 s
[opt-env-conf-test] ParserSome {} -> p'
1496.80 s
[opt-env-conf-test] - ParserAllOrNothing {} -> p'
1496.80 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.80 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.80 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.80 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.80 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.80 s
[opt-env-conf-test] Just _ -> p
1496.80 s
[opt-env-conf-test]
1496.80 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.80 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.80 s
[opt-env-conf-test]
1496.80 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.80 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.80 s
[opt-env-conf-test] where
1496.80 s
[opt-env-conf-test] go p =
1496.80 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.80 s
[opt-env-conf-test] in case p of
1496.80 s
[opt-env-conf-test] ParserPure a -> ParserPure a
1496.80 s
[opt-env-conf-test] ParserAp {} -> p'
1496.80 s
[opt-env-conf-test] ParserSelect {} -> p'
1496.80 s
[opt-env-conf-test] ParserEmpty _ -> ParserPure defaultValue
1496.80 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.80 s
[opt-env-conf-test] ParserMany {} -> p'
1496.80 s
[opt-env-conf-test] - ParserSome {} -> p'
1496.80 s
[opt-env-conf-test] ParserAllOrNothing {} -> p'
1496.80 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.80 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.80 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.80 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.80 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.80 s
[opt-env-conf-test] Just _ -> p
1496.80 s
[opt-env-conf-test]
1496.80 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.80 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.80 s
[opt-env-conf-test]
1496.80 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.80 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.80 s
[opt-env-conf-test] where
1496.80 s
[opt-env-conf-test] go p =
1496.80 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.80 s
[opt-env-conf-test] in case p of
1496.80 s
[opt-env-conf-test] ParserPure a -> ParserPure a
1496.80 s
[opt-env-conf-test] ParserAp {} -> p'
1496.80 s
[opt-env-conf-test] ParserSelect {} -> p'
1496.80 s
[opt-env-conf-test] ParserEmpty _ -> ParserPure defaultValue
1496.80 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.80 s
[opt-env-conf-test] - ParserMany {} -> p'
1496.80 s
[opt-env-conf-test] ParserSome {} -> p'
1496.80 s
[opt-env-conf-test] ParserAllOrNothing {} -> p'
1496.80 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.80 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.80 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.80 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.80 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.80 s
[opt-env-conf-test] Just _ -> p
1496.80 s
[opt-env-conf-test]
1496.80 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.81 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.81 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.81 s
[opt-env-conf-test] where
1496.81 s
[opt-env-conf-test] go p =
1496.81 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.81 s
[opt-env-conf-test] in case p of
1496.81 s
[opt-env-conf-test] ParserPure a -> ParserPure a
1496.81 s
[opt-env-conf-test] ParserAp {} -> p'
1496.81 s
[opt-env-conf-test] ParserSelect {} -> p'
1496.81 s
[opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
1496.81 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.81 s
[opt-env-conf-test] ParserMany {} -> p'
1496.81 s
[opt-env-conf-test] ParserSome {} -> p'
1496.81 s
[opt-env-conf-test] ParserAllOrNothing {} -> p'
1496.81 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.81 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.81 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.81 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.81 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.81 s
[opt-env-conf-test] Just _ -> p
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.81 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.81 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.81 s
[opt-env-conf-test] where
1496.81 s
[opt-env-conf-test] go p =
1496.81 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.81 s
[opt-env-conf-test] in case p of
1496.81 s
[opt-env-conf-test] ParserPure a -> ParserPure a
1496.81 s
[opt-env-conf-test] ParserAp {} -> p'
1496.81 s
[opt-env-conf-test] - ParserSelect {} -> p'
1496.81 s
[opt-env-conf-test] ParserEmpty _ -> ParserPure defaultValue
1496.81 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.81 s
[opt-env-conf-test] ParserMany {} -> p'
1496.81 s
[opt-env-conf-test] ParserSome {} -> p'
1496.81 s
[opt-env-conf-test] ParserAllOrNothing {} -> p'
1496.81 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.81 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.81 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.81 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.81 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.81 s
[opt-env-conf-test] Just _ -> p
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.81 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.81 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.81 s
[opt-env-conf-test] where
1496.81 s
[opt-env-conf-test] go p =
1496.81 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.81 s
[opt-env-conf-test] in case p of
1496.81 s
[opt-env-conf-test] ParserPure a -> ParserPure a
1496.81 s
[opt-env-conf-test] - ParserAp {} -> p'
1496.81 s
[opt-env-conf-test] ParserSelect {} -> p'
1496.81 s
[opt-env-conf-test] ParserEmpty _ -> ParserPure defaultValue
1496.81 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.81 s
[opt-env-conf-test] ParserMany {} -> p'
1496.81 s
[opt-env-conf-test] ParserSome {} -> p'
1496.81 s
[opt-env-conf-test] ParserAllOrNothing {} -> p'
1496.81 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.81 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.81 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.81 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.81 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.81 s
[opt-env-conf-test] Just _ -> p
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.81 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
1496.81 s
[opt-env-conf-test] @@ -547,21 +547,20 @@
1496.81 s
[opt-env-conf-test] where
1496.81 s
[opt-env-conf-test] go p =
1496.81 s
[opt-env-conf-test] let p' = p <|> pure defaultValue
1496.81 s
[opt-env-conf-test] in case p of
1496.81 s
[opt-env-conf-test] - ParserPure a -> ParserPure a
1496.81 s
[opt-env-conf-test] ParserAp {} -> p'
1496.81 s
[opt-env-conf-test] ParserSelect {} -> p'
1496.81 s
[opt-env-conf-test] ParserEmpty _ -> ParserPure defaultValue
1496.81 s
[opt-env-conf-test] ParserAlt p1 p2 -> ParserAlt p1 (go p2)
1496.81 s
[opt-env-conf-test] ParserMany {} -> p'
1496.81 s
[opt-env-conf-test] ParserSome {} -> p'
1496.81 s
[opt-env-conf-test] ParserAllOrNothing {} -> p'
1496.81 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.81 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.81 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.81 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.81 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.81 s
[opt-env-conf-test] Just _ -> p
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.81 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:562:37-26
1496.81 s
[opt-env-conf-test] @@ -559,9 +559,8 @@
1496.81 s
[opt-env-conf-test] ParserCheck {} -> p'
1496.81 s
[opt-env-conf-test] ParserCommands {} -> p'
1496.81 s
[opt-env-conf-test] ParserWithConfig {} -> p'
1496.81 s
[opt-env-conf-test] ParserSetting mLoc s -> case settingDefaultValue s of
1496.81 s
[opt-env-conf-test] Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
1496.81 s
[opt-env-conf-test] - Just _ -> p
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] -- | Try a list of parsers in order
1496.81 s
[opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
1496.81 s
[opt-env-conf-test]
1496.81 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:602:15-28
1496.81 s
[opt-env-conf-test] @@ -599,9 +599,8 @@
1496.81 s
[opt-env-conf-test] checkMapMaybe func p =
1496.81 s
[opt-env-conf-test] withFrozenCallStack $
1496.81 s
[opt-env-conf-test] checkMapEither
1496.81 s
[opt-env-conf-test] ( \a -> case func a of
1496.81 s
[opt-env-conf-test] Nothing -> Left "checkMapMaybe failed without a helpful error message"
1496.81 s
[opt-env-conf-test] - Just b -> Right b
1496.81 s
[opt-env-conf-test] )
1496.82 s
[opt-env-conf-test] p
1496.82 s
[opt-env-conf-test]
1496.82 s
[opt-env-conf-test]
1496.82 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Completion.hs:453:24-40
1496.82 s
[opt-env-conf-test] @@ -450,7 +450,7 @@
1496.82 s
[opt-env-conf-test] put as'
1496.82 s
[opt-env-conf-test] pure $ Just []
1496.82 s
[opt-env-conf-test] else do
1496.82 s
[opt-env-conf-test] - if settingTryOption
1496.82 s
[opt-env-conf-test] + if True
1496.82 s
[opt-env-conf-test] then do
1496.82 s
[opt-env-conf-test] -- First we try to consume the option so we don't suggest it if it's already been parsed
1496.82 s
[opt-env-conf-test] case Args.consumeOption settingDasheds as of
1496.82 s
[opt-env-conf-test]
1496.82 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Completion.hs:435:21-51
1496.82 s
[opt-env-conf-test] @@ -432,11 +432,10 @@
1496.82 s
[opt-env-conf-test] -- consumeArgument) or because only the consume-nothing
1496.82 s
[opt-env-conf-test] -- fallback matched. In both cases, offer the
1496.82 s
[opt-env-conf-test] -- completer if we are at the end.
1496.82 s
[opt-env-conf-test] case possibilities of
1496.82 s
[opt-env-conf-test] - [] -> completeWithCompleterAtEnd
1496.82 s
[opt-env-conf-test] (_, as') : _ -> do
1496.82 s
[opt-env-conf-test] put as'
1496.82 s
[opt-env-conf-test] completeWithCompleterAtEnd
1496.82 s
[opt-env-conf-test] else
1496.82 s
[opt-env-conf-test] if isJust settingSwitchValue
1496.82 s
[opt-env-conf-test] then do
1496.82 s
[opt-env-conf-test]
1496.82 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45
1496.82 s
[opt-env-conf-test] @@ -125,42 +125,41 @@
1496.82 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stderr
1496.82 s
[opt-env-conf-test] hPutChunksLocaleWith tc stderr $ renderErrors errs
1496.82 s
[opt-env-conf-test] exitFailure
1496.82 s
[opt-env-conf-test] Right i -> case i of
1496.82 s
[opt-env-conf-test] ShowVersion -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.82 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderVersionPage progname version
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] RenderMan -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.82 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] RenderDocumentation -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.82 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] RenderNixosOptions -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p'
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] BashCompletionScript progPath -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] generateBashCompletionScript progPath progname
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] ZshCompletionScript progPath -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] generateZshCompletionScript progPath progname
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] FishCompletionScript progPath -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] generateFishCompletionScript progPath progname
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] CompletionQuery enriched index ws -> do
1496.82 s
[opt-env-conf-test] runCompletionQuery p' enriched index ws
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] - ParsedNormally a -> pure a
1496.82 s
[opt-env-conf-test]
1496.82 s
[opt-env-conf-test] -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens.
1496.82 s
[opt-env-conf-test] consumeExactArg :: String -> [String] -> (Bool, [String])
1496.82 s
[opt-env-conf-test]
1496.82 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45
1496.82 s
[opt-env-conf-test] @@ -125,42 +125,39 @@
1496.82 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stderr
1496.82 s
[opt-env-conf-test] hPutChunksLocaleWith tc stderr $ renderErrors errs
1496.82 s
[opt-env-conf-test] exitFailure
1496.82 s
[opt-env-conf-test] Right i -> case i of
1496.82 s
[opt-env-conf-test] ShowVersion -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.82 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderVersionPage progname version
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] RenderMan -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.82 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] RenderDocumentation -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.82 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] RenderNixosOptions -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p'
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] BashCompletionScript progPath -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] generateBashCompletionScript progPath progname
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] ZshCompletionScript progPath -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] generateZshCompletionScript progPath progname
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] FishCompletionScript progPath -> do
1496.82 s
[opt-env-conf-test] progname <- getProgName
1496.82 s
[opt-env-conf-test] generateFishCompletionScript progPath progname
1496.82 s
[opt-env-conf-test] exitSuccess
1496.82 s
[opt-env-conf-test] - CompletionQuery enriched index ws -> do
1496.82 s
[opt-env-conf-test] - runCompletionQuery p' enriched index ws
1496.82 s
[opt-env-conf-test] - exitSuccess
1496.82 s
[opt-env-conf-test] ParsedNormally a -> pure a
1496.82 s
[opt-env-conf-test]
1496.82 s
[opt-env-conf-test] -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens.
1496.82 s
[opt-env-conf-test] consumeExactArg :: String -> [String] -> (Bool, [String])
1496.82 s
[opt-env-conf-test]
1496.82 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45
1496.82 s
[opt-env-conf-test] @@ -125,42 +125,38 @@
1496.82 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stderr
1496.82 s
[opt-env-conf-test] hPutChunksLocaleWith tc stderr $ renderErrors errs
1496.82 s
[opt-env-conf-test] exitFailure
1496.82 s
[opt-env-conf-test] Right i -> case i of
1496.82 s
[opt-env-conf-test] ShowVersion -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.83 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderVersionPage progname version
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] RenderMan -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.83 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] RenderDocumentation -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.83 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] RenderNixosOptions -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p'
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] BashCompletionScript progPath -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] generateBashCompletionScript progPath progname
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] ZshCompletionScript progPath -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] generateZshCompletionScript progPath progname
1496.83 s
[opt-env-conf-test] - exitSuccess
1496.83 s
[opt-env-conf-test] - FishCompletionScript progPath -> do
1496.83 s
[opt-env-conf-test] - progname <- getProgName
1496.83 s
[opt-env-conf-test] - generateFishCompletionScript progPath progname
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] CompletionQuery enriched index ws -> do
1496.83 s
[opt-env-conf-test] runCompletionQuery p' enriched index ws
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] ParsedNormally a -> pure a
1496.83 s
[opt-env-conf-test]
1496.83 s
[opt-env-conf-test] -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens.
1496.83 s
[opt-env-conf-test] consumeExactArg :: String -> [String] -> (Bool, [String])
1496.83 s
[opt-env-conf-test]
1496.83 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45
1496.83 s
[opt-env-conf-test] @@ -125,42 +125,38 @@
1496.83 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stderr
1496.83 s
[opt-env-conf-test] hPutChunksLocaleWith tc stderr $ renderErrors errs
1496.83 s
[opt-env-conf-test] exitFailure
1496.83 s
[opt-env-conf-test] Right i -> case i of
1496.83 s
[opt-env-conf-test] ShowVersion -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.83 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderVersionPage progname version
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] RenderMan -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.83 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] RenderDocumentation -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.83 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs
1496.83 s
[opt-env-conf-test] exitSuccess
1496.83 s
[opt-env-conf-test] RenderNixosOptions -> do
1496.83 s
[opt-env-conf-test] progname <- getProgName
1496.83 s
[opt-env-conf-test] putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p'
1496.83 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] BashCompletionScript progPath -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] generateBashCompletionScript progPath progname
1496.84 s
[opt-env-conf-test] - exitSuccess
1496.84 s
[opt-env-conf-test] - ZshCompletionScript progPath -> do
1496.84 s
[opt-env-conf-test] - progname <- getProgName
1496.84 s
[opt-env-conf-test] - generateZshCompletionScript progPath progname
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] FishCompletionScript progPath -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] generateFishCompletionScript progPath progname
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] CompletionQuery enriched index ws -> do
1496.84 s
[opt-env-conf-test] runCompletionQuery p' enriched index ws
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] ParsedNormally a -> pure a
1496.84 s
[opt-env-conf-test]
1496.84 s
[opt-env-conf-test] -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens.
1496.84 s
[opt-env-conf-test] consumeExactArg :: String -> [String] -> (Bool, [String])
1496.84 s
[opt-env-conf-test]
1496.84 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45
1496.84 s
[opt-env-conf-test] @@ -125,42 +125,38 @@
1496.84 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stderr
1496.84 s
[opt-env-conf-test] hPutChunksLocaleWith tc stderr $ renderErrors errs
1496.84 s
[opt-env-conf-test] exitFailure
1496.84 s
[opt-env-conf-test] Right i -> case i of
1496.84 s
[opt-env-conf-test] ShowVersion -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.84 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderVersionPage progname version
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] RenderMan -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.84 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] RenderDocumentation -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.84 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] RenderNixosOptions -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p'
1496.84 s
[opt-env-conf-test] - exitSuccess
1496.84 s
[opt-env-conf-test] - BashCompletionScript progPath -> do
1496.84 s
[opt-env-conf-test] - progname <- getProgName
1496.84 s
[opt-env-conf-test] - generateBashCompletionScript progPath progname
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] ZshCompletionScript progPath -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] generateZshCompletionScript progPath progname
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] FishCompletionScript progPath -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] generateFishCompletionScript progPath progname
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] CompletionQuery enriched index ws -> do
1496.84 s
[opt-env-conf-test] runCompletionQuery p' enriched index ws
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] ParsedNormally a -> pure a
1496.84 s
[opt-env-conf-test]
1496.84 s
[opt-env-conf-test] -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens.
1496.84 s
[opt-env-conf-test] consumeExactArg :: String -> [String] -> (Bool, [String])
1496.84 s
[opt-env-conf-test]
1496.84 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45
1496.84 s
[opt-env-conf-test] @@ -125,42 +125,38 @@
1496.84 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stderr
1496.84 s
[opt-env-conf-test] hPutChunksLocaleWith tc stderr $ renderErrors errs
1496.84 s
[opt-env-conf-test] exitFailure
1496.84 s
[opt-env-conf-test] Right i -> case i of
1496.84 s
[opt-env-conf-test] ShowVersion -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.84 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderVersionPage progname version
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] RenderMan -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.84 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] RenderDocumentation -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.84 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs
1496.84 s
[opt-env-conf-test] - exitSuccess
1496.84 s
[opt-env-conf-test] - RenderNixosOptions -> do
1496.84 s
[opt-env-conf-test] - progname <- getProgName
1496.84 s
[opt-env-conf-test] - putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p'
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] BashCompletionScript progPath -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] generateBashCompletionScript progPath progname
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] ZshCompletionScript progPath -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] generateZshCompletionScript progPath progname
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] FishCompletionScript progPath -> do
1496.84 s
[opt-env-conf-test] progname <- getProgName
1496.84 s
[opt-env-conf-test] generateFishCompletionScript progPath progname
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] CompletionQuery enriched index ws -> do
1496.84 s
[opt-env-conf-test] runCompletionQuery p' enriched index ws
1496.84 s
[opt-env-conf-test] exitSuccess
1496.84 s
[opt-env-conf-test] ParsedNormally a -> pure a
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens.
1496.85 s
[opt-env-conf-test] consumeExactArg :: String -> [String] -> (Bool, [String])
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45
1496.85 s
[opt-env-conf-test] @@ -125,42 +125,37 @@
1496.85 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stderr
1496.85 s
[opt-env-conf-test] hPutChunksLocaleWith tc stderr $ renderErrors errs
1496.85 s
[opt-env-conf-test] exitFailure
1496.85 s
[opt-env-conf-test] Right i -> case i of
1496.85 s
[opt-env-conf-test] ShowVersion -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.85 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderVersionPage progname version
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] RenderMan -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.85 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] - RenderDocumentation -> do
1496.85 s
[opt-env-conf-test] - progname <- getProgName
1496.85 s
[opt-env-conf-test] - tc <- getTerminalCapabilitiesFromHandle stdout
1496.85 s
[opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs
1496.85 s
[opt-env-conf-test] - exitSuccess
1496.85 s
[opt-env-conf-test] RenderNixosOptions -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p'
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] BashCompletionScript progPath -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] generateBashCompletionScript progPath progname
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] ZshCompletionScript progPath -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] generateZshCompletionScript progPath progname
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] FishCompletionScript progPath -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] generateFishCompletionScript progPath progname
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] CompletionQuery enriched index ws -> do
1496.85 s
[opt-env-conf-test] runCompletionQuery p' enriched index ws
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] ParsedNormally a -> pure a
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens.
1496.85 s
[opt-env-conf-test] consumeExactArg :: String -> [String] -> (Bool, [String])
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:128:28-45
1496.85 s
[opt-env-conf-test] @@ -125,42 +125,37 @@
1496.85 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stderr
1496.85 s
[opt-env-conf-test] hPutChunksLocaleWith tc stderr $ renderErrors errs
1496.85 s
[opt-env-conf-test] exitFailure
1496.85 s
[opt-env-conf-test] Right i -> case i of
1496.85 s
[opt-env-conf-test] ShowVersion -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.85 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderVersionPage progname version
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] - RenderMan -> do
1496.85 s
[opt-env-conf-test] - progname <- getProgName
1496.85 s
[opt-env-conf-test] - tc <- getTerminalCapabilitiesFromHandle stdout
1496.85 s
[opt-env-conf-test] - hPutChunksLocaleWith tc stdout $ renderManPage progname version progDesc docs
1496.85 s
[opt-env-conf-test] - exitSuccess
1496.85 s
[opt-env-conf-test] RenderDocumentation -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.85 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ renderReferenceDocumentation progname docs
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] RenderNixosOptions -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] putStrLn $ T.unpack $ renderParserNixOptionsWithGeneratedComment progname p'
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] BashCompletionScript progPath -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] generateBashCompletionScript progPath progname
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] ZshCompletionScript progPath -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] generateZshCompletionScript progPath progname
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] FishCompletionScript progPath -> do
1496.85 s
[opt-env-conf-test] progname <- getProgName
1496.85 s
[opt-env-conf-test] generateFishCompletionScript progPath progname
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] CompletionQuery enriched index ws -> do
1496.85 s
[opt-env-conf-test] runCompletionQuery p' enriched index ws
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] ParsedNormally a -> pure a
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] -- We use [String] instead of [Args] because we want to remove these args, and act on them, before any real arg parsing happens.
1496.85 s
[opt-env-conf-test] consumeExactArg :: String -> [String] -> (Bool, [String])
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:100:48-78
1496.85 s
[opt-env-conf-test] @@ -97,9 +97,8 @@
1496.85 s
[opt-env-conf-test] exitFailure
1496.85 s
[opt-env-conf-test] Right mCommandDoc -> do
1496.85 s
[opt-env-conf-test] tc <- getTerminalCapabilitiesFromHandle stdout
1496.85 s
[opt-env-conf-test] hPutChunksLocaleWith tc stdout $ case mCommandDoc of
1496.85 s
[opt-env-conf-test] Nothing -> renderHelpPage progname version progDesc docs
1496.85 s
[opt-env-conf-test] - Just (path, cDoc) -> renderCommandHelpPage progname path cDoc
1496.85 s
[opt-env-conf-test] exitSuccess
1496.85 s
[opt-env-conf-test] else do
1496.85 s
[opt-env-conf-test] let (capabilities, args'') = consumeCapabilities args'
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] Negate at src/OptEnvConf/Main.hs:83:12-21
1496.85 s
[opt-env-conf-test] @@ -80,7 +80,7 @@
1496.85 s
[opt-env-conf-test] let (debugMode, args) = consumeDebugMode allArgs
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] mDebugMode <-
1496.85 s
[opt-env-conf-test] - if debugMode
1496.85 s
[opt-env-conf-test] + if not debugMode
1496.85 s
[opt-env-conf-test] then Just <$> getTerminalCapabilitiesFromHandle stderr
1496.85 s
[opt-env-conf-test] else pure Nothing
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Main.hs:83:12-21
1496.85 s
[opt-env-conf-test] @@ -80,7 +80,7 @@
1496.85 s
[opt-env-conf-test] let (debugMode, args) = consumeDebugMode allArgs
1496.85 s
[opt-env-conf-test]
1496.85 s
[opt-env-conf-test] mDebugMode <-
1496.86 s
[opt-env-conf-test] - if debugMode
1496.86 s
[opt-env-conf-test] + if False
1496.86 s
[opt-env-conf-test] then Just <$> getTerminalCapabilitiesFromHandle stderr
1496.86 s
[opt-env-conf-test] else pure Nothing
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Main.hs:83:12-21
1496.86 s
[opt-env-conf-test] @@ -80,7 +80,7 @@
1496.86 s
[opt-env-conf-test] let (debugMode, args) = consumeDebugMode allArgs
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test] mDebugMode <-
1496.86 s
[opt-env-conf-test] - if debugMode
1496.86 s
[opt-env-conf-test] + if True
1496.86 s
[opt-env-conf-test] then Just <$> getTerminalCapabilitiesFromHandle stderr
1496.86 s
[opt-env-conf-test] else pure Nothing
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test] Negate at src/OptEnvConf/Main.hs:175:18-23
1496.86 s
[opt-env-conf-test] @@ -172,7 +172,7 @@
1496.86 s
[opt-env-conf-test] | x == arg -> (True, xs)
1496.86 s
[opt-env-conf-test] | otherwise ->
1496.86 s
[opt-env-conf-test] let (found, rest) = go xs
1496.86 s
[opt-env-conf-test] - in (found, x : rest)
1496.86 s
[opt-env-conf-test] + in (not found, x : rest)
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test] consumeDebugMode :: [String] -> (Bool, [String])
1496.86 s
[opt-env-conf-test] consumeDebugMode = consumeExactArg "--debug-optparse"
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Main.hs:175:18-23
1496.86 s
[opt-env-conf-test] @@ -172,7 +172,7 @@
1496.86 s
[opt-env-conf-test] | x == arg -> (True, xs)
1496.86 s
[opt-env-conf-test] | otherwise ->
1496.86 s
[opt-env-conf-test] let (found, rest) = go xs
1496.86 s
[opt-env-conf-test] - in (found, x : rest)
1496.86 s
[opt-env-conf-test] + in (False, x : rest)
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test] consumeDebugMode :: [String] -> (Bool, [String])
1496.86 s
[opt-env-conf-test] consumeDebugMode = consumeExactArg "--debug-optparse"
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:199:13-44
1496.86 s
[opt-env-conf-test] @@ -196,13 +196,12 @@
1496.86 s
[opt-env-conf-test] [] -> (caps, [])
1496.86 s
[opt-env-conf-test] (x : xs) ->
1496.86 s
[opt-env-conf-test] let t = T.pack x
1496.86 s
[opt-env-conf-test] in case T.stripPrefix "--settings-capabilitieTesting mutation ConstBool at src/OptEnvConf/Error.hs:55:41-51
1496.86 s
[opt-env-conf-test] @@ -52,7 +52,7 @@
1496.86 s
[opt-env-conf-test] ParseErrorEmpty -> True
1496.86 s
[opt-env-conf-test] ParseErrorEmptySetting -> False
1496.86 s
[opt-env-conf-test] ParseErrorNoReaders -> False
1496.86 s
[opt-env-conf-test] - ParseErrorCheckFailed forgivable _ -> forgivable
1496.86 s
[opt-env-conf-test] + ParseErrorCheckFailed forgivable _ -> False
1496.86 s
[opt-env-conf-test] ParseErrorMissingArgument _ -> True
1496.86 s
[opt-env-conf-test] ParseErrorArgumentRead _ _ -> False
1496.86 s
[opt-env-conf-test] ParseErrorMissingSwitch _ -> True
1496.86 s
[opt-env-conf-test] ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
1496.86 s
[opt-env-conf-test] - ParseErrorMissingConfVal md ->
1496.86 s
[opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md
1496.86 s
[opt-env-conf-test] - ParseErrorConfigRead md s ->
1496.86 s
[opt-env-conf-test] - ["Failed to parse configuration: "]
1496.86 s
[opt-env-conf-test] - : maybe [] renderConfDoc md
1496.86 s
[opt-env-conf-test] - ++ [[chunk $ T.pack s]]
1496.86 s
[opt-env-conf-test] - ParseErrorMissingCommand cs ->
1496.86 s
[opt-env-conf-test] - ["Missing command, available commands:"]
1496.86 s
[opt-env-conf-test] - : availableCommandsLines cs
1496.86 s
[opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs ->
1496.86 s
[opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
1496.86 s
[opt-env-conf-test] - [fore blue "available commands:"]
1496.86 s
[opt-env-conf-test] - ]
1496.86 s
[opt-env-conf-test] - ++ availableCommandsLines cs
1496.86 s
[opt-env-conf-test] - ParseErrorAllOrNothing locs ->
1496.86 s
[opt-env-conf-test] - [ ["You are seeing this error because at least one, but not all, of the settings in an allOrNothing (or subSettings) parser have been defined."],
1496.86 s
[opt-env-conf-test] - ["The following settings have been parsed:"]
1496.86 s
[opt-env-conf-test] - ]
1496.86 s
[opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs)
1496.86 s
[opt-env-conf-test] - ParseErrorUnrecognised leftovers ->
1496.86 s
[opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
1496.86 s
[opt-env-conf-test] - ParseErrorMissingCapability cap ->
1496.86 s
[opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]],
1496.86 s
[opt-env-conf-test] - maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc
1496.86 s
[opt-env-conf-test] ]
1496.86 s
[opt-env-conf-test]
1496.86 s
[opt-env-conf-test] availableCommandsLines :: [CommandDoc a] -> [[Chunk]]
1496.86 s
[opt-env-conf-test] availableCommandsLines = map $ \CommandDoc {..} ->
1496.86 s
[opt-env-conf-test] Testing mutation Negate at src/OptEnvConf/Error.hs:65:40-47
1496.86 s
[opt-env-conf-test] @@ -62,7 +62,7 @@
1496.86 s
[opt-env-conf-test] ParseErrorEnvRead _ _ -> False
1496.86 s
[opt-env-conf-test] ParseErrorMissingConfVal _ -> True
1496.86 s
[opt-env-conf-test] ParseErrorConfigRead _ _ -> False
1496.86 s
[opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs
1496.86 s
[opt-env-conf-test] + ParseErrorMissingCommand cs -> not $ not null cs
1496.86 s
[opt-env-conf-test] ParseErrorUnrecognisedCommand _ _ -> False
1496.86 s
[opt-env-conf-test] ParseErrorAllOrNothing _ -> False
1496.86 s
[opt-env-conf-test] ParseErrorUnrecognised _ -> False
1496.86 s
[opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Lint.hs:259:14-24
1496.86 s
[opt-env-conf-test] @@ -256,7 +256,7 @@
1496.86 s
[opt-env-conf-test] ParserAlt p1 p2 -> do
1496.86 s
[opt-env-conf-test] c1 <- go p1
1496.86 s
[opt-env-conf-test] c2 <- go p2
1496.86 s
[opt-env-conf-test] - pure (c1 && c2) -- TODO: is this right?
1496.86 s
[opt-env-conf-test] + pure False -- TODO: is this right?
1496.86 s
[opt-env-conf-test] -- TODO lint if we don't try to parse anything consuming under many.
1496.86 s
[opt-env-conf-test] ParserMany mLoc p -> do
1496.87 s
[opt-env-conf-test] c <- go p
1496.87 s
[opt-env-conf-test] s-disable-" t of
1496.87 s
[opt-env-conf-test] - Just capName -> go (disableCapability (Capability capName) caps) xs
1496.87 s
[opt-env-conf-test] Nothing -> case T.stripPrefix "--settings-capabilities-enable-" t of
1496.87 s
[opt-env-conf-test] Just capName -> go (enableCapability (Capability capName) caps) xs
1496.87 s
[opt-env-conf-test] Nothing ->
1496.87 s
[opt-env-conf-test] let (finalCaps, rest) = go caps xs
1496.87 s
[opt-env-conf-test] in (finalCaps, x : rest)
1496.87 s
[opt-env-conf-test]
1496.87 s
[opt-env-conf-test] -- Internal structure to help us do what the framework
1496.87 s
[opt-env-conf-test] -- is supposed to.
1496.87 s
[opt-env-conf-test]
1496.87 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Main.hs:201:26-44
1496.87 s
[opt-env-conf-test] @@ -198,11 +198,10 @@
1496.87 s
[opt-env-conf-test] let t = T.pack x
1496.87 s
[opt-env-conf-test] in case T.stripPrefix "--settings-capabilities-disable-" t of
1496.87 s
[opt-env-conf-test] Just capName -> go (disableCapability (Capability capName) caps) xs
1496.87 s
[opt-env-conf-test] Nothing -> case T.stripPrefix "--settings-capabilities-enable-" t of
1496.87 s
[opt-env-conf-test] - Just capName -> go (enableCapability (Capability capName) caps) xs
1496.87 s
[opt-env-conf-test] Nothing ->
1496.87 s
[opt-env-conf-test] let (finalCaps, rest) = go caps xs
1496.87 s
[opt-env-conf-test] in (finalCaps, x : rest)
1496.87 s
[opt-env-conf-test]
1496.87 s
[opt-env-conf-test] -- Internal structure to help us do what the framework
1496.87 s
[opt-env-conf-test] -- is supposed to.
1496.87 s
[opt-env-conf-test]
1496.87 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:440:44-42
1496.87 s
[opt-env-conf-test] @@ -437,21 +437,20 @@
1496.87 s
[opt-env-conf-test] Just (a, _) -> do
1496.87 s
[opt-env-conf-test] debug ["set to default value"]
1496.87 s
[opt-env-conf-test] pure a -- Don't mark as parsed
1496.87 s
[opt-env-conf-test] Nothing -> do
1496.87 s
[opt-env-conf-test] let parseResultError e res = case res of
1496.87 s
[opt-env-conf-test] NotRun -> Nothing
1496.87 s
[opt-env-conf-test] NotFound -> Just e
1496.87 s
[opt-env-conf-test] Found _ -> Nothing -- Should not happen.
1496.87 s
[opt-env-conf-test] - debug ["not found"]
1496.87 s
[opt-env-conf-test] maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $
1496.87 s
[opt-env-conf-test] NE.nonEmpty $
1496.87 s
[opt-env-conf-test] catMaybes
1496.87 s
[opt-env-conf-test] [ parseResultError (ParseErrorMissingArgument mOptDoc) mArg,
1496.87 s
[opt-env-conf-test] parseResultError (ParseErrorMissingSwitch mOptDoc) mSwitch,
1496.87 s
[opt-env-conf-test] parseResultError (ParseErrorMissingOption mOptDoc) mOpt,
1496.87 s
[opt-env-conf-test] parseResultError (ParseErrorMissingEnvVar mEnvDoc) mEnv,
1496.87 s
[opt-env-conf-test] parseResultError (ParseErrorMissingConfVal mConfDoc) mConf
1496.87 s
[opt-env-conf-test] ]
1496.87 s
[opt-env-conf-test]
1496.87 s
[opt-env-conf-test] withCapabilities ::
1496.87 s
[opt-env-conf-test] Maybe SrcLoc ->
1496.87 s
[opt-env-conf-test]
1496.87 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:441:64-59
1496.87 s
[opt-env-conf-test] @@ -438,10 +438,9 @@
1496.87 s
[opt-env-conf-test] debug ["set to default value"]
1496.87 s
[opt-env-conf-test] pure a -- Don't mark as parsed
1496.87 s
[opt-env-conf-test] Nothing -> do
1496.87 s
[opt-env-conf-test] let parseResultError e res = case res of
1496.87 s
[opt-env-conf-test] NotRun -> Nothing
1496.87 s
[opt-env-conf-test] NotFound -> Just e
1496.87 s
[opt-env-conf-test] - Found _ -> Nothing -- Should not happen.
1496.87 s
[opt-env-conf-test] debug ["not found"]
1496.87 s
[opt-env-conf-test] maybe (ppError mLoc ParseErrorEmptySetting) (ppErrors mLoc) $
1496.87 s
[opt-env-conf-test] NE.nonEmpty $
1496.87 s
[opt-env-conf-test]
1496.87 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:396:41-64
1496.87 s
[opt-env-conf-test] @@ -393,30 +393,29 @@
1496.87 s
[opt-env-conf-test] case mO' of
1496.87 s
[opt-env-conf-test] Nothing -> pure Nothing
1496.87 s
[opt-env-conf-test] Just o' -> jsonParser o' neRest
1496.87 s
[opt-env-conf-test] case JSON.parseEither (jsonParser obj) configValSettingPath of
1496.87 s
[opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err
1496.87 s
[opt-env-conf-test] Right mV -> case mV of
1496.87 s
[opt-env-conf-test] Nothing -> do
1496.87 s
[opt-env-conf-test] debug
1496.87 s
[opt-env-conf-test] [ "could not set based on config value, not configured: ",
1496.87 s
[opt-env-conf-test] chunk $ T.pack $ show $ NE.toList configValSettingPath
1496.87 s
[opt-env-conf-test] ]
1496.87 s
[opt-env-conf-test] pure Nothing
1496.87 s
[opt-env-conf-test] Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of
1496.87 s
[opt-env-conf-test] Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err
1496.87 s
[opt-env-conf-test] Right mA -> case mA of
1496.87 s
[opt-env-conf-test] Nothing -> do
1496.87 s
[opt-env-conf-test] debug
1496.87 s
[opt-env-conf-test] [ "could not set based on config value, configured to nothing: ",
1496.87 s
[opt-env-conf-test] chunk $ T.pack $ show $ NE.toList configValSettingPath
1496.87 s
[opt-env-conf-test] ]
1496.87 s
[opt-env-conf-test] pure Nothing
1496.87 s
[opt-env-conf-test] Just a -> do
1496.87 s
[opt-env-conf-test] debug
1496.87 s
[opt-env-conf-test] [ "set based on config value: ",
1496.87 s
[opt-env-conf-test] chunk $ T.pack $ show v
1496.87 s
[opt-env-conf-test] ]
1496.87 s
[opt-env-conf-test] pure $ Just a
1496.87 s
[opt-env-conf-test] let toRes = \case
1496.87 s
[opt-env-conf-test] Nothing -> NotFound
1496.87 s
[opt-env-conf-test] Just a -> Found a
1496.87 s
[opt-env-conf-test]
1496.87 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:405:55-64
1496.87 s
[opt-env-conf-test] @@ -402,21 +402,20 @@
1496.87 s
[opt-env-conf-test] chunk $ T.pack $ show $ NE.toList configValSettingPath
1496.87 s
[opt-env-conf-test] ]
1496.87 s
[opt-env-conf-test] pure Nothing
1496.87 s
[opt-env-conf-test] Just v -> case JSON.parseEither (parseJSONVia configValSettingCodec) v of
1496.87 s
[opt-env-conf-test] - Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err
1496.87 s
[opt-env-conf-test] Right mA -> case mA of
1496.87 s
[opt-env-conf-test] Nothing -> do
1496.87 s
[opt-env-conf-test] debug
1496.87 s
[opt-env-conf-test] [ "could not set based on config value, configured to nothing: ",
1496.87 s
[opt-env-conf-test] chunk $ T.pack $ show $ NE.toList configValSettingPath
1496.87 s
[opt-env-conf-test] ]
1496.87 s
[opt-env-conf-test] pure Nothing
1496.87 s
[opt-env-conf-test] Just a -> do
1496.87 s
[opt-env-conf-test] debug
1496.87 s
[opt-env-conf-test] [ "set based on config value: ",
1496.87 s
[opt-env-conf-test] chunk $ T.pack $ show v
1496.87 s
[opt-env-conf-test] ]
1496.87 s
[opt-env-conf-test] pure $ Just a
1496.87 s
[opt-env-conf-test] let toRes = \case
1496.88 s
[opt-env-conf-test] Nothing -> NotFound
1496.88 s
[opt-env-conf-test] Just a -> Found a
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:393:49-82
1496.88 s
[opt-env-conf-test] @@ -390,9 +390,8 @@
1496.88 s
[opt-env-conf-test] Just v -> Just <$> parseJSON v
1496.88 s
[opt-env-conf-test] Just neRest -> do
1496.88 s
[opt-env-conf-test] mO' <- o .:? Key.fromString k
1496.88 s
[opt-env-conf-test] case mO' of
1496.88 s
[opt-env-conf-test] - Nothing -> pure Nothing
1496.88 s
[opt-env-conf-test] Just o' -> jsonParser o' neRest
1496.88 s
[opt-env-conf-test] case JSON.parseEither (jsonParser obj) configValSettingPath of
1496.88 s
[opt-env-conf-test] Left err -> ppError mLoc $ ParseErrorConfigRead mConfDoc err
1496.88 s
[opt-env-conf-test] Right mV -> case mV of
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:224:38-20
1496.88 s
[opt-env-conf-test] @@ -221,15 +221,14 @@
1496.88 s
[opt-env-conf-test] Just c -> do
1496.88 s
[opt-env-conf-test] debug ["Set command to ", commandChunk (commandArg c)]
1496.88 s
[opt-env-conf-test] go $ commandParser c
1496.88 s
[opt-env-conf-test] ParserWithConfig mLoc pc pa -> do
1496.88 s
[opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc]
1496.88 s
[opt-env-conf-test] ppIndent $ do
1496.88 s
[opt-env-conf-test] debug ["loading config"]
1496.88 s
[opt-env-conf-test] mNewConfig <- ppIndent $ go pc
1496.88 s
[opt-env-conf-test] debug ["with loaded config"]
1496.88 s
[opt-env-conf-test] ppIndent $
1496.88 s
[opt-env-conf-test] local (\e -> e {ppEnvConf = mNewConfig}) $
1496.88 s
[opt-env-conf-test] go pa
1496.88 s
[opt-env-conf-test] ParserSetting mLoc set@Setting {..} -> do
1496.88 s
[opt-env-conf-test] debug [syntaxChunk "Setting", ": ", mSrcLocChunk mLoc]
1496.88 s
[opt-env-conf-test] when (not (Set.null settingRequiredCapabilities)) $
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:221:27-39
1496.88 s
[opt-env-conf-test] @@ -218,9 +218,8 @@
1496.88 s
[opt-env-conf-test] Just s -> do
1496.88 s
[opt-env-conf-test] case find ((== s) . commandArg) cs of
1496.88 s
[opt-env-conf-test] Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors
1496.88 s
[opt-env-conf-test] Just c -> do
1496.88 s
[opt-env-conf-test] - debug ["Set command to ", commandChunk (commandArg c)]
1496.88 s
[opt-env-conf-test] go $ commandParser c
1496.88 s
[opt-env-conf-test] ParserWithConfig mLoc pc pa -> do
1496.88 s
[opt-env-conf-test] debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc]
1496.88 s
[opt-env-conf-test] ppIndent $ do
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:215:28-40
1496.88 s
[opt-env-conf-test] @@ -212,9 +212,8 @@
1496.88 s
[opt-env-conf-test] find ((== d) . commandArg) cs
1496.88 s
[opt-env-conf-test] case mDefaultCommand of
1496.88 s
[opt-env-conf-test] Nothing -> ppError mLoc $ ParseErrorMissingCommand docsForErrors
1496.88 s
[opt-env-conf-test] Just dc -> do
1496.88 s
[opt-env-conf-test] - debug ["Choosing default command: ", commandChunk (commandArg dc)]
1496.88 s
[opt-env-conf-test] go $ commandParser dc
1496.88 s
[opt-env-conf-test] Just s -> do
1496.88 s
[opt-env-conf-test] case find ((== s) . commandArg) cs of
1496.88 s
[opt-env-conf-test] Nothing -> ppError mLoc $ ParseErrorUnrecognisedCommand s docsForErrors
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:195:29-70
1496.88 s
[opt-env-conf-test] @@ -192,9 +192,8 @@
1496.88 s
[opt-env-conf-test] withCapabilities mLoc requiredCapabilities capabilities $ do
1496.88 s
[opt-env-conf-test] errOrB <- liftIO $ f a
1496.88 s
[opt-env-conf-test] case errOrB of
1496.88 s
[opt-env-conf-test] Left err -> do
1496.88 s
[opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable]
1496.88 s
[opt-env-conf-test] ppError mLoc $ ParseErrorCheckFailed forgivable err
1496.88 s
[opt-env-conf-test] Right b -> do
1496.88 s
[opt-env-conf-test] debug ["succeeded"]
1496.88 s
[opt-env-conf-test] pure b
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Run.hs:197:56-66
1496.88 s
[opt-env-conf-test] @@ -194,7 +194,7 @@
1496.88 s
[opt-env-conf-test] case errOrB of
1496.88 s
[opt-env-conf-test] Left err -> do
1496.88 s
[opt-env-conf-test] debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable]
1496.88 s
[opt-env-conf-test] - ppError mLoc $ ParseErrorCheckFailed forgivable err
1496.88 s
[opt-env-conf-test] + ppError mLoc $ ParseErrorCheckFailed False err
1496.88 s
[opt-env-conf-test] Right b -> do
1496.88 s
[opt-env-conf-test] debug ["succeeded"]
1496.88 s
[opt-env-conf-test] pure b
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:196:25-83
1496.88 s
[opt-env-conf-test] @@ -193,7 +193,6 @@
1496.88 s
[opt-env-conf-test] errOrB <- liftIO $ f a
1496.88 s
[opt-env-conf-test] case errOrB of
1496.88 s
[opt-env-conf-test] Left err -> do
1496.88 s
[opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable]
1496.88 s
[opt-env-conf-test] ppError mLoc $ ParseErrorCheckFailed forgivable err
1496.88 s
[opt-env-conf-test] Right b -> do
1496.88 s
[opt-env-conf-test] debug ["succeeded"]
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:196:25-83
1496.88 s
[opt-env-conf-test] @@ -193,7 +193,6 @@
1496.88 s
[opt-env-conf-test] errOrB <- liftIO $ f a
1496.88 s
[opt-env-conf-test] case errOrB of
1496.88 s
[opt-env-conf-test] Left err -> do
1496.88 s
[opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable]
1496.88 s
[opt-env-conf-test] ppError mLoc $ ParseErrorCheckFailed forgivable err
1496.88 s
[opt-env-conf-test] Right b -> do
1496.88 s
[opt-env-conf-test] debug ["succeeded"]
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] Negate at src/OptEnvConf/Run.hs:196:72-82
1496.88 s
[opt-env-conf-test] @@ -193,7 +193,7 @@
1496.88 s
[opt-env-conf-test] errOrB <- liftIO $ f a
1496.88 s
[opt-env-conf-test] case errOrB of
1496.88 s
[opt-env-conf-test] Left err -> do
1496.88 s
[opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable]
1496.88 s
[opt-env-conf-test] + debug ["failed, forgivable: ", chunk $ T.pack $ show not forgivable]
1496.88 s
[opt-env-conf-test] ppError mLoc $ ParseErrorCheckFailed forgivable err
1496.88 s
[opt-env-conf-test] Right b -> do
1496.88 s
[opt-env-conf-test] debug ["succeeded"]
1496.88 s
[opt-env-conf-test]
1496.88 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Run.hs:196:72-82
1496.88 s
[opt-env-conf-test] @@ -193,7 +193,7 @@
1496.88 s
[opt-env-conf-test] errOrB <- liftIO $ f a
1496.89 s
[opt-env-conf-test] case errOrB of
1496.89 s
[opt-env-conf-test] Left err -> do
1496.89 s
[opt-env-conf-test] - debug ["failed, forgivable: ", chunk $ T.pack $ show forgivable]
1496.89 s
[opt-env-conf-test] + debug ["failed, forgivable: ", chunk $ T.pack $ show True]
1496.89 s
[opt-env-conf-test] ppError mLoc $ ParseErrorCheckFailed forgivable err
1496.89 s
[opt-env-conf-test] Right b -> do
1496.89 s
[opt-env-conf-test] debug ["succeeded"]
1496.89 s
[opt-env-conf-test]
1496.89 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:150:37-112
1496.89 s
[opt-env-conf-test] @@ -147,34 +147,33 @@
1496.89 s
[opt-env-conf-test] debug ["First element of some succeeded, continuing with Many"]
1496.89 s
[opt-env-conf-test] as <- go (ParserMany mLoc p')
1496.89 s
[opt-env-conf-test] pure (a :| as)
1496.89 s
[opt-env-conf-test] ParserAllOrNothing mLoc p' -> do
1496.89 s
[opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc]
1496.89 s
[opt-env-conf-test] ppIndent $ do
1496.89 s
[opt-env-conf-test] e <- ask
1496.89 s
[opt-env-conf-test] s <- get
1496.89 s
[opt-env-conf-test] results <- liftIO $ runPP (go p') s e
1496.89 s
[opt-env-conf-test] (result, s') <- ppNonDetList results
1496.89 s
[opt-env-conf-test] put s'
1496.89 s
[opt-env-conf-test] case result of
1496.89 s
[opt-env-conf-test] Success a -> pure a
1496.89 s
[opt-env-conf-test] Failure errs -> do
1496.89 s
[opt-env-conf-test] if not $ all errorIsForgivable errs
1496.89 s
[opt-env-conf-test] then ppErrors' errs
1496.89 s
[opt-env-conf-test] else do
1496.89 s
[opt-env-conf-test] -- Settings available below
1496.89 s
[opt-env-conf-test] let settingsMap = parserSettingsMap p'
1496.89 s
[opt-env-conf-test] -- Settings that have been parsed
1496.89 s
[opt-env-conf-test] parsedMap <- gets ppStateParsedSettings
1496.89 s
[opt-env-conf-test] -- Settings that have been parsed below
1496.89 s
[opt-env-conf-test] let parsedSettingsMap = settingsMap `M.intersection` parsedMap
1496.89 s
[opt-env-conf-test] -- If any settings have been parsed below, and parsing still failed
1496.89 s
[opt-env-conf-test] -- (this is the case because we're in the failure branch)
1496.89 s
[opt-env-conf-test] -- with only forgivable errors
1496.89 s
[opt-env-conf-test] -- (this is the case because we're in the branch where that's been checked)
1496.89 s
[opt-env-conf-test] -- then this should be an unforgivable error.
1496.89 s
[opt-env-conf-test] if null parsedSettingsMap
1496.89 s
[opt-env-conf-test] then ppErrors' errs
1496.89 s
[opt-env-conf-test] else ppErrors' $ errs <> (ParseError mLoc (ParseErrorAllOrNothing parsedSettingsMap) :| [])
1496.89 s
[opt-env-conf-test] ParserCheck mLoc forgivable requiredCapabilities f p' -> do
1496.89 s
[opt-env-conf-test] debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc]
1496.89 s
[opt-env-conf-test] when (not (Set.null requiredCapabilities)) $
1496.89 s
[opt-env-conf-test]
1496.89 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Run.hs:161:18-50
1496.89 s
[opt-env-conf-test] @@ -158,7 +158,7 @@
1496.89 s
[opt-env-conf-test] case result of
1496.89 s
[opt-env-conf-test] Success a -> pure a
1496.89 s
[opt-env-conf-test] Failure errs -> do
1496.89 s
[opt-env-conf-test] - if not $ all errorIsForgivable errs
1496.89 s
[opt-env-conf-test] + if False
1496.89 s
[opt-env-conf-test] then ppErrors' errs
1496.89 s
[opt-env-conf-test] else do
1496.89 s
[opt-env-conf-test] -- Settings available below
1496.89 s
[opt-env-conf-test]
1496.89 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Run.hs:161:24-50
1496.89 s
[opt-env-conf-test] @@ -158,7 +158,7 @@
1496.89 s
[opt-env-conf-test] case result of
1496.89 s
[opt-env-conf-test] Success a -> pure a
1496.89 s
[opt-env-conf-test] Failure errs -> do
1496.89 s
[opt-env-conf-test] - if not $ all errorIsForgivable errs
1496.89 s
[opt-env-conf-test] + if not $ True
1496.89 s
[opt-env-conf-test] then ppErrors' errs
1496.89 s
[opt-env-conf-test] else do
1496.89 s
[opt-env-conf-test] -- Settings available below
1496.89 s
[opt-env-conf-test]
1496.89 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:143:29-25
1496.89 s
[opt-env-conf-test] @@ -140,13 +140,12 @@
1496.89 s
[opt-env-conf-test] Just a -> do
1496.89 s
[opt-env-conf-test] as <- go (ParserMany mLoc p')
1496.89 s
[opt-env-conf-test] pure (a : as)
1496.89 s
[opt-env-conf-test] ParserSome mLoc p' -> do
1496.89 s
[opt-env-conf-test] - debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc]
1496.89 s
[opt-env-conf-test] ppIndent $ do
1496.89 s
[opt-env-conf-test] a <- go p'
1496.89 s
[opt-env-conf-test] debug ["First element of some succeeded, continuing with Many"]
1496.89 s
[opt-env-conf-test] as <- go (ParserMany mLoc p')
1496.89 s
[opt-env-conf-test] pure (a :| as)
1496.89 s
[opt-env-conf-test] ParserAllOrNothing mLoc p' -> do
1496.89 s
[opt-env-conf-test] debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc]
1496.89 s
[opt-env-conf-test] ppIndent $ do
1496.89 s
[opt-env-conf-test]
1496.89 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:134:29-28
1496.89 s
[opt-env-conf-test] @@ -131,15 +131,14 @@
1496.89 s
[opt-env-conf-test] Nothing -> do
1496.89 s
[opt-env-conf-test] debug ["Left side failed, trying right side."]
1496.89 s
[opt-env-conf-test] ppIndent $ go p2
1496.89 s
[opt-env-conf-test] ParserMany mLoc p' -> do
1496.89 s
[opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc]
1496.89 s
[opt-env-conf-test] ppIndent $ do
1496.89 s
[opt-env-conf-test] eor <- tryPP $ go p'
1496.89 s
[opt-env-conf-test] case eor of
1496.89 s
[opt-env-conf-test] Nothing -> pure []
1496.89 s
[opt-env-conf-test] Just a -> do
1496.89 s
[opt-env-conf-test] as <- go (ParserMany mLoc p')
1496.89 s
[opt-env-conf-test] pure (a : as)
1496.89 s
[opt-env-conf-test] ParserSome mLoc p' -> do
1496.89 s
[opt-env-conf-test] debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc]
1496.89 s
[opt-env-conf-test] ppIndent $ do
1496.89 s
[opt-env-conf-test]
1496.89 s
[opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:135:15-60
1496.89 s
[opt-env-conf-test] @@ -132,7 +132,6 @@
1496.89 s
[opt-env-conf-test] debug ["Left side failed, trying right side."]
1496.89 s
[opt-env-conf-test] ppIndent $ go p2
1496.89 s
[opt-env-conf-test] ParserMany mLoc p' -> do
1496.89 s
[opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc]
1496.89 s
[opt-env-conf-test] ppIndent $ do
1496.89 s
[opt-env-conf-test] eor <- tryPP $ go p'
1496.89 s
[opt-env-conf-test] case eor of
1496.89 s
[opt-env-conf-test]
1496.89 s
[opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:135:15-60
1496.89 s
[opt-env-conf-test] @@ -132,7 +132,6 @@
1496.89 s
[opt-env-conf-test] debug ["Left side failed, trying right side."]
1496.89 s
[opt-env-conf-test] ppIndent $ go p2
1496.89 s
[opt-env-conf-test] ParserMany mLoc p' -> do
1496.89 s
[opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc]
1496.89 s
[opt-env-conf-test] ppIndent $ do
1496.89 s
[opt-env-conf-test] eor <- tryPP $ go p'
1496.89 s
[opt-env-conf-test] case eor of
1496.89 s
[opt-env-conf-test]
1496.89 s
[opt-env-conf-test] ListLit at src/OptEnvConf/Run.hs:135:15-60
1496.89 s
[opt-env-conf-test] @@ -132,7 +132,6 @@
1496.89 s
[opt-env-conf-test] debug ["Left side failed, trying right side."]
1496.89 s
[opt-env-conf-test] ppIndent $ go p2
1496.89 s
[opt-env-conf-test] ParserMany mLoc p' -> do
1496.89 s
[opt-env-conf-test] - debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc]
1496.89 s
[opt-env-conf-test] ppIndent $ do
1496.89 s
[opt-env-conf-test] eor <- tryPP $ go p'
1496.89 s
[opt-env-conf-test] case eor of
1496.89 s
[opt-env-conf-test]
1496.89 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:122:26-31
1496.89 s
[opt-env-conf-test] @@ -119,18 +119,17 @@
1496.89 s
[opt-env-conf-test] ParserSelect fe ff -> do
1496.89 s
[opt-env-conf-test] debug [syntaxChunk "Select"]
1496.89 s
[opt-env-conf-test] ppIndent $ select (go fe) (go ff)
1496.89 s
[opt-env-conf-test] ParserAlt p1 p2 -> do
1496.89 s
[opt-env-conf-test] - debug [syntaxChunk "Alt"]
1496.89 s
[opt-env-conf-test] ppIndent $ do
1496.89 s
[opt-env-conf-test] debug ["Trying left side."]
1496.89 s
[opt-env-conf-test] eor <- ppIndent $ tryPP (go p1)
1496.89 s
[opt-env-conf-test] case eor of
1496.89 s
[opt-env-conf-test] Just a -> do
1496.89 s
[opt-env-conf-test] debug ["Left side succeeded."]
1496.89 s
[opt-env-conf-test] pure a
1496.89 s
[opt-env-conf-test] Nothing -> do
1496.89 s
[opt-env-conf-test] debug ["Left side failed, trying right side."]
1496.90 s
[opt-env-conf-test] ppIndent $ go p2
1496.90 s
[opt-env-conf-test] ParserMany mLoc p' -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ do
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:131:24-31
1496.90 s
[opt-env-conf-test] @@ -128,9 +128,8 @@
1496.90 s
[opt-env-conf-test] Just a -> do
1496.90 s
[opt-env-conf-test] debug ["Left side succeeded."]
1496.90 s
[opt-env-conf-test] pure a
1496.90 s
[opt-env-conf-test] Nothing -> do
1496.90 s
[opt-env-conf-test] - debug ["Left side failed, trying right side."]
1496.90 s
[opt-env-conf-test] ppIndent $ go p2
1496.90 s
[opt-env-conf-test] ParserMany mLoc p' -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ do
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:119:29-42
1496.90 s
[opt-env-conf-test] @@ -116,9 +116,8 @@
1496.90 s
[opt-env-conf-test] ParserEmpty mLoc -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppError mLoc ParseErrorEmpty
1496.90 s
[opt-env-conf-test] ParserSelect fe ff -> do
1496.90 s
[opt-env-conf-test] - debug [syntaxChunk "Select"]
1496.90 s
[opt-env-conf-test] ppIndent $ select (go fe) (go ff)
1496.90 s
[opt-env-conf-test] ParserAlt p1 p2 -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Alt"]
1496.90 s
[opt-env-conf-test] ppIndent $ do
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:116:27-37
1496.90 s
[opt-env-conf-test] @@ -113,9 +113,8 @@
1496.90 s
[opt-env-conf-test] ParserAp ff fa -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Ap"]
1496.90 s
[opt-env-conf-test] ppIndent $ go ff <*> go fa
1496.90 s
[opt-env-conf-test] ParserEmpty mLoc -> do
1496.90 s
[opt-env-conf-test] - debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppError mLoc ParseErrorEmpty
1496.90 s
[opt-env-conf-test] ParserSelect fe ff -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Select"]
1496.90 s
[opt-env-conf-test] ppIndent $ select (go fe) (go ff)
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:113:25-35
1496.90 s
[opt-env-conf-test] @@ -110,9 +110,8 @@
1496.90 s
[opt-env-conf-test] ParserPure a -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "pure value"]
1496.90 s
[opt-env-conf-test] pure a
1496.90 s
[opt-env-conf-test] ParserAp ff fa -> do
1496.90 s
[opt-env-conf-test] - debug [syntaxChunk "Ap"]
1496.90 s
[opt-env-conf-test] ppIndent $ go ff <*> go fa
1496.90 s
[opt-env-conf-test] ParserEmpty mLoc -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppError mLoc ParseErrorEmpty
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:84:3-26
1496.90 s
[opt-env-conf-test] @@ -81,27 +81,26 @@
1496.90 s
[opt-env-conf-test] Nothing -> pure result
1496.90 s
[opt-env-conf-test] Just leftovers -> ppError Nothing $ ParseErrorUnrecognised leftovers
1496.90 s
[opt-env-conf-test] mTup <- runPPLazy go' ppState ppEnv
1496.90 s
[opt-env-conf-test] case mTup of
1496.90 s
[opt-env-conf-test] - Nothing -> error "TODO figure out when this list can be empty"
1496.90 s
[opt-env-conf-test] Just ((errOrRes, _), nexts) -> case errOrRes of
1496.90 s
[opt-env-conf-test] Success a -> pure (Right a)
1496.90 s
[opt-env-conf-test] Failure firstErrors ->
1496.90 s
[opt-env-conf-test] let goNexts ns = do
1496.90 s
[opt-env-conf-test] -- TODO: Consider keeping around all errors?
1496.90 s
[opt-env-conf-test] mNext <- runNonDetTLazy ns
1496.90 s
[opt-env-conf-test] case mNext of
1496.90 s
[opt-env-conf-test] Nothing ->
1496.90 s
[opt-env-conf-test] pure $
1496.90 s
[opt-env-conf-test] Left $
1496.90 s
[opt-env-conf-test] -- Only show source locations in debug mode.
1496.90 s
[opt-env-conf-test] let f = case mDebugMode of
1496.90 s
[opt-env-conf-test] Nothing -> eraseErrorSrcLocs
1496.90 s
[opt-env-conf-test] Just _ -> id
1496.90 s
[opt-env-conf-test] in f firstErrors
1496.90 s
[opt-env-conf-test] Just ((eOR, _), ns') -> case eOR of
1496.90 s
[opt-env-conf-test] Success a -> pure (Right a)
1496.90 s
[opt-env-conf-test] Failure _ -> goNexts ns'
1496.90 s
[opt-env-conf-test] in goNexts nexts
1496.90 s
[opt-env-conf-test] where
1496.90 s
[opt-env-conf-test] go ::
1496.90 s
[opt-env-conf-test] Parser a ->
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:464:22-66
1496.90 s
[opt-env-conf-test] @@ -461,11 +461,8 @@
1496.90 s
[opt-env-conf-test] PP a
1496.90 s
[opt-env-conf-test] withCapabilities mLoc requiredCapabilities capabilities func =
1496.90 s
[opt-env-conf-test] case missingCapabilities capabilities requiredCapabilities of
1496.90 s
[opt-env-conf-test] Just missings -> do
1496.90 s
[opt-env-conf-test] - debug $
1496.90 s
[opt-env-conf-test] - "Missing capabilities: "
1496.90 s
[opt-env-conf-test] - : capabilitiesChunks (Set.fromList (NE.toList missings))
1496.90 s
[opt-env-conf-test] ppErrors mLoc $ NE.map ParseErrorMissingCapability missings
1496.90 s
[opt-env-conf-test] Nothing -> func
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] data ParseResult a
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:477:21-21
1496.90 s
[opt-env-conf-test] @@ -474,9 +474,8 @@
1496.90 s
[opt-env-conf-test] | Found a
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] requireReaders :: [Reader a] -> PP (NonEmpty (Reader a))
1496.90 s
[opt-env-conf-test] requireReaders rs = case NE.nonEmpty rs of
1496.90 s
[opt-env-conf-test] - Nothing -> ppError Nothing ParseErrorNoReaders
1496.90 s
[opt-env-conf-test] Just ne -> pure ne
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] -- Try the readers in order
1496.90 s
[opt-env-conf-test] tryReaders :: NonEmpty (Reader a) -> String -> Either (NonEmpty String) a
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:568:44-43
1496.90 s
[opt-env-conf-test] @@ -565,12 +565,11 @@
1496.90 s
[opt-env-conf-test] ParserCheck mLoc _ _ _ p' -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ go p'
1496.90 s
[opt-env-conf-test] ParserWithConfig mLoc pc pa -> do
1496.90 s
[opt-env-conf-test] - debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ do
1496.90 s
[opt-env-conf-test] mNewConfig <- go pc
1496.90 s
[opt-env-conf-test] mRes <- go pa
1496.90 s
[opt-env-conf-test] pure $ mRes <|> mNewConfig -- Reverse order
1496.90 s
[opt-env-conf-test] ParserSetting mLoc _ -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Setting", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] pure Nothing
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:565:42-31
1496.90 s
[opt-env-conf-test] @@ -562,9 +562,8 @@
1496.90 s
[opt-env-conf-test] ParserAllOrNothing mLoc p' -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ go p'
1496.90 s
[opt-env-conf-test] ParserCheck mLoc _ _ _ p' -> do
1496.90 s
[opt-env-conf-test] - debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ go p'
1496.90 s
[opt-env-conf-test] ParserWithConfig mLoc pc pa -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "WithConfig", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ do
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:562:43-31
1496.90 s
[opt-env-conf-test] @@ -559,9 +559,8 @@
1496.90 s
[opt-env-conf-test] ParserSome mLoc p' -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Some", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ go p'
1496.90 s
[opt-env-conf-test] ParserAllOrNothing mLoc p' -> do
1496.90 s
[opt-env-conf-test] - debug [syntaxChunk "AllOrNothing", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ go p'
1496.90 s
[opt-env-conf-test] ParserCheck mLoc _ _ _ p' -> do
1496.90 s
[opt-env-conf-test] debug [syntaxChunk "Parser with check", ": ", mSrcLocChunk mLoc]
1496.90 s
[opt-env-conf-test] ppIndent $ go p'
1496.90 s
[opt-env-conf-test]
1496.90 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:544:32-37
1496.91 s
[opt-env-conf-test] @@ -541,18 +541,17 @@
1496.91 s
[opt-env-conf-test] ParserEmpty mLoc -> do
1496.91 s
[opt-env-conf-test] debug [syntaxChunk "Empty", ": ", mSrcLocChunk mLoc]
1496.91 s
[opt-env-conf-test] pure Nothing
1496.91 s
[opt-env-conf-test] ParserAlt p1 p2 -> do
1496.91 s
[opt-env-conf-test] - debug [syntaxChunk "Alt"]
1496.91 s
[opt-env-conf-test] ppIndent $ do
1496.91 s
[opt-env-conf-test] debug ["Trying left side."]
1496.91 s
[opt-env-conf-test] eor <- ppIndent $ tryPP (go p1)
1496.91 s
[opt-env-conf-test] case eor of
1496.91 s
[opt-env-conf-test] Just a -> do
1496.91 s
[opt-env-conf-test] debug ["Left side succeeded."]
1496.91 s
[opt-env-conf-test] pure a
1496.91 s
[opt-env-conf-test] Nothing -> do
1496.91 s
[opt-env-conf-test] debug ["Left side failed, trying right side."]
1496.91 s
[opt-env-conf-test] ppIndent $ go p2
1496.91 s
[opt-env-conf-test] ParserMany mLoc p' -> do
1496.91 s
[opt-env-conf-test] debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc]
1496.91 s
[opt-env-conf-test] ppIndent $ go p'
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:549:17-37
1496.91 s
[opt-env-conf-test] @@ -546,13 +546,10 @@
1496.91 s
[opt-env-conf-test] ppIndent $ do
1496.91 s
[opt-env-conf-test] debug ["Trying left side."]
1496.91 s
[opt-env-conf-test] eor <- ppIndent $ tryPP (go p1)
1496.91 s
[opt-env-conf-test] case eor of
1496.91 s
[opt-env-conf-test] Just a -> do
1496.91 s
[opt-env-conf-test] debug ["Left side succeeded."]
1496.91 s
[opt-env-conf-test] pure a
1496.91 s
[opt-env-conf-test] - Nothing -> do
1496.91 s
[opt-env-conf-test] - debug ["Left side failed, trying right side."]
1496.91 s
[opt-env-conf-test] - ppIndent $ go p2
1496.91 s
[opt-env-conf-test] ParserMany mLoc p' -> do
1496.91 s
[opt-env-conf-test] debug [syntaxChunk "Many", ": ", mSrcLocChunk mLoc]
1496.91 s
[opt-env-conf-test] ppIndent $ go p'
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Run.hs:529:31-33
1496.91 s
[opt-env-conf-test] @@ -526,12 +526,11 @@
1496.91 s
[opt-env-conf-test] ParserPure _ -> do
1496.91 s
[opt-env-conf-test] debug [syntaxChunk "pure value"]
1496.91 s
[opt-env-conf-test] pure Nothing
1496.91 s
[opt-env-conf-test] ParserAp ff fa -> do
1496.91 s
[opt-env-conf-test] - debug [syntaxChunk "Ap"]
1496.91 s
[opt-env-conf-test] ppIndent $ do
1496.91 s
[opt-env-conf-test] mf <- go ff
1496.91 s
[opt-env-conf-test] ma <- go fa
1496.91 s
[opt-env-conf-test] pure $ ma <|> mf -- Reverse order
1496.91 s
[opt-env-conf-test] ParserSelect fe ff -> do
1496.91 s
[opt-env-conf-test] debug [syntaxChunk "Select"]
1496.91 s
[opt-env-conf-test] ppIndent $ do
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:514:3-35
1496.91 s
[opt-env-conf-test] @@ -511,11 +511,10 @@
1496.91 s
[opt-env-conf-test] ppEnvIndent = 0
1496.91 s
[opt-env-conf-test] }
1496.91 s
[opt-env-conf-test] mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv
1496.91 s
[opt-env-conf-test] case mResOrNext of
1496.91 s
[opt-env-conf-test] - Nothing -> pure $ Right Nothing
1496.91 s
[opt-env-conf-test] Just ((result, _), _) -> pure $ case result of
1496.91 s
[opt-env-conf-test] Failure errs -> Left errs
1496.91 s
[opt-env-conf-test] Success mDocs -> Right mDocs
1496.91 s
[opt-env-conf-test] where
1496.91 s
[opt-env-conf-test] -- We try to parse the commands as deep as possible and ignore everything else.
1496.91 s
[opt-env-conf-test] go' :: [String] -> Parser a -> PP (Maybe ([String], CommandDoc (Maybe SetDoc)))
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Run.hs:516:37-35
1496.91 s
[opt-env-conf-test] @@ -513,9 +513,8 @@
1496.91 s
[opt-env-conf-test] mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv
1496.91 s
[opt-env-conf-test] case mResOrNext of
1496.91 s
[opt-env-conf-test] Nothing -> pure $ Right Nothing
1496.91 s
[opt-env-conf-test] Just ((result, _), _) -> pure $ case result of
1496.91 s
[opt-env-conf-test] - Failure errs -> Left errs
1496.91 s
[opt-env-conf-test] Success mDocs -> Right mDocs
1496.91 s
[opt-env-conf-test] where
1496.91 s
[opt-env-conf-test] -- We try to parse the commands as deep as possible and ignore everything else.
1496.91 s
[opt-env-conf-test] go' :: [String] -> Parser a -> PP (Maybe ([String], CommandDoc (Maybe SetDoc)))
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] IntLit at src/OptEnvConf/Run.hs:511:27-28
1496.91 s
[opt-env-conf-test] @@ -508,7 +508,7 @@
1496.91 s
[opt-env-conf-test] { ppEnvEnv = EnvMap.empty,
1496.91 s
[opt-env-conf-test] ppEnvConf = Nothing,
1496.91 s
[opt-env-conf-test] ppEnvDebug = mDebugMode,
1496.91 s
[opt-env-conf-test] - ppEnvIndent = 0
1496.91 s
[opt-env-conf-test] + ppEnvIndent = 1
1496.91 s
[opt-env-conf-test] }
1496.91 s
[opt-env-conf-test] mResOrNext <- runPPLazy (go' [] parser) ppState ppEnv
1496.91 s
[opt-env-conf-test] case mResOrNext of
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Doc.hs:370:15-16
1496.91 s
[opt-env-conf-test] @@ -367,11 +367,10 @@
1496.91 s
[opt-env-conf-test] | not (null commandDocs)
1496.91 s
[opt-env-conf-test] ],
1496.91 s
[opt-env-conf-test] concat
1496.91 s
[opt-env-conf-test] [ [ headerChunks "Options",
1496.91 s
[opt-env-conf-test] renderLongOptDocs optDocs
1496.91 s
[opt-env-conf-test] ]
1496.91 s
[opt-env-conf-test] - | not (nullDocs optDocs)
1496.91 s
[opt-env-conf-test] ],
1496.91 s
[opt-env-conf-test] concat
1496.91 s
[opt-env-conf-test] [ [ headerChunks "Environment Variables",
1496.91 s
[opt-env-conf-test] renderEnvDocs envDocs
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:373:17-39
1496.91 s
[opt-env-conf-test] @@ -370,7 +370,7 @@
1496.91 s
[opt-env-conf-test] [ [ headerChunks "Options",
1496.91 s
[opt-env-conf-test] renderLongOptDocs optDocs
1496.91 s
[opt-env-conf-test] ]
1496.91 s
[opt-env-conf-test] - | not (nullDocs optDocs)
1496.91 s
[opt-env-conf-test] + | True
1496.91 s
[opt-env-conf-test] ],
1496.91 s
[opt-env-conf-test] concat
1496.91 s
[opt-env-conf-test] [ [ headerChunks "Environment Variables",
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] RemoveAction at src/OptEnvConf/Doc.hs:329:15-16
1496.91 s
[opt-env-conf-test] @@ -326,11 +326,10 @@
1496.91 s
[opt-env-conf-test] | not (null commandDocs)
1496.91 s
[opt-env-conf-test] ],
1496.91 s
[opt-env-conf-test] concat
1496.91 s
[opt-env-conf-test] [ [ [".Sh ", "OPTIONS"],
1496.91 s
[opt-env-conf-test] renderLongOptDocs optDocs
1496.91 s
[opt-env-conf-test] ]
1496.91 s
[opt-env-conf-test] - | not (nullDocs optDocs)
1496.91 s
[opt-env-conf-test] ],
1496.91 s
[opt-env-conf-test] concat
1496.91 s
[opt-env-conf-test] [ [ [".Sh ", "ENVIRONMENT VARIABLES"],
1496.91 s
[opt-env-conf-test] renderEnvDocs envDocs
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:332:17-39
1496.91 s
[opt-env-conf-test] @@ -329,7 +329,7 @@
1496.91 s
[opt-env-conf-test] [ [ [".Sh ", "OPTIONS"],
1496.91 s
[opt-env-conf-test] renderLongOptDocs optDocs
1496.91 s
[opt-env-conf-test] ]
1496.91 s
[opt-env-conf-test] - | not (nullDocs optDocs)
1496.91 s
[opt-env-conf-test] + | True
1496.91 s
[opt-env-conf-test] ],
1496.91 s
[opt-env-conf-test] concat
1496.91 s
[opt-env-conf-test] [ [ [".Sh ", "ENVIRONMENT VARIABLES"],
1496.91 s
[opt-env-conf-test]
1496.91 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:568:9-20
1496.91 s
[opt-env-conf-test] @@ -565,21 +565,20 @@
1496.91 s
[opt-env-conf-test] [] -> []
1496.91 s
[opt-env-conf-test] [d] -> go isTopLevel d
1496.91 s
[opt-env-conf-test] (AnyDocsSingle d : ds) ->
1496.91 s
[opt-env-conf-test] case setDocHelp d of
1496.91 s
[opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds
1496.91 s
[opt-env-conf-test] Just h ->
1496.91 s
[opt-env-conf-test] let (sds, rest) = goSameHelp h ds
1496.91 s
[opt-env-conf-test] in concat
1496.91 s
[opt-env-conf-test] [ concat
1496.91 s
[opt-env-conf-test] [ concat
1496.92 s
[opt-env-conf-test] [ indent $ renderSetDocHeader (Just h),
1496.92 s
[opt-env-conf-test] indent $ concatMap renderSetDocWithoutHeader $ d : sds,
1496.92 s
[opt-env-conf-test] [[]]
1496.92 s
[opt-env-conf-test] ]
1496.92 s
[opt-env-conf-test] | not isTopLevel
1496.92 s
[opt-env-conf-test] ],
1496.92 s
[opt-env-conf-test] goOr isTopLevel rest
1496.92 s
[opt-env-conf-test] ]
1496.92 s
[opt-env-conf-test] (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds
1496.92 s
[opt-env-conf-test] goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc])
1496.92 s
[opt-env-conf-test] goSameHelp h = \case
1496.92 s
[opt-env-conf-test]
1496.92 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:581:26-36
1496.92 s
[opt-env-conf-test] @@ -578,7 +578,7 @@
1496.92 s
[opt-env-conf-test] ]
1496.92 s
[opt-env-conf-test] | not isTopLevel
1496.92 s
[opt-env-conf-test] ],
1496.92 s
[opt-env-conf-test] - goOr isTopLevel rest
1496.92 s
[opt-env-conf-test] + goOr True rest
1496.92 s
[opt-env-conf-test] ]
1496.92 s
[opt-env-conf-test] (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds
1496.92 s
[opt-env-conf-test] goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc])
1496.92 s
[opt-env-conf-test]
1496.92 s
[opt-env-conf-test] Negate at src/OptEnvConf/Doc.hs:566:17-27
1496.92 s
[opt-env-conf-test] @@ -563,7 +563,7 @@
1496.92 s
[opt-env-conf-test] goOr :: Bool -> [AnyDocs SetDoc] -> [[Chunk]]
1496.92 s
[opt-env-conf-test] goOr isTopLevel = \case
1496.92 s
[opt-env-conf-test] [] -> []
1496.92 s
[opt-env-conf-test] - [d] -> go isTopLevel d
1496.92 s
[opt-env-conf-test] + [d] -> go not isTopLevel d
1496.92 s
[opt-env-conf-test] (AnyDocsSingle d : ds) ->
1496.92 s
[opt-env-conf-test] case setDocHelp d of
1496.92 s
[opt-env-conf-test] Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds
1496.92 s
[opt-env-conf-test]
1496.92 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:566:17-27
1496.92 s
[opt-env-conf-test] @@ -563,7 +563,7 @@
1496.92 s
[opt-env-conf-test] goOr :: Bool -> [AnyDocs SetDoc] -> [[Chunk]]
1496.92 s
[opt-env-conf-test] goOr isTopLevel = \case
1496.92 s
[opt-env-conf-test] [] -> []
1496.92 s
[opt-env-conf-test] - [d] -> go isTopLevel d
1496.92 s
[opt-env-conf-test] + [d] -> go True d
1496.92 s
[opt-env-conf-test] (AnyDocsSingle d : ds) ->
1496.92 s
[opt-env-conf-test] case setDocHelp d of
1496.92 s
[opt-env-conf-test] Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds
1496.92 s
[opt-env-conf-test]
1496.92 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:588:12-34
1496.92 s
[opt-env-conf-test] @@ -585,7 +585,7 @@
1496.92 s
[opt-env-conf-test] goSameHelp h = \case
1496.92 s
[opt-env-conf-test] [] -> ([], [])
1496.92 s
[opt-env-conf-test] (AnyDocsSingle d : ds) ->
1496.92 s
[opt-env-conf-test] - if setDocHelp d == Just h
1496.92 s
[opt-env-conf-test] + if True
1496.92 s
[opt-env-conf-test] then
1496.92 s
[opt-env-conf-test] let (sds, rest) = goSameHelp h ds
1496.92 s
[opt-env-conf-test] in (d : sds, rest)
1496.92 s
[opt-env-conf-test]
1496.92 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:532:13-50
1496.92 s
[opt-env-conf-test] @@ -529,12 +529,11 @@
1496.92 s
[opt-env-conf-test] [] -> []
1496.92 s
[opt-env-conf-test] [d] -> [go' d]
1496.92 s
[opt-env-conf-test] (AnyDocsSingle d : ds) ->
1496.92 s
[opt-env-conf-test] case setDocHelp d of
1496.92 s
[opt-env-conf-test] - Nothing -> go' (AnyDocsSingle d) : goOr' ds
1496.92 s
[opt-env-conf-test] Just h ->
1496.92 s
[opt-env-conf-test] let (sds, rest) = goSameHelp h ds
1496.92 s
[opt-env-conf-test] ne = d :| sds
1496.92 s
[opt-env-conf-test] in AnyDocsSingle ne : goOr' rest
1496.92 s
[opt-env-conf-test] (d : ds) -> go' d : goOr' ds
1496.92 s
[opt-env-conf-test]
1496.92 s
[opt-env-conf-test] renderCommandDocs :: AnyDocs (Maybe SetDoc) -> [Chunk]
1496.92 s
[opt-env-conf-test]
1496.92 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:259:17-26
1496.92 s
[opt-env-conf-test] @@ -256,18 +256,16 @@
1496.92 s
[opt-env-conf-test] concat
1496.92 s
[opt-env-conf-test] [ concatMap
1496.92 s
[opt-env-conf-test] ( \(key, schema) ->
1496.92 s
[opt-env-conf-test] case jsonSchemaChunkLines schema of
1496.92 s
[opt-env-conf-test] - [line] ->
1496.92 s
[opt-env-conf-test] - [["config: ", confValChunk key, ": "] ++ line]
1496.92 s
[opt-env-conf-test] ls ->
1496.92 s
[opt-env-conf-test] ["config:"]
1496.92 s
[opt-env-conf-test] : indent
1496.92 s
[opt-env-conf-test] ( case ls of
1496.92 s
[opt-env-conf-test] [] -> [["TODO"]]
1496.92 s
[opt-env-conf-test] (l : ll) ->
1496.92 s
[opt-env-conf-test] ([confValChunk key, ": "] ++ l)
1496.92 s
[opt-env-conf-test] : indent ll
1496.92 s
[opt-env-conf-test] )
1496.92 s
[opt-env-conf-test] )
1496.92 s
[opt-env-conf-test] (NE.toList confs)
1496.92 s
[opt-env-conf-test] | confs <- maybeToList setDocConfKeys
1496.92 s
[opt-env-conf-test]
1496.92 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:265:27-44
1496.92 s
[opt-env-conf-test] @@ -262,11 +262,10 @@
1496.92 s
[opt-env-conf-test] ls ->
1496.92 s
[opt-env-conf-test] ["config:"]
1496.92 s
[opt-env-conf-test] : indent
1496.92 s
[opt-env-conf-test] ( case ls of
1496.92 s
[opt-env-conf-test] - [] -> [["TODO"]]
1496.92 s
[opt-env-conf-test] (l : ll) ->
1496.92 s
[opt-env-conf-test] ([confValChunk key, ": "] ++ l)
1496.92 s
[opt-env-conf-test] : indent ll
1496.92 s
[opt-env-conf-test] )
1496.92 s
[opt-env-conf-test] )
1496.92 s
[opt-env-conf-test] (NE.toList confs)
1496.92 s
[opt-env-conf-test]
1496.92 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:661:30-18
1496.92 s
[opt-env-conf-test] @@ -658,29 +658,28 @@
1496.92 s
[opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
1496.92 s
[opt-env-conf-test] [] -> Nothing
1496.92 s
[opt-env-conf-test] cs -> Just $ bracketise $ unwordsChunks $ intersperse [orChunk] cs
1496.92 s
[opt-env-conf-test] AnyDocsSingle mOd -> case mOd of
1496.92 s
[opt-env-conf-test] - Nothing -> Nothing
1496.92 s
[opt-env-conf-test] Just OptDoc {..} ->
1496.92 s
[opt-env-conf-test] Just
1496.92 s
[opt-env-conf-test] $ ( if isJust optDocDefault
1496.92 s
[opt-env-conf-test] then bracketise
1496.92 s
[opt-env-conf-test] else id
1496.92 s
[opt-env-conf-test] )
1496.92 s
[opt-env-conf-test] $ unwordsChunks
1496.92 s
[opt-env-conf-test] $ concat
1496.92 s
[opt-env-conf-test] [ [ [mMetavarChunk optDocMetavar]
1496.92 s
[opt-env-conf-test] | optDocTryArgument
1496.92 s
[opt-env-conf-test] ],
1496.92 s
[opt-env-conf-test] [ concat $ maybeToList $ dashedChunks optDocDasheds
1496.92 s
[opt-env-conf-test] | optDocTrySwitch
1496.93 s
[opt-env-conf-test] ],
1496.93 s
[opt-env-conf-test] [ concat
1496.93 s
[opt-env-conf-test] [ concat $ maybeToList $ dashedChunks optDocDasheds,
1496.93 s
[opt-env-conf-test] [" ", mMetavarChunk optDocMetavar]
1496.93 s
[opt-env-conf-test] ]
1496.93 s
[opt-env-conf-test] | optDocTryOption
1496.93 s
[opt-env-conf-test] ]
1496.93 s
[opt-env-conf-test] ]
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] orChunk :: Chunk
1496.93 s
[opt-env-conf-test] orChunk = fore cyan "|"
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:653:11-77
1496.93 s
[opt-env-conf-test] @@ -650,10 +650,9 @@
1496.93 s
[opt-env-conf-test] Nothing -> Just ["COMMAND"]
1496.93 s
[opt-env-conf-test] Just _ -> Just ["[COMMAND]"]
1496.93 s
[opt-env-conf-test] AnyDocsAnd ds ->
1496.93 s
[opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
1496.93 s
[opt-env-conf-test] [] -> Nothing
1496.93 s
[opt-env-conf-test] - [c] -> Just c
1496.93 s
[opt-env-conf-test] cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs
1496.93 s
[opt-env-conf-test] AnyDocsOr ds ->
1496.93 s
[opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
1496.93 s
[opt-env-conf-test] [] -> Nothing
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:653:11-77
1496.93 s
[opt-env-conf-test] @@ -650,10 +650,9 @@
1496.93 s
[opt-env-conf-test] Nothing -> Just ["COMMAND"]
1496.93 s
[opt-env-conf-test] Just _ -> Just ["[COMMAND]"]
1496.93 s
[opt-env-conf-test] AnyDocsAnd ds ->
1496.93 s
[opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
1496.93 s
[opt-env-conf-test] - [] -> Nothing
1496.93 s
[opt-env-conf-test] [c] -> Just c
1496.93 s
[opt-env-conf-test] cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs
1496.93 s
[opt-env-conf-test] AnyDocsOr ds ->
1496.93 s
[opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
1496.93 s
[opt-env-conf-test] [] -> Nothing
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:656:30-31
1496.93 s
[opt-env-conf-test] @@ -653,7 +653,7 @@
1496.93 s
[opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
1496.93 s
[opt-env-conf-test] [] -> Nothing
1496.93 s
[opt-env-conf-test] [c] -> Just c
1496.93 s
[opt-env-conf-test] - cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs
1496.93 s
[opt-env-conf-test] + cs -> Just $ (if False then parenthesise else id) $ unwordsChunks cs
1496.93 s
[opt-env-conf-test] AnyDocsOr ds ->
1496.93 s
[opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
1496.93 s
[opt-env-conf-test] [] -> Nothing
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] BoolLit at src/OptEnvConf/Doc.hs:637:38-43
1496.93 s
[opt-env-conf-test] @@ -634,7 +634,7 @@
1496.93 s
[opt-env-conf-test] withoutNothings =
1496.93 s
[opt-env-conf-test] filter
1496.93 s
[opt-env-conf-test] ( \case
1496.93 s
[opt-env-conf-test] - AnyDocsSingle Nothing -> False
1496.93 s
[opt-env-conf-test] + AnyDocsSingle Nothing -> True
1496.93 s
[opt-env-conf-test] AnyDocsAnd [] -> False
1496.93 s
[opt-env-conf-test] AnyDocsOr [] -> False
1496.93 s
[opt-env-conf-test] _ -> True
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:822:13-52
1496.93 s
[opt-env-conf-test] @@ -819,11 +819,9 @@
1496.93 s
[opt-env-conf-test] [exampleValuesChunks confDocExamples | not (null confDocExamples)],
1496.93 s
[opt-env-conf-test] concatMap
1496.93 s
[opt-env-conf-test] ( \(key, schema) ->
1496.93 s
[opt-env-conf-test] case jsonSchemaChunkLines schema of
1496.93 s
[opt-env-conf-test] - [line] ->
1496.93 s
[opt-env-conf-test] - [[confValChunk key, ": "] ++ line]
1496.93 s
[opt-env-conf-test] ls ->
1496.93 s
[opt-env-conf-test] [confValChunk key, ":"] : indent ls
1496.93 s
[opt-env-conf-test] )
1496.93 s
[opt-env-conf-test] (NE.toList confDocKeys)
1496.93 s
[opt-env-conf-test] ]
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] Negate at src/OptEnvConf/Setting.hs:144:22-46
1496.93 s
[opt-env-conf-test] @@ -141,7 +141,7 @@
1496.93 s
[opt-env-conf-test] hashWithSalt salt EnvVarSetting {..} =
1496.93 s
[opt-env-conf-test] salt
1496.93 s
[opt-env-conf-test] `hashWithSalt` envVarSettingVar
1496.93 s
[opt-env-conf-test] - `hashWithSalt` envVarSettingAllowPrefix
1496.93 s
[opt-env-conf-test] + `hashWithSalt` not envVarSettingAllowPrefix
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting
1496.93 s
[opt-env-conf-test] prefixEnvVarSetting prefix e =
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:144:22-46
1496.93 s
[opt-env-conf-test] @@ -141,7 +141,7 @@
1496.93 s
[opt-env-conf-test] hashWithSalt salt EnvVarSetting {..} =
1496.93 s
[opt-env-conf-test] salt
1496.93 s
[opt-env-conf-test] `hashWithSalt` envVarSettingVar
1496.93 s
[opt-env-conf-test] - `hashWithSalt` envVarSettingAllowPrefix
1496.93 s
[opt-env-conf-test] + `hashWithSalt` False
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting
1496.93 s
[opt-env-conf-test] prefixEnvVarSetting prefix e =
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:144:22-46
1496.93 s
[opt-env-conf-test] @@ -141,7 +141,7 @@
1496.93 s
[opt-env-conf-test] hashWithSalt salt EnvVarSetting {..} =
1496.93 s
[opt-env-conf-test] salt
1496.93 s
[opt-env-conf-test] `hashWithSalt` envVarSettingVar
1496.93 s
[opt-env-conf-test] - `hashWithSalt` envVarSettingAllowPrefix
1496.93 s
[opt-env-conf-test] + `hashWithSalt` True
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting
1496.93 s
[opt-env-conf-test] prefixEnvVarSetting prefix e =
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:136:5-29
1496.93 s
[opt-env-conf-test] @@ -133,7 +133,7 @@
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] data EnvVarSetting = EnvVarSetting
1496.93 s
[opt-env-conf-test] { envVarSettingVar :: !String,
1496.93 s
[opt-env-conf-test] - envVarSettingAllowPrefix :: !Bool
1496.93 s
[opt-env-conf-test] + True :: !Bool
1496.93 s
[opt-env-conf-test] }
1496.93 s
[opt-env-conf-test] deriving (Show, Eq)
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:159:5-32
1496.93 s
[opt-env-conf-test] @@ -156,7 +156,7 @@
1496.93 s
[opt-env-conf-test] = forall void.
1496.93 s
[opt-env-conf-test] ConfigValSetting
1496.93 s
[opt-env-conf-test] { configValSettingPath :: !(NonEmpty String),
1496.93 s
[opt-env-conf-test] - configValSettingAllowPrefix :: !Bool,
1496.93 s
[opt-env-conf-test] + True :: !Bool,
1496.93 s
[opt-env-conf-test] configValSettingCodec :: !(ValueCodec void (Maybe a))
1496.93 s
[opt-env-conf-test] }
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test]
1496.93 s
[opt-env-conf-test] Negate at src/OptEnvConf/Setting.hs:128:24-40
1496.93 s
[opt-env-conf-test] @@ -125,7 +125,7 @@
1496.93 s
[opt-env-conf-test] `hashWithSalt` settingTryArgument
1496.93 s
[opt-env-conf-test] `hashWithSalt` length settingReaders
1496.93 s
[opt-env-conf-test] `hashWithSalt` isJust settingSwitchValue
1496.93 s
[opt-env-conf-test] - `hashWithSalt` settingTryOption
1496.93 s
[opt-env-conf-test] + `hashWithSalt` not settingTryOption
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingEnvVars
1496.94 s
[opt-env-conf-test] `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals)
1496.94 s
[opt-env-conf-test] `hashWithSalt` (snd <$> settingDefaultValue)
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:128:24-40
1496.94 s
[opt-env-conf-test] @@ -125,7 +125,7 @@
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryArgument
1496.94 s
[opt-env-conf-test] `hashWithSalt` length settingReaders
1496.94 s
[opt-env-conf-test] `hashWithSalt` isJust settingSwitchValue
1496.94 s
[opt-env-conf-test] - `hashWithSalt` settingTryOption
1496.94 s
[opt-env-conf-test] + `hashWithSalt` False
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingEnvVars
1496.94 s
[opt-env-conf-test] `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals)
1496.94 s
[opt-env-conf-test] `hashWithSalt` (snd <$> settingDefaultValue)
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:128:24-40
1496.94 s
[opt-env-conf-test] @@ -125,7 +125,7 @@
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryArgument
1496.94 s
[opt-env-conf-test] `hashWithSalt` length settingReaders
1496.94 s
[opt-env-conf-test] `hashWithSalt` isJust settingSwitchValue
1496.94 s
[opt-env-conf-test] - `hashWithSalt` settingTryOption
1496.94 s
[opt-env-conf-test] + `hashWithSalt` True
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingEnvVars
1496.94 s
[opt-env-conf-test] `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals)
1496.94 s
[opt-env-conf-test] `hashWithSalt` (snd <$> settingDefaultValue)
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] Negate at src/OptEnvConf/Setting.hs:127:24-49
1496.94 s
[opt-env-conf-test] @@ -124,7 +124,7 @@
1496.94 s
[opt-env-conf-test] `hashWithSalt` map renderDashed settingDasheds
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryArgument
1496.94 s
[opt-env-conf-test] `hashWithSalt` length settingReaders
1496.94 s
[opt-env-conf-test] - `hashWithSalt` isJust settingSwitchValue
1496.94 s
[opt-env-conf-test] + `hashWithSalt` not isJust settingSwitchValue
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryOption
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingEnvVars
1496.94 s
[opt-env-conf-test] `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals)
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:127:24-49
1496.94 s
[opt-env-conf-test] @@ -124,7 +124,7 @@
1496.94 s
[opt-env-conf-test] `hashWithSalt` map renderDashed settingDasheds
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryArgument
1496.94 s
[opt-env-conf-test] `hashWithSalt` length settingReaders
1496.94 s
[opt-env-conf-test] - `hashWithSalt` isJust settingSwitchValue
1496.94 s
[opt-env-conf-test] + `hashWithSalt` False
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryOption
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingEnvVars
1496.94 s
[opt-env-conf-test] `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals)
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:127:24-49
1496.94 s
[opt-env-conf-test] @@ -124,7 +124,7 @@
1496.94 s
[opt-env-conf-test] `hashWithSalt` map renderDashed settingDasheds
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryArgument
1496.94 s
[opt-env-conf-test] `hashWithSalt` length settingReaders
1496.94 s
[opt-env-conf-test] - `hashWithSalt` isJust settingSwitchValue
1496.94 s
[opt-env-conf-test] + `hashWithSalt` True
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryOption
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingEnvVars
1496.94 s
[opt-env-conf-test] `hashWithSalt` (NE.map configValSettingPath <$> settingConfigVals)
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] Negate at src/OptEnvConf/Setting.hs:125:24-42
1496.94 s
[opt-env-conf-test] @@ -122,7 +122,7 @@
1496.94 s
[opt-env-conf-test] SettingHash
1496.94 s
[opt-env-conf-test] ( 42
1496.94 s
[opt-env-conf-test] `hashWithSalt` map renderDashed settingDasheds
1496.94 s
[opt-env-conf-test] - `hashWithSalt` settingTryArgument
1496.94 s
[opt-env-conf-test] + `hashWithSalt` not settingTryArgument
1496.94 s
[opt-env-conf-test] `hashWithSalt` length settingReaders
1496.94 s
[opt-env-conf-test] `hashWithSalt` isJust settingSwitchValue
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryOption
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:125:24-42
1496.94 s
[opt-env-conf-test] @@ -122,7 +122,7 @@
1496.94 s
[opt-env-conf-test] SettingHash
1496.94 s
[opt-env-conf-test] ( 42
1496.94 s
[opt-env-conf-test] `hashWithSalt` map renderDashed settingDasheds
1496.94 s
[opt-env-conf-test] - `hashWithSalt` settingTryArgument
1496.94 s
[opt-env-conf-test] + `hashWithSalt` False
1496.94 s
[opt-env-conf-test] `hashWithSalt` length settingReaders
1496.94 s
[opt-env-conf-test] `hashWithSalt` isJust settingSwitchValue
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryOption
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:125:24-42
1496.94 s
[opt-env-conf-test] @@ -122,7 +122,7 @@
1496.94 s
[opt-env-conf-test] SettingHash
1496.94 s
[opt-env-conf-test] ( 42
1496.94 s
[opt-env-conf-test] `hashWithSalt` map renderDashed settingDasheds
1496.94 s
[opt-env-conf-test] - `hashWithSalt` settingTryArgument
1496.94 s
[opt-env-conf-test] + `hashWithSalt` True
1496.94 s
[opt-env-conf-test] `hashWithSalt` length settingReaders
1496.94 s
[opt-env-conf-test] `hashWithSalt` isJust settingSwitchValue
1496.94 s
[opt-env-conf-test] `hashWithSalt` settingTryOption
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:148:6-32
1496.94 s
[opt-env-conf-test] @@ -145,7 +145,7 @@
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] prefixEnvVarSetting :: String -> EnvVarSetting -> EnvVarSetting
1496.94 s
[opt-env-conf-test] prefixEnvVarSetting prefix e =
1496.94 s
[opt-env-conf-test] - if envVarSettingAllowPrefix e
1496.94 s
[opt-env-conf-test] + if True
1496.94 s
[opt-env-conf-test] then e {envVarSettingVar = prefix <> envVarSettingVar e}
1496.94 s
[opt-env-conf-test] else e
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Setting.hs:165:6-35
1496.94 s
[opt-env-conf-test] @@ -162,7 +162,7 @@
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] prefixConfigValSetting :: String -> ConfigValSetting a -> ConfigValSetting a
1496.94 s
[opt-env-conf-test] prefixConfigValSetting prefix c =
1496.94 s
[opt-env-conf-test] - if configValSettingAllowPrefix c
1496.94 s
[opt-env-conf-test] + if True
1496.94 s
[opt-env-conf-test] then c {configValSettingPath = prefix NE.<| configValSettingPath c}
1496.94 s
[opt-env-conf-test] else c
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Setting.hs:173:30-39
1496.94 s
[opt-env-conf-test] @@ -170,9 +170,8 @@
1496.94 s
[opt-env-conf-test] suffixConfigValSettingKey suffix c = c {configValSettingPath = suffixPath $ configValSettingPath c}
1496.94 s
[opt-env-conf-test] where
1496.94 s
[opt-env-conf-test] suffixPath :: NonEmpty String -> NonEmpty String
1496.94 s
[opt-env-conf-test] suffixPath (f :| rest) = case NE.nonEmpty rest of
1496.94 s
[opt-env-conf-test] Nothing -> (f <> suffix) :| []
1496.94 s
[opt-env-conf-test] - Just ne -> f NE.<| suffixPath ne
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] -- | A 'mempty' 'Setting' to build up a setting from.
1496.94 s
[opt-env-conf-test] emptySetting :: Setting a
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Test.hs:67:3-96
1496.94 s
[opt-env-conf-test] @@ -64,10 +64,8 @@
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] parserLintTest :: Parser a -> IO ()
1496.94 s
[opt-env-conf-test] parserLintTest parser =
1496.94 s
[opt-env-conf-test] case lintParser parser of
1496.94 s
[opt-env-conf-test] Nothing -> pure ()
1496.94 s
[opt-env-conf-test] - Just errs ->
1496.94 s
[opt-env-conf-test] - expectationFailure $ T.unpack $ renderChunksText With24BitColours $ renderLintErrors errs
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] settingsParserArgsTest :: (Show a, Eq a, HasParser a) => [String] -> a -> IO ()
1496.94 s
[opt-env-conf-test] settingsParserArgsTest = parserArgsTest settingsParser
1496.94 s
[opt-env-conf-test]
1496.94 s
[opt-env-conf-test] RemoveCase at src/OptEnvConf/Test.hs:149:13-24
1496.94 s
[opt-env-conf-test] @@ -146,14 +146,13 @@
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] generatedFileComment :: CallStack -> T.Text
1496.95 s
[opt-env-conf-test] generatedFileComment cs =
1496.95 s
[opt-env-conf-test] let loc = case getCallStack cs of
1496.95 s
[opt-env-conf-test] (_, srcLoc) : _ ->
1496.95 s
[opt-env-conf-test] packageName (Stack.srcLocPackage srcLoc)
1496.95 s
[opt-env-conf-test] <> ":"
1496.95 s
[opt-env-conf-test] <> Stack.srcLocFile srcLoc
1496.95 s
[opt-env-conf-test] <> ":"
1496.95 s
[opt-env-conf-test] <> show (Stack.srcLocStartLine srcLoc)
1496.95 s
[opt-env-conf-test] - [] -> "unknown"
1496.95 s
[opt-env-conf-test] in T.pack $
1496.95 s
[opt-env-conf-test] unlines $
1496.95 s
[opt-env-conf-test] map
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:35-84
1496.95 s
[opt-env-conf-test] @@ -177,4 +177,4 @@
1496.95 s
[opt-env-conf-test] where
1496.95 s
[opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
1496.95 s
[opt-env-conf-test] go (c : rest) = c : go rest
1496.95 s
[opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] + isVersion v = not (null v) && True
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:49-84
1496.95 s
[opt-env-conf-test] @@ -177,4 +177,4 @@
1496.95 s
[opt-env-conf-test] where
1496.95 s
[opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
1496.95 s
[opt-env-conf-test] go (c : rest) = c : go rest
1496.95 s
[opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && True
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:60-81
1496.95 s
[opt-env-conf-test] @@ -177,4 +177,4 @@
1496.95 s
[opt-env-conf-test] where
1496.95 s
[opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
1496.95 s
[opt-env-conf-test] go (c : rest) = c : go rest
1496.95 s
[opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> True) v
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:73-81
1496.95 s
[opt-env-conf-test] @@ -177,4 +177,4 @@
1496.95 s
[opt-env-conf-test] where
1496.95 s
[opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
1496.95 s
[opt-env-conf-test] go (c : rest) = c : go rest
1496.95 s
[opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || True) v
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:60-69
1496.95 s
[opt-env-conf-test] @@ -177,4 +177,4 @@
1496.95 s
[opt-env-conf-test] where
1496.95 s
[opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
1496.95 s
[opt-env-conf-test] go (c : rest) = c : go rest
1496.95 s
[opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> True || c == '.') v
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:35-45
1496.95 s
[opt-env-conf-test] @@ -177,4 +177,4 @@
1496.95 s
[opt-env-conf-test] where
1496.95 s
[opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
1496.95 s
[opt-env-conf-test] go (c : rest) = c : go rest
1496.95 s
[opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] + isVersion v = not (null v) && True && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:19-31
1496.95 s
[opt-env-conf-test] @@ -177,4 +177,4 @@
1496.95 s
[opt-env-conf-test] where
1496.95 s
[opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
1496.95 s
[opt-env-conf-test] go (c : rest) = c : go rest
1496.95 s
[opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] + isVersion v = True && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:23-31
1496.95 s
[opt-env-conf-test] @@ -177,4 +177,4 @@
1496.95 s
[opt-env-conf-test] where
1496.95 s
[opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
1496.95 s
[opt-env-conf-test] go (c : rest) = c : go rest
1496.95 s
[opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] + isVersion v = not False && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test]
1496.95 s
[opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:24-30
1496.95 s
[opt-env-conf-test] @@ -177,4 +177,4 @@
1496.95 s
[opt-env-conf-test] where
1496.95 s
[opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
1496.95 s
[opt-env-conf-test] go (c : rest) = c : go rest
1496.95 s
[opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] + isVersion v = not (False) && elem '.' v && all (\c -> isDigit c || c == '.') v
1496.95 s
[opt-env-conf-test] checkPhase completed in 16 minutes 22 seconds
1496.95 s
[opt-env-conf-test] Phase: haddockPhase
1496.95 s
[opt-env-conf-test] Phase: installPhase
1497.01 s
[opt-env-conf-test] Installing library in /nix/store/3yw9ybwd3lfyf61zk1jpny4fkgcqqjr5-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/opt-env-conf-test-0.0.0.4-3sxOV7t65cdF98TgindIPT
1497.82 s
[opt-env-conf-test] Phase: fixupPhase
1497.86 s
[opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/3yw9ybwd3lfyf61zk1jpny4fkgcqqjr5-opt-env-conf-test-0.0.0.4
1497.87 s
[opt-env-conf-test] shrinking /nix/store/3yw9ybwd3lfyf61zk1jpny4fkgcqqjr5-opt-env-conf-test-0.0.0.4/lib/ghc-9.10.3/lib/x86_64-linux-ghc-9.10.3-05f6/libHSopt-env-conf-test-0.0.0.4-3sxOV7t65cdF98TgindIPT-ghc9.10.3.so
1497.91 s
[opt-env-conf-test] checking for references to /build/ in /nix/store/3yw9ybwd3lfyf61zk1jpny4fkgcqqjr5-opt-env-conf-test-0.0.0.4...
1497.96 s
[opt-env-conf-test] patching script interpreter paths in /nix/store/3yw9ybwd3lfyf61zk1jpny4fkgcqqjr5-opt-env-conf-test-0.0.0.4
1497.97 s
[opt-env-conf-test] stripping (with command strip and flags -S -p) in /nix/store/3yw9ybwd3lfyf61zk1jpny4fkgcqqjr5-opt-env-conf-test-0.0.0.4/lib
1498.07 s
[opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/jd5d0v1qi993s4arwf22jl0kc2phz167-opt-env-conf-test-0.0.0.4-manifest
1498.08 s
[opt-env-conf-test] checking for references to /build/ in /nix/store/jd5d0v1qi993s4arwf22jl0kc2phz167-opt-env-conf-test-0.0.0.4-manifest...
1498.13 s
[opt-env-conf-test] patching script interpreter paths in /nix/store/jd5d0v1qi993s4arwf22jl0kc2phz167-opt-env-conf-test-0.0.0.4-manifest
1498.14 s
[opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/qnp83nzhax8yhlcrsmbwqry16d28317s-opt-env-conf-test-0.0.0.4-report
1498.22 s
[opt-env-conf-test] checking for references to /build/ in /nix/store/qnp83nzhax8yhlcrsmbwqry16d28317s-opt-env-conf-test-0.0.0.4-report...
1498.35 s
[opt-env-conf-test] patching script interpreter paths in /nix/store/qnp83nzhax8yhlcrsmbwqry16d28317s-opt-env-conf-test-0.0.0.4-report
1498.64 s
Progress: 16 of 17 built