build checks.x86_64-linux.mutation-opt-env-conf

Reproduce this run
  1. 1096.47 s [opt-env-conf-test] @@ -370,7 +370,7 @@
  2. 1096.47 s [opt-env-conf-test] . showString " "
  3. 1096.47 s [opt-env-conf-test] . go 11 p2
  4. 1096.47 s [opt-env-conf-test] ParserSetting mLoc p ->
  5. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  6. 1096.47 s [opt-env-conf-test] + showParen True $
  7. 1096.47 s [opt-env-conf-test] showString "Setting "
  8. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  9. 1096.47 s [opt-env-conf-test] . showString " "
  10. 1096.47 s [opt-env-conf-test]
  11. 1096.47 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:373:20-26
  12. 1096.47 s [opt-env-conf-test] @@ -370,7 +370,7 @@
  13. 1096.47 s [opt-env-conf-test] . showString " "
  14. 1096.47 s [opt-env-conf-test] . go 11 p2
  15. 1096.47 s [opt-env-conf-test] ParserSetting mLoc p ->
  16. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  17. 1096.47 s [opt-env-conf-test] + showParen (True) $
  18. 1096.47 s [opt-env-conf-test] showString "Setting "
  19. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  20. 1096.47 s [opt-env-conf-test] . showString " "
  21. 1096.47 s [opt-env-conf-test]
  22. 1096.47 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:373:24-26
  23. 1096.47 s [opt-env-conf-test] @@ -370,7 +370,7 @@
  24. 1096.47 s [opt-env-conf-test] . showString " "
  25. 1096.47 s [opt-env-conf-test] . go 11 p2
  26. 1096.47 s [opt-env-conf-test] ParserSetting mLoc p ->
  27. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  28. 1096.47 s [opt-env-conf-test] + showParen (d > -10) $
  29. 1096.47 s [opt-env-conf-test] showString "Setting "
  30. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  31. 1096.47 s [opt-env-conf-test] . showString " "
  32. 1096.47 s [opt-env-conf-test]
  33. 1096.47 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:373:24-26
  34. 1096.47 s [opt-env-conf-test] @@ -370,7 +370,7 @@
  35. 1096.47 s [opt-env-conf-test] . showString " "
  36. 1096.47 s [opt-env-conf-test] . go 11 p2
  37. 1096.47 s [opt-env-conf-test] ParserSetting mLoc p ->
  38. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  39. 1096.47 s [opt-env-conf-test] + showParen (d > 1) $
  40. 1096.47 s [opt-env-conf-test] showString "Setting "
  41. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  42. 1096.47 s [opt-env-conf-test] . showString " "
  43. 1096.47 s [opt-env-conf-test]
  44. 1096.47 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:373:24-26
  45. 1096.47 s [opt-env-conf-test] @@ -370,7 +370,7 @@
  46. 1096.47 s [opt-env-conf-test] . showString " "
  47. 1096.47 s [opt-env-conf-test] . go 11 p2
  48. 1096.47 s [opt-env-conf-test] ParserSetting mLoc p ->
  49. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  50. 1096.47 s [opt-env-conf-test] + showParen (d > 0) $
  51. 1096.47 s [opt-env-conf-test] showString "Setting "
  52. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  53. 1096.47 s [opt-env-conf-test] . showString " "
  54. 1096.47 s [opt-env-conf-test]
  55. 1096.47 s [opt-env-conf-test] Negate at src/OptEnvConf/Parser.hs:365:19-27
  56. 1096.47 s [opt-env-conf-test] @@ -362,7 +362,7 @@
  57. 1096.47 s [opt-env-conf-test] showCommandABit
  58. 1096.47 s [opt-env-conf-test] cs
  59. 1096.47 s [opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
  60. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  61. 1096.47 s [opt-env-conf-test] + showParen not ((d > 10)) $
  62. 1096.47 s [opt-env-conf-test] showString "WithConfig _ "
  63. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  64. 1096.47 s [opt-env-conf-test] . showString " "
  65. 1096.47 s [opt-env-conf-test]
  66. 1096.47 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:19-27
  67. 1096.47 s [opt-env-conf-test] @@ -362,7 +362,7 @@
  68. 1096.47 s [opt-env-conf-test] showCommandABit
  69. 1096.47 s [opt-env-conf-test] cs
  70. 1096.47 s [opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
  71. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  72. 1096.47 s [opt-env-conf-test] + showParen False $
  73. 1096.47 s [opt-env-conf-test] showString "WithConfig _ "
  74. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  75. 1096.47 s [opt-env-conf-test] . showString " "
  76. 1096.47 s [opt-env-conf-test]
  77. 1096.47 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:19-27
  78. 1096.47 s [opt-env-conf-test] @@ -362,7 +362,7 @@
  79. 1096.47 s [opt-env-conf-test] showCommandABit
  80. 1096.47 s [opt-env-conf-test] cs
  81. 1096.47 s [opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
  82. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  83. 1096.47 s [opt-env-conf-test] + showParen True $
  84. 1096.47 s [opt-env-conf-test] showString "WithConfig _ "
  85. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  86. 1096.47 s [opt-env-conf-test] . showString " "
  87. 1096.47 s [opt-env-conf-test]
  88. 1096.47 s [opt-env-conf-test] Negate at src/OptEnvConf/Parser.hs:365:20-26
  89. 1096.47 s [opt-env-conf-test] @@ -362,7 +362,7 @@
  90. 1096.47 s [opt-env-conf-test] showCommandABit
  91. 1096.47 s [opt-env-conf-test] cs
  92. 1096.47 s [opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
  93. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  94. 1096.47 s [opt-env-conf-test] + showParen (not (d > 10)) $
  95. 1096.47 s [opt-env-conf-test] showString "WithConfig _ "
  96. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  97. 1096.47 s [opt-env-conf-test] . showString " "
  98. 1096.47 s [opt-env-conf-test]
  99. 1096.47 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:20-26
  100. 1096.47 s [opt-env-conf-test] @@ -362,7 +362,7 @@
  101. 1096.47 s [opt-env-conf-test] showCommandABit
  102. 1096.47 s [opt-env-conf-test] cs
  103. 1096.47 s [opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
  104. 1096.47 s [opt-env-conf-test] - showParen (d > 10) $
  105. 1096.47 s [opt-env-conf-test] + showParen (False) $
  106. 1096.47 s [opt-env-conf-test] showString "WithConfig _ "
  107. 1096.47 s [opt-env-conf-test] . showsPrec 11 mLoc
  108. 1096.47 s [opt-env-conf-test] . showString " "
  109. 1096.47 s [opt-env-conf-test]
  110. 1096.47 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:365:20-26
  111. 1096.47 s [opt-env-conf-test] @@ -362,7 +362,7 @@
  112. 1096.48 s [opt-env-conf-test] showCommandABit
  113. 1096.48 s [opt-env-conf-test] cs
  114. 1096.48 s [opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
  115. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  116. 1096.48 s [opt-env-conf-test] + showParen (True) $
  117. 1096.48 s [opt-env-conf-test] showString "WithConfig _ "
  118. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  119. 1096.48 s [opt-env-conf-test] . showString " "
  120. 1096.48 s [opt-env-conf-test]
  121. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:365:24-26
  122. 1096.48 s [opt-env-conf-test] @@ -362,7 +362,7 @@
  123. 1096.48 s [opt-env-conf-test] showCommandABit
  124. 1096.48 s [opt-env-conf-test] cs
  125. 1096.48 s [opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
  126. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  127. 1096.48 s [opt-env-conf-test] + showParen (d > -10) $
  128. 1096.48 s [opt-env-conf-test] showString "WithConfig _ "
  129. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  130. 1096.48 s [opt-env-conf-test] . showString " "
  131. 1096.48 s [opt-env-conf-test]
  132. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:365:24-26
  133. 1096.48 s [opt-env-conf-test] @@ -362,7 +362,7 @@
  134. 1096.48 s [opt-env-conf-test] showCommandABit
  135. 1096.48 s [opt-env-conf-test] cs
  136. 1096.48 s [opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
  137. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  138. 1096.48 s [opt-env-conf-test] + showParen (d > 1) $
  139. 1096.48 s [opt-env-conf-test] showString "WithConfig _ "
  140. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  141. 1096.48 s [opt-env-conf-test] . showString " "
  142. 1096.48 s [opt-env-conf-test]
  143. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:365:24-26
  144. 1096.48 s [opt-env-conf-test] @@ -362,7 +362,7 @@
  145. 1096.48 s [opt-env-conf-test] showCommandABit
  146. 1096.48 s [opt-env-conf-test] cs
  147. 1096.48 s [opt-env-conf-test] ParserWithConfig mLoc p1 p2 ->
  148. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  149. 1096.48 s [opt-env-conf-test] + showParen (d > 0) $
  150. 1096.48 s [opt-env-conf-test] showString "WithConfig _ "
  151. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  152. 1096.48 s [opt-env-conf-test] . showString " "
  153. 1096.48 s [opt-env-conf-test]
  154. 1096.48 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:355:19-27
  155. 1096.48 s [opt-env-conf-test] @@ -352,7 +352,7 @@
  156. 1096.48 s [opt-env-conf-test] . showString " _ "
  157. 1096.48 s [opt-env-conf-test] . go 11 p
  158. 1096.48 s [opt-env-conf-test] ParserCommands mLoc mDefault cs ->
  159. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  160. 1096.48 s [opt-env-conf-test] + showParen True $
  161. 1096.48 s [opt-env-conf-test] showString "Commands "
  162. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  163. 1096.48 s [opt-env-conf-test] . showString " "
  164. 1096.48 s [opt-env-conf-test]
  165. 1096.48 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:355:20-26
  166. 1096.48 s [opt-env-conf-test] @@ -352,7 +352,7 @@
  167. 1096.48 s [opt-env-conf-test] . showString " _ "
  168. 1096.48 s [opt-env-conf-test] . go 11 p
  169. 1096.48 s [opt-env-conf-test] ParserCommands mLoc mDefault cs ->
  170. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  171. 1096.48 s [opt-env-conf-test] + showParen (True) $
  172. 1096.48 s [opt-env-conf-test] showString "Commands "
  173. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  174. 1096.48 s [opt-env-conf-test] . showString " "
  175. 1096.48 s [opt-env-conf-test]
  176. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:355:24-26
  177. 1096.48 s [opt-env-conf-test] @@ -352,7 +352,7 @@
  178. 1096.48 s [opt-env-conf-test] . showString " _ "
  179. 1096.48 s [opt-env-conf-test] . go 11 p
  180. 1096.48 s [opt-env-conf-test] ParserCommands mLoc mDefault cs ->
  181. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  182. 1096.48 s [opt-env-conf-test] + showParen (d > -10) $
  183. 1096.48 s [opt-env-conf-test] showString "Commands "
  184. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  185. 1096.48 s [opt-env-conf-test] . showString " "
  186. 1096.48 s [opt-env-conf-test]
  187. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:355:24-26
  188. 1096.48 s [opt-env-conf-test] @@ -352,7 +352,7 @@
  189. 1096.48 s [opt-env-conf-test] . showString " _ "
  190. 1096.48 s [opt-env-conf-test] . go 11 p
  191. 1096.48 s [opt-env-conf-test] ParserCommands mLoc mDefault cs ->
  192. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  193. 1096.48 s [opt-env-conf-test] + showParen (d > 1) $
  194. 1096.48 s [opt-env-conf-test] showString "Commands "
  195. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  196. 1096.48 s [opt-env-conf-test] . showString " "
  197. 1096.48 s [opt-env-conf-test]
  198. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:355:24-26
  199. 1096.48 s [opt-env-conf-test] @@ -352,7 +352,7 @@
  200. 1096.48 s [opt-env-conf-test] . showString " _ "
  201. 1096.48 s [opt-env-conf-test] . go 11 p
  202. 1096.48 s [opt-env-conf-test] ParserCommands mLoc mDefault cs ->
  203. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  204. 1096.48 s [opt-env-conf-test] + showParen (d > 0) $
  205. 1096.48 s [opt-env-conf-test] showString "Commands "
  206. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  207. 1096.48 s [opt-env-conf-test] . showString " "
  208. 1096.48 s [opt-env-conf-test]
  209. 1096.48 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:345:19-27
  210. 1096.48 s [opt-env-conf-test] @@ -342,7 +342,7 @@
  211. 1096.48 s [opt-env-conf-test] . showString " "
  212. 1096.48 s [opt-env-conf-test] . go 11 p
  213. 1096.48 s [opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
  214. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  215. 1096.48 s [opt-env-conf-test] + showParen True $
  216. 1096.48 s [opt-env-conf-test] showString "Check "
  217. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  218. 1096.48 s [opt-env-conf-test] . showString " "
  219. 1096.48 s [opt-env-conf-test]
  220. 1096.48 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:345:20-26
  221. 1096.48 s [opt-env-conf-test] @@ -342,7 +342,7 @@
  222. 1096.48 s [opt-env-conf-test] . showString " "
  223. 1096.48 s [opt-env-conf-test] . go 11 p
  224. 1096.48 s [opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
  225. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  226. 1096.48 s [opt-env-conf-test] + showParen (True) $
  227. 1096.48 s [opt-env-conf-test] showString "Check "
  228. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  229. 1096.48 s [opt-env-conf-test] . showString " "
  230. 1096.48 s [opt-env-conf-test]
  231. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:345:24-26
  232. 1096.48 s [opt-env-conf-test] @@ -342,7 +342,7 @@
  233. 1096.48 s [opt-env-conf-test] . showString " "
  234. 1096.48 s [opt-env-conf-test] . go 11 p
  235. 1096.48 s [opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
  236. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  237. 1096.48 s [opt-env-conf-test] + showParen (d > -10) $
  238. 1096.48 s [opt-env-conf-test] showString "Check "
  239. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  240. 1096.48 s [opt-env-conf-test] . showString " "
  241. 1096.48 s [opt-env-conf-test]
  242. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:345:24-26
  243. 1096.48 s [opt-env-conf-test] @@ -342,7 +342,7 @@
  244. 1096.48 s [opt-env-conf-test] . showString " "
  245. 1096.48 s [opt-env-conf-test] . go 11 p
  246. 1096.48 s [opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
  247. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  248. 1096.48 s [opt-env-conf-test] + showParen (d > 1) $
  249. 1096.48 s [opt-env-conf-test] showString "Check "
  250. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  251. 1096.48 s [opt-env-conf-test] . showString " "
  252. 1096.48 s [opt-env-conf-test]
  253. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:345:24-26
  254. 1096.48 s [opt-env-conf-test] @@ -342,7 +342,7 @@
  255. 1096.48 s [opt-env-conf-test] . showString " "
  256. 1096.48 s [opt-env-conf-test] . go 11 p
  257. 1096.48 s [opt-env-conf-test] ParserCheck mLoc forgivable caps _ p ->
  258. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  259. 1096.48 s [opt-env-conf-test] + showParen (d > 0) $
  260. 1096.48 s [opt-env-conf-test] showString "Check "
  261. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  262. 1096.48 s [opt-env-conf-test] . showString " "
  263. 1096.48 s [opt-env-conf-test]
  264. 1096.48 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:333:19-27
  265. 1096.48 s [opt-env-conf-test] @@ -330,7 +330,7 @@
  266. 1096.48 s [opt-env-conf-test] . showString " "
  267. 1096.48 s [opt-env-conf-test] . go 11 p
  268. 1096.48 s [opt-env-conf-test] ParserSome mLoc p ->
  269. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  270. 1096.48 s [opt-env-conf-test] + showParen True $
  271. 1096.48 s [opt-env-conf-test] showString "Some "
  272. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  273. 1096.48 s [opt-env-conf-test] . showString " "
  274. 1096.48 s [opt-env-conf-test]
  275. 1096.48 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:333:20-26
  276. 1096.48 s [opt-env-conf-test] @@ -330,7 +330,7 @@
  277. 1096.48 s [opt-env-conf-test] . showString " "
  278. 1096.48 s [opt-env-conf-test] . go 11 p
  279. 1096.48 s [opt-env-conf-test] ParserSome mLoc p ->
  280. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  281. 1096.48 s [opt-env-conf-test] + showParen (True) $
  282. 1096.48 s [opt-env-conf-test] showString "Some "
  283. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  284. 1096.48 s [opt-env-conf-test] . showString " "
  285. 1096.48 s [opt-env-conf-test]
  286. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:333:24-26
  287. 1096.48 s [opt-env-conf-test] @@ -330,7 +330,7 @@
  288. 1096.48 s [opt-env-conf-test] . showString " "
  289. 1096.48 s [opt-env-conf-test] . go 11 p
  290. 1096.48 s [opt-env-conf-test] ParserSome mLoc p ->
  291. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  292. 1096.48 s [opt-env-conf-test] + showParen (d > -10) $
  293. 1096.48 s [opt-env-conf-test] showString "Some "
  294. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  295. 1096.48 s [opt-env-conf-test] . showString " "
  296. 1096.48 s [opt-env-conf-test]
  297. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:333:24-26
  298. 1096.48 s [opt-env-conf-test] @@ -330,7 +330,7 @@
  299. 1096.48 s [opt-env-conf-test] . showString " "
  300. 1096.48 s [opt-env-conf-test] . go 11 p
  301. 1096.48 s [opt-env-conf-test] ParserSome mLoc p ->
  302. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  303. 1096.48 s [opt-env-conf-test] + showParen (d > 1) $
  304. 1096.48 s [opt-env-conf-test] showString "Some "
  305. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  306. 1096.48 s [opt-env-conf-test] . showString " "
  307. 1096.48 s [opt-env-conf-test]
  308. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:333:24-26
  309. 1096.48 s [opt-env-conf-test] @@ -330,7 +330,7 @@
  310. 1096.48 s [opt-env-conf-test] . showString " "
  311. 1096.48 s [opt-env-conf-test] . go 11 p
  312. 1096.48 s [opt-env-conf-test] ParserSome mLoc p ->
  313. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  314. 1096.48 s [opt-env-conf-test] + showParen (d > 0) $
  315. 1096.48 s [opt-env-conf-test] showString "Some "
  316. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  317. 1096.48 s [opt-env-conf-test] . showString " "
  318. 1096.48 s [opt-env-conf-test]
  319. 1096.48 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:327:19-27
  320. 1096.48 s [opt-env-conf-test] @@ -324,7 +324,7 @@
  321. 1096.48 s [opt-env-conf-test] . showString " "
  322. 1096.48 s [opt-env-conf-test] . go 11 p2
  323. 1096.48 s [opt-env-conf-test] ParserMany mLoc p ->
  324. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  325. 1096.48 s [opt-env-conf-test] + showParen True $
  326. 1096.48 s [opt-env-conf-test] showString "Many "
  327. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  328. 1096.48 s [opt-env-conf-test] . showString " "
  329. 1096.48 s [opt-env-conf-test]
  330. 1096.48 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:327:20-26
  331. 1096.48 s [opt-env-conf-test] @@ -324,7 +324,7 @@
  332. 1096.48 s [opt-env-conf-test] . showString " "
  333. 1096.48 s [opt-env-conf-test] . go 11 p2
  334. 1096.48 s [opt-env-conf-test] ParserMany mLoc p ->
  335. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  336. 1096.48 s [opt-env-conf-test] + showParen (True) $
  337. 1096.48 s [opt-env-conf-test] showString "Many "
  338. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  339. 1096.48 s [opt-env-conf-test] . showString " "
  340. 1096.48 s [opt-env-conf-test]
  341. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:327:24-26
  342. 1096.48 s [opt-env-conf-test] @@ -324,7 +324,7 @@
  343. 1096.48 s [opt-env-conf-test] . showString " "
  344. 1096.48 s [opt-env-conf-test] . go 11 p2
  345. 1096.48 s [opt-env-conf-test] ParserMany mLoc p ->
  346. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  347. 1096.48 s [opt-env-conf-test] + showParen (d > -10) $
  348. 1096.48 s [opt-env-conf-test] showString "Many "
  349. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  350. 1096.48 s [opt-env-conf-test] . showString " "
  351. 1096.48 s [opt-env-conf-test]
  352. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:327:24-26
  353. 1096.48 s [opt-env-conf-test] @@ -324,7 +324,7 @@
  354. 1096.48 s [opt-env-conf-test] . showString " "
  355. 1096.48 s [opt-env-conf-test] . go 11 p2
  356. 1096.48 s [opt-env-conf-test] ParserMany mLoc p ->
  357. 1096.48 s [opt-env-conf-test] - showParen (d > 10) $
  358. 1096.48 s [opt-env-conf-test] + showParen (d > 1) $
  359. 1096.48 s [opt-env-conf-test] showString "Many "
  360. 1096.48 s [opt-env-conf-test] . showsPrec 11 mLoc
  361. 1096.48 s [opt-env-conf-test] . showString " "
  362. 1096.48 s [opt-env-conf-test]
  363. 1096.48 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:327:24-26
  364. 1096.48 s [opt-env-conf-test] @@ -324,7 +324,7 @@
  365. 1096.48 s [opt-env-conf-test] . showString " "
  366. 1096.48 s [opt-env-conf-test] . go 11 p2
  367. 1096.49 s [opt-env-conf-test] ParserMany mLoc p ->
  368. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  369. 1096.49 s [opt-env-conf-test] + showParen (d > 0) $
  370. 1096.49 s [opt-env-conf-test] showString "Many "
  371. 1096.49 s [opt-env-conf-test] . showsPrec 11 mLoc
  372. 1096.49 s [opt-env-conf-test] . showString " "
  373. 1096.49 s [opt-env-conf-test]
  374. 1096.49 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:321:19-27
  375. 1096.49 s [opt-env-conf-test] @@ -318,7 +318,7 @@
  376. 1096.49 s [opt-env-conf-test] showString "Empty "
  377. 1096.49 s [opt-env-conf-test] . showsPrec 11 mLoc
  378. 1096.49 s [opt-env-conf-test] ParserAlt p1 p2 ->
  379. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  380. 1096.49 s [opt-env-conf-test] + showParen True $
  381. 1096.49 s [opt-env-conf-test] showString "Alt "
  382. 1096.49 s [opt-env-conf-test] . go 11 p1
  383. 1096.49 s [opt-env-conf-test] . showString " "
  384. 1096.49 s [opt-env-conf-test]
  385. 1096.49 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:321:20-26
  386. 1096.49 s [opt-env-conf-test] @@ -318,7 +318,7 @@
  387. 1096.49 s [opt-env-conf-test] showString "Empty "
  388. 1096.49 s [opt-env-conf-test] . showsPrec 11 mLoc
  389. 1096.49 s [opt-env-conf-test] ParserAlt p1 p2 ->
  390. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  391. 1096.49 s [opt-env-conf-test] + showParen (True) $
  392. 1096.49 s [opt-env-conf-test] showString "Alt "
  393. 1096.49 s [opt-env-conf-test] . go 11 p1
  394. 1096.49 s [opt-env-conf-test] . showString " "
  395. 1096.49 s [opt-env-conf-test]
  396. 1096.49 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:321:24-26
  397. 1096.49 s [opt-env-conf-test] @@ -318,7 +318,7 @@
  398. 1096.49 s [opt-env-conf-test] showString "Empty "
  399. 1096.49 s [opt-env-conf-test] . showsPrec 11 mLoc
  400. 1096.49 s [opt-env-conf-test] ParserAlt p1 p2 ->
  401. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  402. 1096.49 s [opt-env-conf-test] + showParen (d > -10) $
  403. 1096.49 s [opt-env-conf-test] showString "Alt "
  404. 1096.49 s [opt-env-conf-test] . go 11 p1
  405. 1096.49 s [opt-env-conf-test] . showString " "
  406. 1096.49 s [opt-env-conf-test]
  407. 1096.49 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:321:24-26
  408. 1096.49 s [opt-env-conf-test] @@ -318,7 +318,7 @@
  409. 1096.49 s [opt-env-conf-test] showString "Empty "
  410. 1096.49 s [opt-env-conf-test] . showsPrec 11 mLoc
  411. 1096.49 s [opt-env-conf-test] ParserAlt p1 p2 ->
  412. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  413. 1096.49 s [opt-env-conf-test] + showParen (d > 1) $
  414. 1096.49 s [opt-env-conf-test] showString "Alt "
  415. 1096.49 s [opt-env-conf-test] . go 11 p1
  416. 1096.49 s [opt-env-conf-test] . showString " "
  417. 1096.49 s [opt-env-conf-test]
  418. 1096.49 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:321:24-26
  419. 1096.49 s [opt-env-conf-test] @@ -318,7 +318,7 @@
  420. 1096.49 s [opt-env-conf-test] showString "Empty "
  421. 1096.49 s [opt-env-conf-test] . showsPrec 11 mLoc
  422. 1096.49 s [opt-env-conf-test] ParserAlt p1 p2 ->
  423. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  424. 1096.49 s [opt-env-conf-test] + showParen (d > 0) $
  425. 1096.49 s [opt-env-conf-test] showString "Alt "
  426. 1096.49 s [opt-env-conf-test] . go 11 p1
  427. 1096.49 s [opt-env-conf-test] . showString " "
  428. 1096.49 s [opt-env-conf-test]
  429. 1096.49 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:306:19-27
  430. 1096.49 s [opt-env-conf-test] @@ -303,7 +303,7 @@
  431. 1096.49 s [opt-env-conf-test] go d = \case
  432. 1096.49 s [opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  433. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  434. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  435. 1096.49 s [opt-env-conf-test] + showParen True $
  436. 1096.49 s [opt-env-conf-test] showString "Ap "
  437. 1096.49 s [opt-env-conf-test] . go 11 pf
  438. 1096.49 s [opt-env-conf-test] . showString " "
  439. 1096.49 s [opt-env-conf-test]
  440. 1096.49 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:306:20-26
  441. 1096.49 s [opt-env-conf-test] @@ -303,7 +303,7 @@
  442. 1096.49 s [opt-env-conf-test] go d = \case
  443. 1096.49 s [opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  444. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  445. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  446. 1096.49 s [opt-env-conf-test] + showParen (True) $
  447. 1096.49 s [opt-env-conf-test] showString "Ap "
  448. 1096.49 s [opt-env-conf-test] . go 11 pf
  449. 1096.49 s [opt-env-conf-test] . showString " "
  450. 1096.49 s [opt-env-conf-test]
  451. 1096.49 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:306:24-26
  452. 1096.49 s [opt-env-conf-test] @@ -303,7 +303,7 @@
  453. 1096.49 s [opt-env-conf-test] go d = \case
  454. 1096.49 s [opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  455. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  456. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  457. 1096.49 s [opt-env-conf-test] + showParen (d > -10) $
  458. 1096.49 s [opt-env-conf-test] showString "Ap "
  459. 1096.49 s [opt-env-conf-test] . go 11 pf
  460. 1096.49 s [opt-env-conf-test] . showString " "
  461. 1096.49 s [opt-env-conf-test]
  462. 1096.49 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:306:24-26
  463. 1096.49 s [opt-env-conf-test] @@ -303,7 +303,7 @@
  464. 1096.49 s [opt-env-conf-test] go d = \case
  465. 1096.49 s [opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  466. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  467. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  468. 1096.49 s [opt-env-conf-test] + showParen (d > 1) $
  469. 1096.49 s [opt-env-conf-test] showString "Ap "
  470. 1096.49 s [opt-env-conf-test] . go 11 pf
  471. 1096.49 s [opt-env-conf-test] . showString " "
  472. 1096.49 s [opt-env-conf-test]
  473. 1096.49 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:306:24-26
  474. 1096.49 s [opt-env-conf-test] @@ -303,7 +303,7 @@
  475. 1096.49 s [opt-env-conf-test] go d = \case
  476. 1096.49 s [opt-env-conf-test] ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  477. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  478. 1096.49 s [opt-env-conf-test] - showParen (d > 10) $
  479. 1096.49 s [opt-env-conf-test] + showParen (d > 0) $
  480. 1096.49 s [opt-env-conf-test] showString "Ap "
  481. 1096.49 s [opt-env-conf-test] . go 11 pf
  482. 1096.49 s [opt-env-conf-test] . showString " "
  483. 1096.49 s [opt-env-conf-test]
  484. 1096.49 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:304:33-41
  485. 1096.49 s [opt-env-conf-test] @@ -301,7 +301,7 @@
  486. 1096.49 s [opt-env-conf-test] where
  487. 1096.49 s [opt-env-conf-test] go :: Int -> Parser a -> ShowS
  488. 1096.49 s [opt-env-conf-test] go d = \case
  489. 1096.49 s [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  490. 1096.49 s [opt-env-conf-test] + ParserPure _ -> showParen True $ showString "Pure _"
  491. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  492. 1096.49 s [opt-env-conf-test] showParen (d > 10) $
  493. 1096.49 s [opt-env-conf-test] showString "Ap "
  494. 1096.49 s [opt-env-conf-test]
  495. 1096.49 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Parser.hs:304:34-40
  496. 1096.49 s [opt-env-conf-test] @@ -301,7 +301,7 @@
  497. 1096.49 s [opt-env-conf-test] where
  498. 1096.49 s [opt-env-conf-test] go :: Int -> Parser a -> ShowS
  499. 1096.49 s [opt-env-conf-test] go d = \case
  500. 1096.49 s [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  501. 1096.49 s [opt-env-conf-test] + ParserPure _ -> showParen (True) $ showString "Pure _"
  502. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  503. 1096.49 s [opt-env-conf-test] showParen (d > 10) $
  504. 1096.49 s [opt-env-conf-test] showString "Ap "
  505. 1096.49 s [opt-env-conf-test]
  506. 1096.49 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:304:38-40
  507. 1096.49 s [opt-env-conf-test] @@ -301,7 +301,7 @@
  508. 1096.49 s [opt-env-conf-test] where
  509. 1096.49 s [opt-env-conf-test] go :: Int -> Parser a -> ShowS
  510. 1096.49 s [opt-env-conf-test] go d = \case
  511. 1096.49 s [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  512. 1096.49 s [opt-env-conf-test] + ParserPure _ -> showParen (d > -10) $ showString "Pure _"
  513. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  514. 1096.49 s [opt-env-conf-test] showParen (d > 10) $
  515. 1096.49 s [opt-env-conf-test] showString "Ap "
  516. 1096.49 s [opt-env-conf-test]
  517. 1096.49 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:304:38-40
  518. 1096.49 s [opt-env-conf-test] @@ -301,7 +301,7 @@
  519. 1096.49 s [opt-env-conf-test] where
  520. 1096.49 s [opt-env-conf-test] go :: Int -> Parser a -> ShowS
  521. 1096.49 s [opt-env-conf-test] go d = \case
  522. 1096.49 s [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  523. 1096.49 s [opt-env-conf-test] + ParserPure _ -> showParen (d > 1) $ showString "Pure _"
  524. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  525. 1096.49 s [opt-env-conf-test] showParen (d > 10) $
  526. 1096.49 s [opt-env-conf-test] showString "Ap "
  527. 1096.49 s [opt-env-conf-test]
  528. 1096.49 s [opt-env-conf-test] IntLit at src/OptEnvConf/Parser.hs:304:38-40
  529. 1096.49 s [opt-env-conf-test] @@ -301,7 +301,7 @@
  530. 1096.49 s [opt-env-conf-test] where
  531. 1096.49 s [opt-env-conf-test] go :: Int -> Parser a -> ShowS
  532. 1096.49 s [opt-env-conf-test] go d = \case
  533. 1096.49 s [opt-env-conf-test] - ParserPure _ -> showParen (d > 10) $ showString "Pure _"
  534. 1096.49 s [opt-env-conf-test] + ParserPure _ -> showParen (d > 0) $ showString "Pure _"
  535. 1096.49 s [opt-env-conf-test] ParserAp pf pa ->
  536. 1096.49 s [opt-env-conf-test] showParen (d > 10) $
  537. 1096.49 s [opt-env-conf-test] showString "Ap "
  538. 1096.49 s [opt-env-conf-test]
  539. 1096.49 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  540. 1096.49 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  541. 1096.49 s [opt-env-conf-test] where
  542. 1096.49 s [opt-env-conf-test] go p =
  543. 1096.49 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  544. 1096.49 s [opt-env-conf-test] - in case p of
  545. 1096.49 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  546. 1096.49 s [opt-env-conf-test] - ParserAp {} -> p'
  547. 1096.49 s [opt-env-conf-test] - ParserSelect {} -> p'
  548. 1096.49 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  549. 1096.49 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  550. 1096.49 s [opt-env-conf-test] - ParserMany {} -> p'
  551. 1096.49 s [opt-env-conf-test] - ParserSome {} -> p'
  552. 1096.49 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  553. 1096.49 s [opt-env-conf-test] - ParserCheck {} -> p'
  554. 1096.49 s [opt-env-conf-test] - ParserCommands {} -> p'
  555. 1096.49 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  556. 1096.49 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  557. 1096.49 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  558. 1096.49 s [opt-env-conf-test] - Just _ -> p
  559. 1096.49 s [opt-env-conf-test] + in case p of
  560. 1096.49 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  561. 1096.49 s [opt-env-conf-test] + ParserAp {} -> p'
  562. 1096.49 s [opt-env-conf-test] + ParserSelect {} -> p'
  563. 1096.49 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  564. 1096.49 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  565. 1096.49 s [opt-env-conf-test] + ParserMany {} -> p'
  566. 1096.49 s [opt-env-conf-test] + ParserSome {} -> p'
  567. 1096.49 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  568. 1096.49 s [opt-env-conf-test] + ParserCheck {} -> p'
  569. 1096.49 s [opt-env-conf-test] + ParserCommands {} -> p'
  570. 1096.49 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  571. 1096.49 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  572. 1096.49 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  573. 1096.49 s [opt-env-conf-test] + Just _ -> p
  574. 1096.49 s [opt-env-conf-test]
  575. 1096.49 s [opt-env-conf-test] -- | Try a list of parsers in order
  576. 1096.49 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  577. 1096.49 s [opt-env-conf-test]
  578. 1096.49 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  579. 1096.49 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  580. 1096.49 s [opt-env-conf-test] where
  581. 1096.49 s [opt-env-conf-test] go p =
  582. 1096.49 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  583. 1096.49 s [opt-env-conf-test] - in case p of
  584. 1096.49 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  585. 1096.49 s [opt-env-conf-test] - ParserAp {} -> p'
  586. 1096.49 s [opt-env-conf-test] - ParserSelect {} -> p'
  587. 1096.49 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  588. 1096.49 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  589. 1096.49 s [opt-env-conf-test] - ParserMany {} -> p'
  590. 1096.49 s [opt-env-conf-test] - ParserSome {} -> p'
  591. 1096.49 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  592. 1096.49 s [opt-env-conf-test] - ParserCheck {} -> p'
  593. 1096.49 s [opt-env-conf-test] - ParserCommands {} -> p'
  594. 1096.49 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  595. 1096.49 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  596. 1096.49 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  597. 1096.49 s [opt-env-conf-test] - Just _ -> p
  598. 1096.49 s [opt-env-conf-test] + in case p of
  599. 1096.49 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  600. 1096.49 s [opt-env-conf-test] + ParserAp {} -> p'
  601. 1096.49 s [opt-env-conf-test] + ParserSelect {} -> p'
  602. 1096.49 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  603. 1096.49 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  604. 1096.49 s [opt-env-conf-test] + ParserMany {} -> p'
  605. 1096.49 s [opt-env-conf-test] + ParserSome {} -> p'
  606. 1096.49 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  607. 1096.49 s [opt-env-conf-test] + ParserCheck {} -> p'
  608. 1096.49 s [opt-env-conf-test] + ParserCommands {} -> p'
  609. 1096.50 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  610. 1096.50 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  611. 1096.50 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  612. 1096.50 s [opt-env-conf-test] + Just _ -> p
  613. 1096.50 s [opt-env-conf-test]
  614. 1096.50 s [opt-env-conf-test] -- | Try a list of parsers in order
  615. 1096.50 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  616. 1096.50 s [opt-env-conf-test]
  617. 1096.50 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  618. 1096.50 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  619. 1096.50 s [opt-env-conf-test] where
  620. 1096.50 s [opt-env-conf-test] go p =
  621. 1096.50 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  622. 1096.50 s [opt-env-conf-test] - in case p of
  623. 1096.50 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  624. 1096.50 s [opt-env-conf-test] - ParserAp {} -> p'
  625. 1096.50 s [opt-env-conf-test] - ParserSelect {} -> p'
  626. 1096.50 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  627. 1096.50 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  628. 1096.50 s [opt-env-conf-test] - ParserMany {} -> p'
  629. 1096.50 s [opt-env-conf-test] - ParserSome {} -> p'
  630. 1096.50 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  631. 1096.50 s [opt-env-conf-test] - ParserCheck {} -> p'
  632. 1096.50 s [opt-env-conf-test] - ParserCommands {} -> p'
  633. 1096.50 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  634. 1096.50 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  635. 1096.50 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  636. 1096.50 s [opt-env-conf-test] - Just _ -> p
  637. 1096.50 s [opt-env-conf-test] + in case p of
  638. 1096.50 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  639. 1096.50 s [opt-env-conf-test] + ParserAp {} -> p'
  640. 1096.50 s [opt-env-conf-test] + ParserSelect {} -> p'
  641. 1096.50 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  642. 1096.50 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  643. 1096.50 s [opt-env-conf-test] + ParserMany {} -> p'
  644. 1096.50 s [opt-env-conf-test] + ParserSome {} -> p'
  645. 1096.50 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  646. 1096.50 s [opt-env-conf-test] + ParserCheck {} -> p'
  647. 1096.50 s [opt-env-conf-test] + ParserCommands {} -> p'
  648. 1096.50 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  649. 1096.50 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  650. 1096.50 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  651. 1096.50 s [opt-env-conf-test] + Just _ -> p
  652. 1096.50 s [opt-env-conf-test]
  653. 1096.50 s [opt-env-conf-test] -- | Try a list of parsers in order
  654. 1096.50 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  655. 1096.50 s [opt-env-conf-test]
  656. 1096.50 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  657. 1096.50 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  658. 1096.50 s [opt-env-conf-test] where
  659. 1096.50 s [opt-env-conf-test] go p =
  660. 1096.50 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  661. 1096.50 s [opt-env-conf-test] - in case p of
  662. 1096.50 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  663. 1096.50 s [opt-env-conf-test] - ParserAp {} -> p'
  664. 1096.50 s [opt-env-conf-test] - ParserSelect {} -> p'
  665. 1096.50 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  666. 1096.50 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  667. 1096.50 s [opt-env-conf-test] - ParserMany {} -> p'
  668. 1096.50 s [opt-env-conf-test] - ParserSome {} -> p'
  669. 1096.50 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  670. 1096.50 s [opt-env-conf-test] - ParserCheck {} -> p'
  671. 1096.50 s [opt-env-conf-test] - ParserCommands {} -> p'
  672. 1096.50 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  673. 1096.50 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  674. 1096.50 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  675. 1096.50 s [opt-env-conf-test] - Just _ -> p
  676. 1096.50 s [opt-env-conf-test] + in case p of
  677. 1096.50 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  678. 1096.50 s [opt-env-conf-test] + ParserAp {} -> p'
  679. 1096.50 s [opt-env-conf-test] + ParserSelect {} -> p'
  680. 1096.50 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  681. 1096.50 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  682. 1096.50 s [opt-env-conf-test] + ParserMany {} -> p'
  683. 1096.50 s [opt-env-conf-test] + ParserSome {} -> p'
  684. 1096.50 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  685. 1096.50 s [opt-env-conf-test] + ParserCheck {} -> p'
  686. 1096.50 s [opt-env-conf-test] + ParserCommands {} -> p'
  687. 1096.50 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  688. 1096.50 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  689. 1096.50 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  690. 1096.50 s [opt-env-conf-test] + Just _ -> p
  691. 1096.50 s [opt-env-conf-test]
  692. 1096.50 s [opt-env-conf-test] -- | Try a list of parsers in order
  693. 1096.50 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  694. 1096.50 s [opt-env-conf-test]
  695. 1096.50 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  696. 1096.50 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  697. 1096.50 s [opt-env-conf-test] where
  698. 1096.50 s [opt-env-conf-test] go p =
  699. 1096.50 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  700. 1096.50 s [opt-env-conf-test] - in case p of
  701. 1096.50 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  702. 1096.50 s [opt-env-conf-test] - ParserAp {} -> p'
  703. 1096.50 s [opt-env-conf-test] - ParserSelect {} -> p'
  704. 1096.50 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  705. 1096.50 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  706. 1096.50 s [opt-env-conf-test] - ParserMany {} -> p'
  707. 1096.50 s [opt-env-conf-test] - ParserSome {} -> p'
  708. 1096.50 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  709. 1096.50 s [opt-env-conf-test] - ParserCheck {} -> p'
  710. 1096.50 s [opt-env-conf-test] - ParserCommands {} -> p'
  711. 1096.50 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  712. 1096.50 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  713. 1096.50 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  714. 1096.50 s [opt-env-conf-test] - Just _ -> p
  715. 1096.50 s [opt-env-conf-test] + in case p of
  716. 1096.50 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  717. 1096.50 s [opt-env-conf-test] + ParserAp {} -> p'
  718. 1096.50 s [opt-env-conf-test] + ParserSelect {} -> p'
  719. 1096.50 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  720. 1096.50 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  721. 1096.50 s [opt-env-conf-test] + ParserMany {} -> p'
  722. 1096.50 s [opt-env-conf-test] + ParserSome {} -> p'
  723. 1096.50 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  724. 1096.50 s [opt-env-conf-test] + ParserCheck {} -> p'
  725. 1096.50 s [opt-env-conf-test] + ParserCommands {} -> p'
  726. 1096.50 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  727. 1096.50 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  728. 1096.50 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  729. 1096.50 s [opt-env-conf-test] + Just _ -> p
  730. 1096.50 s [opt-env-conf-test]
  731. 1096.50 s [opt-env-conf-test] -- | Try a list of parsers in order
  732. 1096.50 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  733. 1096.50 s [opt-env-conf-test]
  734. 1096.50 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  735. 1096.50 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  736. 1096.50 s [opt-env-conf-test] where
  737. 1096.50 s [opt-env-conf-test] go p =
  738. 1096.50 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  739. 1096.50 s [opt-env-conf-test] - in case p of
  740. 1096.50 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  741. 1096.50 s [opt-env-conf-test] - ParserAp {} -> p'
  742. 1096.50 s [opt-env-conf-test] - ParserSelect {} -> p'
  743. 1096.50 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  744. 1096.50 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  745. 1096.50 s [opt-env-conf-test] - ParserMany {} -> p'
  746. 1096.50 s [opt-env-conf-test] - ParserSome {} -> p'
  747. 1096.50 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  748. 1096.50 s [opt-env-conf-test] - ParserCheck {} -> p'
  749. 1096.50 s [opt-env-conf-test] - ParserCommands {} -> p'
  750. 1096.50 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  751. 1096.50 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  752. 1096.50 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  753. 1096.50 s [opt-env-conf-test] - Just _ -> p
  754. 1096.50 s [opt-env-conf-test] + in case p of
  755. 1096.50 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  756. 1096.50 s [opt-env-conf-test] + ParserAp {} -> p'
  757. 1096.50 s [opt-env-conf-test] + ParserSelect {} -> p'
  758. 1096.50 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  759. 1096.50 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  760. 1096.50 s [opt-env-conf-test] + ParserMany {} -> p'
  761. 1096.50 s [opt-env-conf-test] + ParserSome {} -> p'
  762. 1096.50 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  763. 1096.50 s [opt-env-conf-test] + ParserCheck {} -> p'
  764. 1096.50 s [opt-env-conf-test] + ParserCommands {} -> p'
  765. 1096.50 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  766. 1096.50 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  767. 1096.50 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  768. 1096.50 s [opt-env-conf-test] + Just _ -> p
  769. 1096.50 s [opt-env-conf-test]
  770. 1096.50 s [opt-env-conf-test] -- | Try a list of parsers in order
  771. 1096.50 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  772. 1096.50 s [opt-env-conf-test]
  773. 1096.50 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  774. 1096.50 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  775. 1096.50 s [opt-env-conf-test] where
  776. 1096.50 s [opt-env-conf-test] go p =
  777. 1096.50 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  778. 1096.50 s [opt-env-conf-test] - in case p of
  779. 1096.50 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  780. 1096.50 s [opt-env-conf-test] - ParserAp {} -> p'
  781. 1096.50 s [opt-env-conf-test] - ParserSelect {} -> p'
  782. 1096.50 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  783. 1096.50 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  784. 1096.50 s [opt-env-conf-test] - ParserMany {} -> p'
  785. 1096.50 s [opt-env-conf-test] - ParserSome {} -> p'
  786. 1096.50 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  787. 1096.50 s [opt-env-conf-test] - ParserCheck {} -> p'
  788. 1096.50 s [opt-env-conf-test] - ParserCommands {} -> p'
  789. 1096.50 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  790. 1096.50 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  791. 1096.50 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  792. 1096.50 s [opt-env-conf-test] - Just _ -> p
  793. 1096.50 s [opt-env-conf-test] + in case p of
  794. 1096.50 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  795. 1096.50 s [opt-env-conf-test] + ParserAp {} -> p'
  796. 1096.50 s [opt-env-conf-test] + ParserSelect {} -> p'
  797. 1096.50 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  798. 1096.50 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  799. 1096.50 s [opt-env-conf-test] + ParserMany {} -> p'
  800. 1096.50 s [opt-env-conf-test] + ParserSome {} -> p'
  801. 1096.50 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  802. 1096.50 s [opt-env-conf-test] + ParserCheck {} -> p'
  803. 1096.50 s [opt-env-conf-test] + ParserCommands {} -> p'
  804. 1096.50 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  805. 1096.50 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  806. 1096.50 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  807. 1096.50 s [opt-env-conf-test] + Just _ -> p
  808. 1096.50 s [opt-env-conf-test]
  809. 1096.50 s [opt-env-conf-test] -- | Try a list of parsers in order
  810. 1096.50 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  811. 1096.50 s [opt-env-conf-test]
  812. 1096.50 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  813. 1096.50 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  814. 1096.50 s [opt-env-conf-test] where
  815. 1096.50 s [opt-env-conf-test] go p =
  816. 1096.50 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  817. 1096.50 s [opt-env-conf-test] - in case p of
  818. 1096.50 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  819. 1096.50 s [opt-env-conf-test] - ParserAp {} -> p'
  820. 1096.50 s [opt-env-conf-test] - ParserSelect {} -> p'
  821. 1096.50 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  822. 1096.50 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  823. 1096.50 s [opt-env-conf-test] - ParserMany {} -> p'
  824. 1096.50 s [opt-env-conf-test] - ParserSome {} -> p'
  825. 1096.50 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  826. 1096.50 s [opt-env-conf-test] - ParserCheck {} -> p'
  827. 1096.50 s [opt-env-conf-test] - ParserCommands {} -> p'
  828. 1096.50 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  829. 1096.50 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  830. 1096.50 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  831. 1096.50 s [opt-env-conf-test] - Just _ -> p
  832. 1096.50 s [opt-env-conf-test] + in case p of
  833. 1096.50 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  834. 1096.50 s [opt-env-conf-test] + ParserAp {} -> p'
  835. 1096.50 s [opt-env-conf-test] + ParserSelect {} -> p'
  836. 1096.50 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  837. 1096.50 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  838. 1096.50 s [opt-env-conf-test] + ParserMany {} -> p'
  839. 1096.50 s [opt-env-conf-test] + ParserSome {} -> p'
  840. 1096.50 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  841. 1096.50 s [opt-env-conf-test] + ParserCheck {} -> p'
  842. 1096.50 s [opt-env-conf-test] + ParserCommands {} -> p'
  843. 1096.50 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  844. 1096.50 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  845. 1096.50 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  846. 1096.50 s [opt-env-conf-test] + Just _ -> p
  847. 1096.50 s [opt-env-conf-test]
  848. 1096.50 s [opt-env-conf-test] -- | Try a list of parsers in order
  849. 1096.50 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  850. 1096.50 s [opt-env-conf-test]
  851. 1096.50 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  852. 1096.50 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  853. 1096.50 s [opt-env-conf-test] where
  854. 1096.50 s [opt-env-conf-test] go p =
  855. 1096.51 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  856. 1096.51 s [opt-env-conf-test] - in case p of
  857. 1096.51 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  858. 1096.51 s [opt-env-conf-test] - ParserAp {} -> p'
  859. 1096.51 s [opt-env-conf-test] - ParserSelect {} -> p'
  860. 1096.51 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  861. 1096.51 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  862. 1096.51 s [opt-env-conf-test] - ParserMany {} -> p'
  863. 1096.51 s [opt-env-conf-test] - ParserSome {} -> p'
  864. 1096.51 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  865. 1096.51 s [opt-env-conf-test] - ParserCheck {} -> p'
  866. 1096.51 s [opt-env-conf-test] - ParserCommands {} -> p'
  867. 1096.51 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  868. 1096.51 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  869. 1096.51 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  870. 1096.51 s [opt-env-conf-test] - Just _ -> p
  871. 1096.51 s [opt-env-conf-test] + in case p of
  872. 1096.51 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  873. 1096.51 s [opt-env-conf-test] + ParserAp {} -> p'
  874. 1096.51 s [opt-env-conf-test] + ParserSelect {} -> p'
  875. 1096.51 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  876. 1096.51 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  877. 1096.51 s [opt-env-conf-test] + ParserMany {} -> p'
  878. 1096.51 s [opt-env-conf-test] + ParserSome {} -> p'
  879. 1096.51 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  880. 1096.51 s [opt-env-conf-test] + ParserCheck {} -> p'
  881. 1096.51 s [opt-env-conf-test] + ParserCommands {} -> p'
  882. 1096.51 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  883. 1096.51 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  884. 1096.51 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  885. 1096.51 s [opt-env-conf-test] + Just _ -> p
  886. 1096.51 s [opt-env-conf-test]
  887. 1096.51 s [opt-env-conf-test] -- | Try a list of parsers in order
  888. 1096.51 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  889. 1096.51 s [opt-env-conf-test]
  890. 1096.51 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:550:11-26
  891. 1096.51 s [opt-env-conf-test] @@ -547,21 +547,21 @@
  892. 1096.51 s [opt-env-conf-test] where
  893. 1096.51 s [opt-env-conf-test] go p =
  894. 1096.51 s [opt-env-conf-test] let p' = p <|> pure defaultValue
  895. 1096.51 s [opt-env-conf-test] - in case p of
  896. 1096.51 s [opt-env-conf-test] - ParserPure a -> ParserPure a
  897. 1096.51 s [opt-env-conf-test] - ParserAp {} -> p'
  898. 1096.51 s [opt-env-conf-test] - ParserSelect {} -> p'
  899. 1096.51 s [opt-env-conf-test] - ParserEmpty _ -> ParserPure defaultValue
  900. 1096.51 s [opt-env-conf-test] - ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  901. 1096.51 s [opt-env-conf-test] - ParserMany {} -> p'
  902. 1096.51 s [opt-env-conf-test] - ParserSome {} -> p'
  903. 1096.51 s [opt-env-conf-test] - ParserAllOrNothing {} -> p'
  904. 1096.51 s [opt-env-conf-test] - ParserCheck {} -> p'
  905. 1096.51 s [opt-env-conf-test] - ParserCommands {} -> p'
  906. 1096.51 s [opt-env-conf-test] - ParserWithConfig {} -> p'
  907. 1096.51 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  908. 1096.51 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  909. 1096.51 s [opt-env-conf-test] - Just _ -> p
  910. 1096.51 s [opt-env-conf-test] + in case p of
  911. 1096.51 s [opt-env-conf-test] + ParserPure a -> ParserPure a
  912. 1096.51 s [opt-env-conf-test] + ParserAp {} -> p'
  913. 1096.51 s [opt-env-conf-test] + ParserSelect {} -> p'
  914. 1096.51 s [opt-env-conf-test] + ParserEmpty _ -> ParserPure defaultValue
  915. 1096.51 s [opt-env-conf-test] + ParserAlt p1 p2 -> ParserAlt p1 (go p2)
  916. 1096.51 s [opt-env-conf-test] + ParserMany {} -> p'
  917. 1096.51 s [opt-env-conf-test] + ParserSome {} -> p'
  918. 1096.51 s [opt-env-conf-test] + ParserAllOrNothing {} -> p'
  919. 1096.51 s [opt-env-conf-test] + ParserCheck {} -> p'
  920. 1096.51 s [opt-env-conf-test] + ParserCommands {} -> p'
  921. 1096.51 s [opt-env-conf-test] + ParserWithConfig {} -> p'
  922. 1096.51 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  923. 1096.51 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  924. 1096.51 s [opt-env-conf-test] + Just _ -> p
  925. 1096.51 s [opt-env-conf-test]
  926. 1096.51 s [opt-env-conf-test] -- | Try a list of parsers in order
  927. 1096.51 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  928. 1096.51 s [opt-env-conf-test]
  929. 1096.51 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:562:37-26
  930. 1096.51 s [opt-env-conf-test] @@ -559,9 +559,9 @@
  931. 1096.51 s [opt-env-conf-test] ParserCheck {} -> p'
  932. 1096.51 s [opt-env-conf-test] ParserCommands {} -> p'
  933. 1096.51 s [opt-env-conf-test] ParserWithConfig {} -> p'
  934. 1096.51 s [opt-env-conf-test] - ParserSetting mLoc s -> case settingDefaultValue s of
  935. 1096.51 s [opt-env-conf-test] - Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  936. 1096.51 s [opt-env-conf-test] - Just _ -> p
  937. 1096.51 s [opt-env-conf-test] + ParserSetting mLoc s -> case settingDefaultValue s of
  938. 1096.51 s [opt-env-conf-test] + Nothing -> ParserSetting mLoc $ s {settingDefaultValue = Just (defaultValue, showDefault defaultValue)}
  939. 1096.51 s [opt-env-conf-test] + Just _ -> p
  940. 1096.51 s [opt-env-conf-test]
  941. 1096.51 s [opt-env-conf-test] -- | Try a list of parsers in order
  942. 1096.51 s [opt-env-conf-test] choice :: (HasCallStack) => [Parser a] -> Parser a
  943. 1096.51 s [opt-env-conf-test]
  944. 1096.51 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Parser.hs:602:15-28
  945. 1096.51 s [opt-env-conf-test] @@ -599,9 +599,9 @@
  946. 1096.51 s [opt-env-conf-test] checkMapMaybe func p =
  947. 1096.51 s [opt-env-conf-test] withFrozenCallStack $
  948. 1096.51 s [opt-env-conf-test] checkMapEither
  949. 1096.51 s [opt-env-conf-test] - ( \a -> case func a of
  950. 1096.51 s [opt-env-conf-test] - Nothing -> Left "checkMapMaybe failed without a helpful error message"
  951. 1096.51 s [opt-env-conf-test] - Just b -> Right b
  952. 1096.51 s [opt-env-conf-test] + ( \a -> case func a of
  953. 1096.51 s [opt-env-conf-test] + Nothing -> Left "checkMapMaybe failed without a helpful error message"
  954. 1096.51 s [opt-env-conf-test] + Just b -> Right b
  955. 1096.51 s [opt-env-conf-test] )
  956. 1096.51 s [opt-env-conf-test] p
  957. 1096.51 s [opt-env-conf-test]
  958. 1096.51 s [opt-env-conf-test]
  959. 1096.51 s [opt-env-conf-test] CondFlip at src/OptEnvConf/Completer.hs:117:28-81
  960. 1096.51 s [opt-env-conf-test] @@ -114,7 +114,7 @@
  961. 1096.51 s [opt-env-conf-test] Just (Rel rf) -> do
  962. 1096.51 s [opt-env-conf-test] let dir = parent rf
  963. 1096.51 s [opt-env-conf-test] let ad = baseDir </> dir
  964. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  965. 1096.51 s [opt-env-conf-test] + let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  966. 1096.51 s [opt-env-conf-test] (ds, fs) <- listDirForgiving ad
  967. 1096.51 s [opt-env-conf-test] pure
  968. 1096.51 s [opt-env-conf-test] ( map (fromRelDir . (dir </>)) $ filterHidden ds,
  969. 1096.51 s [opt-env-conf-test]
  970. 1096.51 s [opt-env-conf-test] Negate at src/OptEnvConf/Completer.hs:117:31-43
  971. 1096.51 s [opt-env-conf-test] @@ -114,7 +114,7 @@
  972. 1096.51 s [opt-env-conf-test] Just (Rel rf) -> do
  973. 1096.51 s [opt-env-conf-test] let dir = parent rf
  974. 1096.51 s [opt-env-conf-test] let ad = baseDir </> dir
  975. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  976. 1096.51 s [opt-env-conf-test] + let filterHidden = if not (hiddenRel rf) then id else filter (not . hiddenRel)
  977. 1096.51 s [opt-env-conf-test] (ds, fs) <- listDirForgiving ad
  978. 1096.51 s [opt-env-conf-test] pure
  979. 1096.51 s [opt-env-conf-test] ( map (fromRelDir . (dir </>)) $ filterHidden ds,
  980. 1096.51 s [opt-env-conf-test]
  981. 1096.51 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:117:31-43
  982. 1096.51 s [opt-env-conf-test] @@ -114,7 +114,7 @@
  983. 1096.51 s [opt-env-conf-test] Just (Rel rf) -> do
  984. 1096.51 s [opt-env-conf-test] let dir = parent rf
  985. 1096.51 s [opt-env-conf-test] let ad = baseDir </> dir
  986. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  987. 1096.51 s [opt-env-conf-test] + let filterHidden = if False then id else filter (not . hiddenRel)
  988. 1096.51 s [opt-env-conf-test] (ds, fs) <- listDirForgiving ad
  989. 1096.51 s [opt-env-conf-test] pure
  990. 1096.51 s [opt-env-conf-test] ( map (fromRelDir . (dir </>)) $ filterHidden ds,
  991. 1096.51 s [opt-env-conf-test]
  992. 1096.51 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:117:31-43
  993. 1096.51 s [opt-env-conf-test] @@ -114,7 +114,7 @@
  994. 1096.51 s [opt-env-conf-test] Just (Rel rf) -> do
  995. 1096.51 s [opt-env-conf-test] let dir = parent rf
  996. 1096.51 s [opt-env-conf-test] let ad = baseDir </> dir
  997. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  998. 1096.51 s [opt-env-conf-test] + let filterHidden = if True then id else filter (not . hiddenRel)
  999. 1096.51 s [opt-env-conf-test] (ds, fs) <- listDirForgiving ad
  1000. 1096.51 s [opt-env-conf-test] pure
  1001. 1096.51 s [opt-env-conf-test] ( map (fromRelDir . (dir </>)) $ filterHidden ds,
  1002. 1096.51 s [opt-env-conf-test]
  1003. 1096.51 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completer.hs:171:31-66
  1004. 1096.51 s [opt-env-conf-test] @@ -168,24 +168,24 @@
  1005. 1096.51 s [opt-env-conf-test] (ds, _) <- listDirForgiving ad
  1006. 1096.51 s [opt-env-conf-test] pure (map (fromRelDir . (rd </>)) $ filter (not . hiddenRel) ds)
  1007. 1096.51 s [opt-env-conf-test]
  1008. 1096.51 s [opt-env-conf-test] - dirsFromPartialListing <- case parseSomeDir fp of
  1009. 1096.51 s [opt-env-conf-test] - Nothing -> pure []
  1010. 1096.51 s [opt-env-conf-test] - Just (Abs af) -> do
  1011. 1096.51 s [opt-env-conf-test] - let dir = parent af
  1012. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel (dirname af) then id else filter (not . hiddenRel)
  1013. 1096.51 s [opt-env-conf-test] - (ds, _) <- listDirForgiving dir
  1014. 1096.51 s [opt-env-conf-test] - pure (map (fromAbsDir . (dir </>)) $ filterHidden ds)
  1015. 1096.51 s [opt-env-conf-test] - Just (Rel rf) ->
  1016. 1096.51 s [opt-env-conf-test] - if fp == "."
  1017. 1096.51 s [opt-env-conf-test] - then do
  1018. 1096.51 s [opt-env-conf-test] - (ds, _) <- listDirRel baseDir
  1019. 1096.51 s [opt-env-conf-test] - pure (map fromRelDir ds)
  1020. 1096.51 s [opt-env-conf-test] - else do
  1021. 1096.51 s [opt-env-conf-test] - let dir = parent rf
  1022. 1096.51 s [opt-env-conf-test] - let ad = baseDir </> dir
  1023. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  1024. 1096.51 s [opt-env-conf-test] - (ds, _) <- listDirForgiving ad
  1025. 1096.51 s [opt-env-conf-test] - pure (map (fromRelDir . (dir </>)) $ filterHidden ds)
  1026. 1096.51 s [opt-env-conf-test] + dirsFromPartialListing <- case parseSomeDir fp of
  1027. 1096.51 s [opt-env-conf-test] + Nothing -> pure []
  1028. 1096.51 s [opt-env-conf-test] + Just (Abs af) -> do
  1029. 1096.51 s [opt-env-conf-test] + let dir = parent af
  1030. 1096.51 s [opt-env-conf-test] + let filterHidden = if hiddenRel (dirname af) then id else filter (not . hiddenRel)
  1031. 1096.51 s [opt-env-conf-test] + (ds, _) <- listDirForgiving dir
  1032. 1096.51 s [opt-env-conf-test] + pure (map (fromAbsDir . (dir </>)) $ filterHidden ds)
  1033. 1096.51 s [opt-env-conf-test] + Just (Rel rf) ->
  1034. 1096.51 s [opt-env-conf-test] + if fp == "."
  1035. 1096.51 s [opt-env-conf-test] + then do
  1036. 1096.51 s [opt-env-conf-test] + (ds, _) <- listDirRel baseDir
  1037. 1096.51 s [opt-env-conf-test] + pure (map fromRelDir ds)
  1038. 1096.51 s [opt-env-conf-test] + else do
  1039. 1096.51 s [opt-env-conf-test] + let dir = parent rf
  1040. 1096.51 s [opt-env-conf-test] + let ad = baseDir </> dir
  1041. 1096.51 s [opt-env-conf-test] + let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  1042. 1096.51 s [opt-env-conf-test] + (ds, _) <- listDirForgiving ad
  1043. 1096.51 s [opt-env-conf-test] + pure (map (fromRelDir . (dir </>)) $ filterHidden ds)
  1044. 1096.51 s [opt-env-conf-test]
  1045. 1096.51 s [opt-env-conf-test] pure $
  1046. 1096.51 s [opt-env-conf-test] concat
  1047. 1096.51 s [opt-env-conf-test]
  1048. 1096.51 s [opt-env-conf-test] CondFlip at src/OptEnvConf/Completer.hs:186:32-85
  1049. 1096.51 s [opt-env-conf-test] @@ -183,7 +183,7 @@
  1050. 1096.51 s [opt-env-conf-test] else do
  1051. 1096.51 s [opt-env-conf-test] let dir = parent rf
  1052. 1096.51 s [opt-env-conf-test] let ad = baseDir </> dir
  1053. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  1054. 1096.51 s [opt-env-conf-test] + let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  1055. 1096.51 s [opt-env-conf-test] (ds, _) <- listDirForgiving ad
  1056. 1096.51 s [opt-env-conf-test] pure (map (fromRelDir . (dir </>)) $ filterHidden ds)
  1057. 1096.51 s [opt-env-conf-test]
  1058. 1096.51 s [opt-env-conf-test]
  1059. 1096.51 s [opt-env-conf-test] Negate at src/OptEnvConf/Completer.hs:186:35-47
  1060. 1096.51 s [opt-env-conf-test] @@ -183,7 +183,7 @@
  1061. 1096.51 s [opt-env-conf-test] else do
  1062. 1096.51 s [opt-env-conf-test] let dir = parent rf
  1063. 1096.51 s [opt-env-conf-test] let ad = baseDir </> dir
  1064. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  1065. 1096.51 s [opt-env-conf-test] + let filterHidden = if not (hiddenRel rf) then id else filter (not . hiddenRel)
  1066. 1096.51 s [opt-env-conf-test] (ds, _) <- listDirForgiving ad
  1067. 1096.51 s [opt-env-conf-test] pure (map (fromRelDir . (dir </>)) $ filterHidden ds)
  1068. 1096.51 s [opt-env-conf-test]
  1069. 1096.51 s [opt-env-conf-test]
  1070. 1096.51 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:186:35-47
  1071. 1096.51 s [opt-env-conf-test] @@ -183,7 +183,7 @@
  1072. 1096.51 s [opt-env-conf-test] else do
  1073. 1096.51 s [opt-env-conf-test] let dir = parent rf
  1074. 1096.51 s [opt-env-conf-test] let ad = baseDir </> dir
  1075. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  1076. 1096.51 s [opt-env-conf-test] + let filterHidden = if False then id else filter (not . hiddenRel)
  1077. 1096.51 s [opt-env-conf-test] (ds, _) <- listDirForgiving ad
  1078. 1096.51 s [opt-env-conf-test] pure (map (fromRelDir . (dir </>)) $ filterHidden ds)
  1079. 1096.51 s [opt-env-conf-test]
  1080. 1096.51 s [opt-env-conf-test]
  1081. 1096.51 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:186:35-47
  1082. 1096.51 s [opt-env-conf-test] @@ -183,7 +183,7 @@
  1083. 1096.51 s [opt-env-conf-test] else do
  1084. 1096.51 s [opt-env-conf-test] let dir = parent rf
  1085. 1096.51 s [opt-env-conf-test] let ad = baseDir </> dir
  1086. 1096.51 s [opt-env-conf-test] - let filterHidden = if hiddenRel rf then id else filter (not . hiddenRel)
  1087. 1096.51 s [opt-env-conf-test] + let filterHidden = if True then id else filter (not . hiddenRel)
  1088. 1096.51 s [opt-env-conf-test] (ds, _) <- listDirForgiving ad
  1089. 1096.51 s [opt-env-conf-test] pure (map (fromRelDir . (dir </>)) $ filterHidden ds)
  1090. 1096.51 s [opt-env-conf-test]
  1091. 1096.51 s [opt-env-conf-test]
  1092. 1096.51 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Completer.hs:179:12-21
  1093. 1096.51 s [opt-env-conf-test] @@ -176,7 +176,7 @@
  1094. 1096.51 s [opt-env-conf-test] (ds, _) <- listDirForgiving dir
  1095. 1096.51 s [opt-env-conf-test] pure (map (fromAbsDir . (dir </>)) $ filterHidden ds)
  1096. 1096.51 s [opt-env-conf-test] Just (Rel rf) ->
  1097. 1096.51 s [opt-env-conf-test] - if fp == "."
  1098. 1096.51 s [opt-env-conf-test] + if False
  1099. 1096.51 s [opt-env-conf-test] then do
  1100. 1096.51 s [opt-env-conf-test] (ds, _) <- listDirRel baseDir
  1101. 1096.52 s [opt-env-conf-test] pure (map fromRelDir ds)
  1102. 1096.52 s [opt-env-conf-test]
  1103. 1096.52 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completer.hs:157:30-73
  1104. 1096.52 s [opt-env-conf-test] @@ -154,19 +154,19 @@
  1105. 1096.52 s [opt-env-conf-test] directoryPathFromDir baseDir prefix fp fp' = do
  1106. 1096.52 s [opt-env-conf-test] fmap (filterPrefix fp' . map (addPrefix prefix . dirResult)) $ do
  1107. 1096.52 s [opt-env-conf-test] let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d)
  1108. 1096.52 s [opt-env-conf-test] - dirsFromParentListing <- case parseSomeDir fp of
  1109. 1096.52 s [opt-env-conf-test] - Nothing -> case fp of
  1110. 1096.52 s [opt-env-conf-test] - [] -> do
  1111. 1096.52 s [opt-env-conf-test] - (ds, _) <- listDirRel baseDir
  1112. 1096.52 s [opt-env-conf-test] - pure (map fromRelDir $ filter (not . hiddenRel) ds)
  1113. 1096.52 s [opt-env-conf-test] - _ -> pure []
  1114. 1096.52 s [opt-env-conf-test] - Just (Abs ad) -> do
  1115. 1096.52 s [opt-env-conf-test] - (ds, _) <- listDirForgiving ad
  1116. 1096.52 s [opt-env-conf-test] - pure (map (fromAbsDir . (ad </>)) $ filter (not . hiddenRel) ds)
  1117. 1096.52 s [opt-env-conf-test] - Just (Rel rd) -> do
  1118. 1096.52 s [opt-env-conf-test] - let ad = baseDir </> rd
  1119. 1096.52 s [opt-env-conf-test] - (ds, _) <- listDirForgiving ad
  1120. 1096.52 s [opt-env-conf-test] - pure (map (fromRelDir . (rd </>)) $ filter (not . hiddenRel) ds)
  1121. 1096.52 s [opt-env-conf-test] + dirsFromParentListing <- case parseSomeDir fp of
  1122. 1096.52 s [opt-env-conf-test] + Nothing -> case fp of
  1123. 1096.52 s [opt-env-conf-test] + [] -> do
  1124. 1096.52 s [opt-env-conf-test] + (ds, _) <- listDirRel baseDir
  1125. 1096.52 s [opt-env-conf-test] + pure (map fromRelDir $ filter (not . hiddenRel) ds)
  1126. 1096.52 s [opt-env-conf-test] + _ -> pure []
  1127. 1096.52 s [opt-env-conf-test] + Just (Abs ad) -> do
  1128. 1096.52 s [opt-env-conf-test] + (ds, _) <- listDirForgiving ad
  1129. 1096.52 s [opt-env-conf-test] + pure (map (fromAbsDir . (ad </>)) $ filter (not . hiddenRel) ds)
  1130. 1096.52 s [opt-env-conf-test] + Just (Rel rd) -> do
  1131. 1096.52 s [opt-env-conf-test] + let ad = baseDir </> rd
  1132. 1096.52 s [opt-env-conf-test] + (ds, _) <- listDirForgiving ad
  1133. 1096.52 s [opt-env-conf-test] + pure (map (fromRelDir . (rd </>)) $ filter (not . hiddenRel) ds)
  1134. 1096.52 s [opt-env-conf-test]
  1135. 1096.52 s [opt-env-conf-test] dirsFromPartialListing <- case parseSomeDir fp of
  1136. 1096.52 s [opt-env-conf-test] Nothing -> pure []
  1137. 1096.52 s [opt-env-conf-test]
  1138. 1096.52 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completer.hs:158:18-21
  1139. 1096.52 s [opt-env-conf-test] @@ -155,11 +155,11 @@
  1140. 1096.52 s [opt-env-conf-test] fmap (filterPrefix fp' . map (addPrefix prefix . dirResult)) $ do
  1141. 1096.52 s [opt-env-conf-test] let listDirForgiving d = fromMaybe ([], []) <$> forgivingAbsence (listDirRel d)
  1142. 1096.52 s [opt-env-conf-test] dirsFromParentListing <- case parseSomeDir fp of
  1143. 1096.52 s [opt-env-conf-test] - Nothing -> case fp of
  1144. 1096.52 s [opt-env-conf-test] - [] -> do
  1145. 1096.52 s [opt-env-conf-test] - (ds, _) <- listDirRel baseDir
  1146. 1096.52 s [opt-env-conf-test] - pure (map fromRelDir $ filter (not . hiddenRel) ds)
  1147. 1096.52 s [opt-env-conf-test] - _ -> pure []
  1148. 1096.52 s [opt-env-conf-test] + Nothing -> case fp of
  1149. 1096.52 s [opt-env-conf-test] + [] -> do
  1150. 1096.52 s [opt-env-conf-test] + (ds, _) <- listDirRel baseDir
  1151. 1096.52 s [opt-env-conf-test] + pure (map fromRelDir $ filter (not . hiddenRel) ds)
  1152. 1096.52 s [opt-env-conf-test] + _ -> pure []
  1153. 1096.52 s [opt-env-conf-test] Just (Abs ad) -> do
  1154. 1096.52 s [opt-env-conf-test] (ds, _) <- listDirForgiving ad
  1155. 1096.52 s [opt-env-conf-test] pure (map (fromAbsDir . (ad </>)) $ filter (not . hiddenRel) ds)
  1156. 1096.52 s [opt-env-conf-test]
  1157. 1096.52 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Completion.hs:453:24-40
  1158. 1096.52 s [opt-env-conf-test] @@ -450,7 +450,7 @@
  1159. 1096.52 s [opt-env-conf-test] put as'
  1160. 1096.52 s [opt-env-conf-test] pure $ Just []
  1161. 1096.52 s [opt-env-conf-test] else do
  1162. 1096.52 s [opt-env-conf-test] - if settingTryOption
  1163. 1096.52 s [opt-env-conf-test] + if True
  1164. 1096.52 s [opt-env-conf-test] then do
  1165. 1096.52 s [opt-env-conf-test] -- First we try to consume the option so we don't suggest it if it's already been parsed
  1166. 1096.52 s [opt-env-conf-test] case Args.consumeOption settingDasheds as of
  1167. 1096.52 s [opt-env-conf-test]
  1168. 1096.52 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Completion.hs:435:21-51
  1169. 1096.52 s [opt-env-conf-test] @@ -432,11 +432,11 @@
  1170. 1096.52 s [opt-env-conf-test] -- consumeArgument) or because only the consume-nothing
  1171. 1096.52 s [opt-env-conf-test] -- fallback matched. In both cases, offer the
  1172. 1096.52 s [opt-env-conf-test] -- completer if we are at the end.
  1173. 1096.52 s [opt-env-conf-test] - case possibilities of
  1174. 1096.52 s [opt-env-conf-test] - [] -> completeWithCompleterAtEnd
  1175. 1096.52 s [opt-env-conf-test] - (_, as') : _ -> do
  1176. 1096.52 s [opt-env-conf-test] - put as'
  1177. 1096.52 s [opt-env-conf-test] - completeWithCompleterAtEnd
  1178. 1096.52 s [opt-env-conf-test] + case possibilities of
  1179. 1096.52 s [opt-env-conf-test] + [] -> completeWithCompleterAtEnd
  1180. 1096.52 s [opt-env-conf-test] + (_, as') : _ -> do
  1181. 1096.52 s [opt-env-conf-test] + put as'
  1182. 1096.52 s [opt-env-conf-test] + completeWithCompleterAtEnd
  1183. 1096.52 s [opt-env-conf-test] else
  1184. 1096.52 s [opt-env-conf-test] if isJust settingSwitchValue
  1185. 1096.52 s [opt-env-conf-test] then do
  1186. 1096.52 s [opt-env-conf-test]
  1187. 1096.52 s [opt-env-conf-test] RemoveAction at src/OptEnvConf/Doc.hs:370:15-16
  1188. 1096.52 s [opt-env-conf-test] @@ -367,11 +367,11 @@
  1189. 1096.52 s [opt-env-conf-test] | not (null commandDocs)
  1190. 1096.52 s [opt-env-conf-test] ],
  1191. 1096.52 s [opt-env-conf-test] concat
  1192. 1096.52 s [opt-env-conf-test] - [ [ headerChunks "Options",
  1193. 1096.52 s [opt-env-conf-test] - renderLongOptDocs optDocs
  1194. 1096.52 s [opt-env-conf-test] - ]
  1195. 1096.52 s [opt-env-conf-test] - | not (nullDocs optDocs)
  1196. 1096.52 s [opt-env-conf-test] - ],
  1197. 1096.52 s [opt-env-conf-test] + [ [ headerChunks "Options",
  1198. 1096.52 s [opt-env-conf-test] + renderLongOptDocs optDocs
  1199. 1096.52 s [opt-env-conf-test] + ]
  1200. 1096.52 s [opt-env-conf-test] + | not (nullDocs optDocs)
  1201. 1096.52 s [opt-env-conf-test] + ],
  1202. 1096.52 s [opt-env-conf-test] concat
  1203. 1096.52 s [opt-env-conf-test] [ [ headerChunks "Environment Variables",
  1204. 1096.52 s [opt-env-conf-test] renderEnvDocs envDocs
  1205. 1096.52 s [opt-env-conf-test]
  1206. 1096.52 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:373:17-39
  1207. 1096.52 s [opt-env-conf-test] @@ -370,7 +370,7 @@
  1208. 1096.52 s [opt-env-conf-test] [ [ headerChunks "Options",
  1209. 1096.52 s [opt-env-conf-test] renderLongOptDocs optDocs
  1210. 1096.52 s [opt-env-conf-test] ]
  1211. 1096.52 s [opt-env-conf-test] - | not (nullDocs optDocs)
  1212. 1096.52 s [opt-env-conf-test] + | True
  1213. 1096.52 s [opt-env-conf-test] ],
  1214. 1096.52 s [opt-env-conf-test] concat
  1215. 1096.52 s [opt-env-conf-test] [ [ headerChunks "Environment Variables",
  1216. 1096.52 s [opt-env-conf-test]
  1217. 1096.52 s [opt-env-conf-test] RemoveAction at src/OptEnvConf/Doc.hs:329:15-16
  1218. 1096.52 s [opt-env-conf-test] @@ -326,11 +326,11 @@
  1219. 1096.52 s [opt-env-conf-test] | not (null commandDocs)
  1220. 1096.52 s [opt-env-conf-test] ],
  1221. 1096.52 s [opt-env-conf-test] concat
  1222. 1096.52 s [opt-env-conf-test] - [ [ [".Sh ", "OPTIONS"],
  1223. 1096.52 s [opt-env-conf-test] - renderLongOptDocs optDocs
  1224. 1096.52 s [opt-env-conf-test] - ]
  1225. 1096.52 s [opt-env-conf-test] - | not (nullDocs optDocs)
  1226. 1096.52 s [opt-env-conf-test] - ],
  1227. 1096.52 s [opt-env-conf-test] + [ [ [".Sh ", "OPTIONS"],
  1228. 1096.52 s [opt-env-conf-test] + renderLongOptDocs optDocs
  1229. 1096.52 s [opt-env-conf-test] + ]
  1230. 1096.52 s [opt-env-conf-test] + | not (nullDocs optDocs)
  1231. 1096.52 s [opt-env-conf-test] + ],
  1232. 1096.52 s [opt-env-conf-test] concat
  1233. 1096.52 s [opt-env-conf-test] [ [ [".Sh ", "ENVIRONMENT VARIABLES"],
  1234. 1096.52 s [opt-env-conf-test] renderEnvDocs envDocs
  1235. 1096.52 s [opt-env-conf-test]
  1236. 1096.52 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:332:17-39
  1237. 1096.52 s [opt-env-conf-test] @@ -329,7 +329,7 @@
  1238. 1096.52 s [opt-env-conf-test] [ [ [".Sh ", "OPTIONS"],
  1239. 1096.52 s [opt-env-conf-test] renderLongOptDocs optDocs
  1240. 1096.52 s [opt-env-conf-test] ]
  1241. 1096.52 s [opt-env-conf-test] - | not (nullDocs optDocs)
  1242. 1096.52 s [opt-env-conf-test] + | True
  1243. 1096.52 s [opt-env-conf-test] ],
  1244. 1096.52 s [opt-env-conf-test] concat
  1245. 1096.52 s [opt-env-conf-test] [ [ [".Sh ", "ENVIRONMENT VARIABLES"],
  1246. 1096.52 s [opt-env-conf-test]
  1247. 1096.52 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:568:9-20
  1248. 1096.52 s [opt-env-conf-test] @@ -565,21 +565,21 @@
  1249. 1096.52 s [opt-env-conf-test] [] -> []
  1250. 1096.52 s [opt-env-conf-test] [d] -> go isTopLevel d
  1251. 1096.52 s [opt-env-conf-test] (AnyDocsSingle d : ds) ->
  1252. 1096.52 s [opt-env-conf-test] - case setDocHelp d of
  1253. 1096.52 s [opt-env-conf-test] - Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds
  1254. 1096.52 s [opt-env-conf-test] - Just h ->
  1255. 1096.52 s [opt-env-conf-test] - let (sds, rest) = goSameHelp h ds
  1256. 1096.52 s [opt-env-conf-test] - in concat
  1257. 1096.52 s [opt-env-conf-test] - [ concat
  1258. 1096.52 s [opt-env-conf-test] - [ concat
  1259. 1096.52 s [opt-env-conf-test] - [ indent $ renderSetDocHeader (Just h),
  1260. 1096.52 s [opt-env-conf-test] - indent $ concatMap renderSetDocWithoutHeader $ d : sds,
  1261. 1096.52 s [opt-env-conf-test] - [[]]
  1262. 1096.52 s [opt-env-conf-test] - ]
  1263. 1096.52 s [opt-env-conf-test] - | not isTopLevel
  1264. 1096.52 s [opt-env-conf-test] - ],
  1265. 1096.52 s [opt-env-conf-test] - goOr isTopLevel rest
  1266. 1096.52 s [opt-env-conf-test] - ]
  1267. 1096.52 s [opt-env-conf-test] + case setDocHelp d of
  1268. 1096.52 s [opt-env-conf-test] + Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds
  1269. 1096.52 s [opt-env-conf-test] + Just h ->
  1270. 1096.52 s [opt-env-conf-test] + let (sds, rest) = goSameHelp h ds
  1271. 1096.52 s [opt-env-conf-test] + in concat
  1272. 1096.52 s [opt-env-conf-test] + [ concat
  1273. 1096.52 s [opt-env-conf-test] + [ concat
  1274. 1096.52 s [opt-env-conf-test] + [ indent $ renderSetDocHeader (Just h),
  1275. 1096.52 s [opt-env-conf-test] + indent $ concatMap renderSetDocWithoutHeader $ d : sds,
  1276. 1096.52 s [opt-env-conf-test] + [[]]
  1277. 1096.52 s [opt-env-conf-test] + ]
  1278. 1096.52 s [opt-env-conf-test] + | not isTopLevel
  1279. 1096.52 s [opt-env-conf-test] + ],
  1280. 1096.52 s [opt-env-conf-test] + goOr isTopLevel rest
  1281. 1096.52 s [opt-env-conf-test] + ]
  1282. 1096.52 s [opt-env-conf-test] (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds
  1283. 1096.52 s [opt-env-conf-test] goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc])
  1284. 1096.52 s [opt-env-conf-test] goSameHelp h = \case
  1285. 1096.52 s [opt-env-conf-test]
  1286. 1096.52 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:581:26-36
  1287. 1096.52 s [opt-env-conf-test] @@ -578,7 +578,7 @@
  1288. 1096.52 s [opt-env-conf-test] ]
  1289. 1096.52 s [opt-env-conf-test] | not isTopLevel
  1290. 1096.52 s [opt-env-conf-test] ],
  1291. 1096.52 s [opt-env-conf-test] - goOr isTopLevel rest
  1292. 1096.52 s [opt-env-conf-test] + goOr True rest
  1293. 1096.52 s [opt-env-conf-test] ]
  1294. 1096.52 s [opt-env-conf-test] (d : ds) -> go isTopLevel d ++ goOr isTopLevel ds
  1295. 1096.52 s [opt-env-conf-test] goSameHelp :: Help -> [AnyDocs SetDoc] -> ([SetDoc], [AnyDocs SetDoc])
  1296. 1096.52 s [opt-env-conf-test]
  1297. 1096.52 s [opt-env-conf-test] Negate at src/OptEnvConf/Doc.hs:566:17-27
  1298. 1096.52 s [opt-env-conf-test] @@ -563,7 +563,7 @@
  1299. 1096.52 s [opt-env-conf-test] goOr :: Bool -> [AnyDocs SetDoc] -> [[Chunk]]
  1300. 1096.52 s [opt-env-conf-test] goOr isTopLevel = \case
  1301. 1096.52 s [opt-env-conf-test] [] -> []
  1302. 1096.52 s [opt-env-conf-test] - [d] -> go isTopLevel d
  1303. 1096.52 s [opt-env-conf-test] + [d] -> go not (isTopLevel) d
  1304. 1096.52 s [opt-env-conf-test] (AnyDocsSingle d : ds) ->
  1305. 1096.52 s [opt-env-conf-test] case setDocHelp d of
  1306. 1096.52 s [opt-env-conf-test] Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds
  1307. 1096.52 s [opt-env-conf-test]
  1308. 1096.52 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:566:17-27
  1309. 1096.52 s [opt-env-conf-test] @@ -563,7 +563,7 @@
  1310. 1096.52 s [opt-env-conf-test] goOr :: Bool -> [AnyDocs SetDoc] -> [[Chunk]]
  1311. 1096.52 s [opt-env-conf-test] goOr isTopLevel = \case
  1312. 1096.52 s [opt-env-conf-test] [] -> []
  1313. 1096.52 s [opt-env-conf-test] - [d] -> go isTopLevel d
  1314. 1096.52 s [opt-env-conf-test] + [d] -> go True d
  1315. 1096.52 s [opt-env-conf-test] (AnyDocsSingle d : ds) ->
  1316. 1096.52 s [opt-env-conf-test] case setDocHelp d of
  1317. 1096.52 s [opt-env-conf-test] Nothing -> go isTopLevel (AnyDocsSingle d) ++ goOr isTopLevel ds
  1318. 1096.52 s [opt-env-conf-test]
  1319. 1096.52 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:588:12-34
  1320. 1096.52 s [opt-env-conf-test] @@ -585,7 +585,7 @@
  1321. 1096.52 s [opt-env-conf-test] goSameHelp h = \case
  1322. 1096.52 s [opt-env-conf-test] [] -> ([], [])
  1323. 1096.52 s [opt-env-conf-test] (AnyDocsSingle d : ds) ->
  1324. 1096.52 s [opt-env-conf-test] - if setDocHelp d == Just h
  1325. 1096.52 s [opt-env-conf-test] + if True
  1326. 1096.52 s [opt-env-conf-test] then
  1327. 1096.52 s [opt-env-conf-test] let (sds, rest) = goSameHelp h ds
  1328. 1096.52 s [opt-env-conf-test] in (d : sds, rest)
  1329. 1096.52 s [opt-env-conf-test]
  1330. 1096.52 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:532:13-50
  1331. 1096.52 s [opt-env-conf-test] @@ -529,12 +529,12 @@
  1332. 1096.52 s [opt-env-conf-test] [] -> []
  1333. 1096.52 s [opt-env-conf-test] [d] -> [go' d]
  1334. 1096.52 s [opt-env-conf-test] (AnyDocsSingle d : ds) ->
  1335. 1096.52 s [opt-env-conf-test] - case setDocHelp d of
  1336. 1096.52 s [opt-env-conf-test] - Nothing -> go' (AnyDocsSingle d) : goOr' ds
  1337. 1096.52 s [opt-env-conf-test] - Just h ->
  1338. 1096.52 s [opt-env-conf-test] - let (sds, rest) = goSameHelp h ds
  1339. 1096.52 s [opt-env-conf-test] - ne = d :| sds
  1340. 1096.52 s [opt-env-conf-test] - in AnyDocsSingle ne : goOr' rest
  1341. 1096.52 s [opt-env-conf-test] + case setDocHelp d of
  1342. 1096.52 s [opt-env-conf-test] + Nothing -> go' (AnyDocsSingle d) : goOr' ds
  1343. 1096.52 s [opt-env-conf-test] + Just h ->
  1344. 1096.52 s [opt-env-conf-test] + let (sds, rest) = goSameHelp h ds
  1345. 1096.52 s [opt-env-conf-test] + ne = d :| sds
  1346. 1096.52 s [opt-env-conf-test] + in AnyDocsSingle ne : goOr' rest
  1347. 1096.52 s [opt-env-conf-test] (d : ds) -> go' d : goOr' ds
  1348. 1096.52 s [opt-env-conf-test]
  1349. 1096.52 s [opt-env-conf-test] renderCommandDocs :: AnyDocs (Maybe SetDoc) -> [Chunk]
  1350. 1096.52 s [opt-env-conf-test]
  1351. 1096.52 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:259:17-26
  1352. 1096.52 s [opt-env-conf-test] @@ -256,18 +256,18 @@
  1353. 1096.52 s [opt-env-conf-test] concat
  1354. 1096.53 s [opt-env-conf-test] [ concatMap
  1355. 1096.53 s [opt-env-conf-test] ( \(key, schema) ->
  1356. 1096.53 s [opt-env-conf-test] - case jsonSchemaChunkLines schema of
  1357. 1096.53 s [opt-env-conf-test] - [line] ->
  1358. 1096.53 s [opt-env-conf-test] - [["config: ", confValChunk key, ": "] ++ line]
  1359. 1096.53 s [opt-env-conf-test] - ls ->
  1360. 1096.53 s [opt-env-conf-test] - ["config:"]
  1361. 1096.53 s [opt-env-conf-test] - : indent
  1362. 1096.53 s [opt-env-conf-test] - ( case ls of
  1363. 1096.53 s [opt-env-conf-test] - [] -> [["TODO"]]
  1364. 1096.53 s [opt-env-conf-test] - (l : ll) ->
  1365. 1096.53 s [opt-env-conf-test] - ([confValChunk key, ": "] ++ l)
  1366. 1096.53 s [opt-env-conf-test] - : indent ll
  1367. 1096.53 s [opt-env-conf-test] - )
  1368. 1096.53 s [opt-env-conf-test] + case jsonSchemaChunkLines schema of
  1369. 1096.53 s [opt-env-conf-test] + [line] ->
  1370. 1096.53 s [opt-env-conf-test] + [["config: ", confValChunk key, ": "] ++ line]
  1371. 1096.53 s [opt-env-conf-test] + ls ->
  1372. 1096.53 s [opt-env-conf-test] + ["config:"]
  1373. 1096.53 s [opt-env-conf-test] + : indent
  1374. 1096.53 s [opt-env-conf-test] + ( case ls of
  1375. 1096.53 s [opt-env-conf-test] + [] -> [["TODO"]]
  1376. 1096.53 s [opt-env-conf-test] + (l : ll) ->
  1377. 1096.53 s [opt-env-conf-test] + ([confValChunk key, ": "] ++ l)
  1378. 1096.53 s [opt-env-conf-test] + : indent ll
  1379. 1096.53 s [opt-env-conf-test] + )
  1380. 1096.53 s [opt-env-conf-test] )
  1381. 1096.53 s [opt-env-conf-test] (NE.toList confs)
  1382. 1096.53 s [opt-env-conf-test] | confs <- maybeToList setDocConfKeys
  1383. 1096.53 s [opt-env-conf-test]
  1384. 1096.53 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:265:27-44
  1385. 1096.53 s [opt-env-conf-test] @@ -262,11 +262,11 @@
  1386. 1096.53 s [opt-env-conf-test] ls ->
  1387. 1096.53 s [opt-env-conf-test] ["config:"]
  1388. 1096.53 s [opt-env-conf-test] : indent
  1389. 1096.53 s [opt-env-conf-test] - ( case ls of
  1390. 1096.53 s [opt-env-conf-test] - [] -> [["TODO"]]
  1391. 1096.53 s [opt-env-conf-test] - (l : ll) ->
  1392. 1096.53 s [opt-env-conf-test] - ([confValChunk key, ": "] ++ l)
  1393. 1096.53 s [opt-env-conf-test] - : indent ll
  1394. 1096.53 s [opt-env-conf-test] + ( case ls of
  1395. 1096.53 s [opt-env-conf-test] + [] -> [["TODO"]]
  1396. 1096.53 s [opt-env-conf-test] + (l : ll) ->
  1397. 1096.53 s [opt-env-conf-test] + ([confValChunk key, ": "] ++ l)
  1398. 1096.53 s [opt-env-conf-test] + : indent ll
  1399. 1096.53 s [opt-env-conf-test] )
  1400. 1096.53 s [opt-env-conf-test] )
  1401. 1096.53 s [opt-env-conf-test] (NE.toList confs)
  1402. 1096.53 s [opt-env-conf-test]
  1403. 1096.53 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:661:30-18
  1404. 1096.53 s [opt-env-conf-test] @@ -658,29 +658,29 @@
  1405. 1096.53 s [opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
  1406. 1096.53 s [opt-env-conf-test] [] -> Nothing
  1407. 1096.53 s [opt-env-conf-test] cs -> Just $ bracketise $ unwordsChunks $ intersperse [orChunk] cs
  1408. 1096.53 s [opt-env-conf-test] - AnyDocsSingle mOd -> case mOd of
  1409. 1096.53 s [opt-env-conf-test] - Nothing -> Nothing
  1410. 1096.53 s [opt-env-conf-test] - Just OptDoc {..} ->
  1411. 1096.53 s [opt-env-conf-test] - Just
  1412. 1096.53 s [opt-env-conf-test] - $ ( if isJust optDocDefault
  1413. 1096.53 s [opt-env-conf-test] - then bracketise
  1414. 1096.53 s [opt-env-conf-test] - else id
  1415. 1096.53 s [opt-env-conf-test] - )
  1416. 1096.53 s [opt-env-conf-test] - $ unwordsChunks
  1417. 1096.53 s [opt-env-conf-test] - $ concat
  1418. 1096.53 s [opt-env-conf-test] - [ [ [mMetavarChunk optDocMetavar]
  1419. 1096.53 s [opt-env-conf-test] - | optDocTryArgument
  1420. 1096.53 s [opt-env-conf-test] - ],
  1421. 1096.53 s [opt-env-conf-test] - [ concat $ maybeToList $ dashedChunks optDocDasheds
  1422. 1096.53 s [opt-env-conf-test] - | optDocTrySwitch
  1423. 1096.53 s [opt-env-conf-test] - ],
  1424. 1096.53 s [opt-env-conf-test] - [ concat
  1425. 1096.53 s [opt-env-conf-test] - [ concat $ maybeToList $ dashedChunks optDocDasheds,
  1426. 1096.53 s [opt-env-conf-test] - [" ", mMetavarChunk optDocMetavar]
  1427. 1096.53 s [opt-env-conf-test] - ]
  1428. 1096.53 s [opt-env-conf-test] - | optDocTryOption
  1429. 1096.53 s [opt-env-conf-test] - ]
  1430. 1096.53 s [opt-env-conf-test] - ]
  1431. 1096.53 s [opt-env-conf-test] + AnyDocsSingle mOd -> case mOd of
  1432. 1096.53 s [opt-env-conf-test] + Nothing -> Nothing
  1433. 1096.53 s [opt-env-conf-test] + Just OptDoc {..} ->
  1434. 1096.53 s [opt-env-conf-test] + Just
  1435. 1096.53 s [opt-env-conf-test] + $ ( if isJust optDocDefault
  1436. 1096.53 s [opt-env-conf-test] + then bracketise
  1437. 1096.53 s [opt-env-conf-test] + else id
  1438. 1096.53 s [opt-env-conf-test] + )
  1439. 1096.53 s [opt-env-conf-test] + $ unwordsChunks
  1440. 1096.53 s [opt-env-conf-test] + $ concat
  1441. 1096.53 s [opt-env-conf-test] + [ [ [mMetavarChunk optDocMetavar]
  1442. 1096.53 s [opt-env-conf-test] + | optDocTryArgument
  1443. 1096.53 s [opt-env-conf-test] + ],
  1444. 1096.53 s [opt-env-conf-test] + [ concat $ maybeToList $ dashedChunks optDocDasheds
  1445. 1096.53 s [opt-env-conf-test] + | optDocTrySwitch
  1446. 1096.53 s [opt-env-conf-test] + ],
  1447. 1096.53 s [opt-env-conf-test] + [ concat
  1448. 1096.53 s [opt-env-conf-test] + [ concat $ maybeToList $ dashedChunks optDocDasheds,
  1449. 1096.53 s [opt-env-conf-test] + [" ", mMetavarChunk optDocMetavar]
  1450. 1096.53 s [opt-env-conf-test] + ]
  1451. 1096.53 s [opt-env-conf-test] + | optDocTryOption
  1452. 1096.53 s [opt-env-conf-test] + ]
  1453. 1096.53 s [opt-env-conf-test] + ]
  1454. 1096.53 s [opt-env-conf-test]
  1455. 1096.53 s [opt-env-conf-test] orChunk :: Chunk
  1456. 1096.53 s [opt-env-conf-test] orChunk = fore cyan "|"
  1457. 1096.53 s [opt-env-conf-test]
  1458. 1096.53 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:653:11-77
  1459. 1096.53 s [opt-env-conf-test] @@ -650,10 +650,10 @@
  1460. 1096.53 s [opt-env-conf-test] Nothing -> Just ["COMMAND"]
  1461. 1096.53 s [opt-env-conf-test] Just _ -> Just ["[COMMAND]"]
  1462. 1096.53 s [opt-env-conf-test] AnyDocsAnd ds ->
  1463. 1096.53 s [opt-env-conf-test] - case mapMaybe (go False) (withoutNothings ds) of
  1464. 1096.53 s [opt-env-conf-test] - [] -> Nothing
  1465. 1096.53 s [opt-env-conf-test] - [c] -> Just c
  1466. 1096.53 s [opt-env-conf-test] - cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs
  1467. 1096.53 s [opt-env-conf-test] + case mapMaybe (go False) (withoutNothings ds) of
  1468. 1096.53 s [opt-env-conf-test] + [] -> Nothing
  1469. 1096.53 s [opt-env-conf-test] + [c] -> Just c
  1470. 1096.53 s [opt-env-conf-test] + cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs
  1471. 1096.53 s [opt-env-conf-test] AnyDocsOr ds ->
  1472. 1096.53 s [opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
  1473. 1096.53 s [opt-env-conf-test] [] -> Nothing
  1474. 1096.53 s [opt-env-conf-test]
  1475. 1096.53 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:653:11-77
  1476. 1096.53 s [opt-env-conf-test] @@ -650,10 +650,10 @@
  1477. 1096.53 s [opt-env-conf-test] Nothing -> Just ["COMMAND"]
  1478. 1096.53 s [opt-env-conf-test] Just _ -> Just ["[COMMAND]"]
  1479. 1096.53 s [opt-env-conf-test] AnyDocsAnd ds ->
  1480. 1096.53 s [opt-env-conf-test] - case mapMaybe (go False) (withoutNothings ds) of
  1481. 1096.53 s [opt-env-conf-test] - [] -> Nothing
  1482. 1096.53 s [opt-env-conf-test] - [c] -> Just c
  1483. 1096.53 s [opt-env-conf-test] - cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs
  1484. 1096.53 s [opt-env-conf-test] + case mapMaybe (go False) (withoutNothings ds) of
  1485. 1096.53 s [opt-env-conf-test] + [] -> Nothing
  1486. 1096.53 s [opt-env-conf-test] + [c] -> Just c
  1487. 1096.53 s [opt-env-conf-test] + cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs
  1488. 1096.53 s [opt-env-conf-test] AnyDocsOr ds ->
  1489. 1096.53 s [opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
  1490. 1096.53 s [opt-env-conf-test] [] -> Nothing
  1491. 1096.53 s [opt-env-conf-test]
  1492. 1096.53 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Doc.hs:656:30-31
  1493. 1096.53 s [opt-env-conf-test] @@ -653,7 +653,7 @@
  1494. 1096.53 s [opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
  1495. 1096.53 s [opt-env-conf-test] [] -> Nothing
  1496. 1096.53 s [opt-env-conf-test] [c] -> Just c
  1497. 1096.53 s [opt-env-conf-test] - cs -> Just $ (if b then parenthesise else id) $ unwordsChunks cs
  1498. 1096.53 s [opt-env-conf-test] + cs -> Just $ (if False then parenthesise else id) $ unwordsChunks cs
  1499. 1096.53 s [opt-env-conf-test] AnyDocsOr ds ->
  1500. 1096.53 s [opt-env-conf-test] case mapMaybe (go False) (withoutNothings ds) of
  1501. 1096.53 s [opt-env-conf-test] [] -> Nothing
  1502. 1096.53 s [opt-env-conf-test]
  1503. 1096.53 s [opt-env-conf-test] BoolLit at src/OptEnvConf/Doc.hs:637:38-43
  1504. 1096.53 s [opt-env-conf-test] @@ -634,7 +634,7 @@
  1505. 1096.53 s [opt-env-conf-test] withoutNothings =
  1506. 1096.53 s [opt-env-conf-test] filter
  1507. 1096.53 s [opt-env-conf-test] ( \case
  1508. 1096.53 s [opt-env-conf-test] - AnyDocsSingle Nothing -> False
  1509. 1096.53 s [opt-env-conf-test] + AnyDocsSingle Nothing -> True
  1510. 1096.53 s [opt-env-conf-test] AnyDocsAnd [] -> False
  1511. 1096.53 s [opt-env-conf-test] AnyDocsOr [] -> False
  1512. 1096.53 s [opt-env-conf-test] _ -> True
  1513. 1096.53 s [opt-env-conf-test]
  1514. 1096.53 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Doc.hs:822:13-52
  1515. 1096.53 s [opt-env-conf-test] @@ -819,11 +819,11 @@
  1516. 1096.53 s [opt-env-conf-test] [exampleValuesChunks confDocExamples | not (null confDocExamples)],
  1517. 1096.53 s [opt-env-conf-test] concatMap
  1518. 1096.53 s [opt-env-conf-test] ( \(key, schema) ->
  1519. 1096.53 s [opt-env-conf-test] - case jsonSchemaChunkLines schema of
  1520. 1096.53 s [opt-env-conf-test] - [line] ->
  1521. 1096.53 s [opt-env-conf-test] - [[confValChunk key, ": "] ++ line]
  1522. 1096.53 s [opt-env-conf-test] - ls ->
  1523. 1096.53 s [opt-env-conf-test] - [confValChunk key, ":"] : indent ls
  1524. 1096.53 s [opt-env-conf-test] + case jsonSchemaChunkLines schema of
  1525. 1096.53 s [opt-env-conf-test] + [line] ->
  1526. 1096.53 s [opt-env-conf-test] + [[confValChunk key, ": "] ++ line]
  1527. 1096.53 s [opt-env-conf-test] + ls ->
  1528. 1096.53 s [opt-env-conf-test] + [confValChunk key, ":"] : indent ls
  1529. 1096.53 s [opt-env-conf-test] )
  1530. 1096.53 s [opt-env-conf-test] (NE.toList confDocKeys)
  1531. 1096.53 s [opt-env-conf-test] ]
  1532. 1096.53 s [opt-env-conf-test]
  1533. 1096.53 s [opt-env-conf-test] BoolLit at src/OptEnvConf/Error.hs:66:40-45
  1534. 1096.53 s [opt-env-conf-test] @@ -63,7 +63,7 @@
  1535. 1096.53 s [opt-env-conf-test] ParseErrorMissingConfVal _ -> True
  1536. 1096.53 s [opt-env-conf-test] ParseErrorConfigRead _ _ -> False
  1537. 1096.53 s [opt-env-conf-test] ParseErrorMissingCommand cs -> not $ null cs
  1538. 1096.53 s [opt-env-conf-test] - ParseErrorUnrecognisedCommand _ _ -> False
  1539. 1096.53 s [opt-env-conf-test] + ParseErrorUnrecognisedCommand _ _ -> True
  1540. 1096.53 s [opt-env-conf-test] ParseErrorAllOrNothing _ -> False
  1541. 1096.53 s [opt-env-conf-test] ParseErrorUnrecognised _ -> False
  1542. 1096.53 s [opt-env-conf-test] ParseErrorMissingCapability _ -> False
  1543. 1096.53 s [opt-env-conf-test]
  1544. 1096.53 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Error.hs:65:34-47
  1545. 1096.53 s [opt-env-conf-test] @@ -62,7 +62,7 @@
  1546. 1096.53 s [opt-env-conf-test] ParseErrorEnvRead _ _ -> False
  1547. 1096.53 s [opt-env-conf-test] ParseErrorMissingConfVal _ -> True
  1548. 1096.53 s [opt-env-conf-test] ParseErrorConfigRead _ _ -> False
  1549. 1096.53 s [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs
  1550. 1096.53 s [opt-env-conf-test] + ParseErrorMissingCommand cs -> True
  1551. 1096.53 s [opt-env-conf-test] ParseErrorUnrecognisedCommand _ _ -> False
  1552. 1096.53 s [opt-env-conf-test] ParseErrorAllOrNothing _ -> False
  1553. 1096.53 s [opt-env-conf-test] ParseErrorUnrecognised _ -> False
  1554. 1096.53 s [opt-env-conf-test]
  1555. 1096.53 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Error.hs:65:40-47
  1556. 1096.53 s [opt-env-conf-test] @@ -62,7 +62,7 @@
  1557. 1096.53 s [opt-env-conf-test] ParseErrorEnvRead _ _ -> False
  1558. 1096.53 s [opt-env-conf-test] ParseErrorMissingConfVal _ -> True
  1559. 1096.53 s [opt-env-conf-test] ParseErrorConfigRead _ _ -> False
  1560. 1096.53 s [opt-env-conf-test] - ParseErrorMissingCommand cs -> not $ null cs
  1561. 1096.53 s [opt-env-conf-test] + ParseErrorMissingCommand cs -> not $ False
  1562. 1096.53 s [opt-env-conf-test] ParseErrorUnrecognisedCommand _ _ -> False
  1563. 1096.53 s [opt-env-conf-test] ParseErrorAllOrNothing _ -> False
  1564. 1096.53 s [opt-env-conf-test] ParseErrorUnrecognised _ -> False
  1565. 1096.53 s [opt-env-conf-test]
  1566. 1096.53 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65
  1567. 1096.53 s [opt-env-conf-test] @@ -80,63 +80,63 @@
  1568. 1096.53 s [opt-env-conf-test] renderError :: ParseError -> [[Chunk]]
  1569. 1096.53 s [opt-env-conf-test] renderError ParseError {..} =
  1570. 1096.53 s [opt-env-conf-test] concat
  1571. 1096.53 s [opt-env-conf-test] - [ case parseErrorMessage of
  1572. 1096.53 s [opt-env-conf-test] - ParseErrorEmpty ->
  1573. 1096.53 s [opt-env-conf-test] - [["Hit the 'empty' case of the Parser type, this should not happen."]]
  1574. 1096.53 s [opt-env-conf-test] - ParseErrorEmptySetting ->
  1575. 1096.53 s [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]]
  1576. 1096.53 s [opt-env-conf-test] - ParseErrorNoReaders ->
  1577. 1096.53 s [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."],
  1578. 1096.53 s [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."]
  1579. 1096.53 s [opt-env-conf-test] - ]
  1580. 1096.53 s [opt-env-conf-test] - ParseErrorCheckFailed _ err ->
  1581. 1096.53 s [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]]
  1582. 1096.53 s [opt-env-conf-test] - ParseErrorMissingArgument o ->
  1583. 1096.53 s [opt-env-conf-test] - [ "Missing argument: "
  1584. 1096.53 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong o)
  1585. 1096.53 s [opt-env-conf-test] - ]
  1586. 1096.53 s [opt-env-conf-test] - ParseErrorArgumentRead md errs ->
  1587. 1096.53 s [opt-env-conf-test] - ["Failed to read argument: "]
  1588. 1096.53 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  1589. 1096.53 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1590. 1096.53 s [opt-env-conf-test] - ParseErrorMissingOption o ->
  1591. 1096.53 s [opt-env-conf-test] - ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1592. 1096.53 s [opt-env-conf-test] - ParseErrorMissingSwitch o ->
  1593. 1096.53 s [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1594. 1096.53 s [opt-env-conf-test] - ParseErrorOptionRead md errs ->
  1595. 1096.53 s [opt-env-conf-test] - ["Failed to read option: "]
  1596. 1096.53 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  1597. 1096.53 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1598. 1096.53 s [opt-env-conf-test] - ParseErrorMissingEnvVar md ->
  1599. 1096.53 s [opt-env-conf-test] - ["Missing env var: "]
  1600. 1096.53 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  1601. 1096.53 s [opt-env-conf-test] - ParseErrorEnvRead md errs ->
  1602. 1096.53 s [opt-env-conf-test] - ["Failed to read env var: "]
  1603. 1096.53 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  1604. 1096.53 s [opt-env-conf-test] - ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1605. 1096.53 s [opt-env-conf-test] - ParseErrorMissingConfVal md ->
  1606. 1096.53 s [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md
  1607. 1096.53 s [opt-env-conf-test] - ParseErrorConfigRead md s ->
  1608. 1096.53 s [opt-env-conf-test] - ["Failed to parse configuration: "]
  1609. 1096.53 s [opt-env-conf-test] - : maybe [] renderConfDoc md
  1610. 1096.53 s [opt-env-conf-test] - ++ [[chunk $ T.pack s]]
  1611. 1096.53 s [opt-env-conf-test] - ParseErrorMissingCommand cs ->
  1612. 1096.54 s [opt-env-conf-test] - ["Missing command, available commands:"]
  1613. 1096.54 s [opt-env-conf-test] - : availableCommandsLines cs
  1614. 1096.54 s [opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs ->
  1615. 1096.54 s [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  1616. 1096.54 s [opt-env-conf-test] - [fore blue "available commands:"]
  1617. 1096.54 s [opt-env-conf-test] - ]
  1618. 1096.54 s [opt-env-conf-test] - ++ availableCommandsLines cs
  1619. 1096.54 s [opt-env-conf-test] - ParseErrorAllOrNothing locs ->
  1620. 1096.54 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."],
  1621. 1096.54 s [opt-env-conf-test] - ["The following settings have been parsed:"]
  1622. 1096.54 s [opt-env-conf-test] - ]
  1623. 1096.54 s [opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs)
  1624. 1096.54 s [opt-env-conf-test] - ParseErrorUnrecognised leftovers ->
  1625. 1096.54 s [opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  1626. 1096.54 s [opt-env-conf-test] - ParseErrorMissingCapability cap ->
  1627. 1096.54 s [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]],
  1628. 1096.54 s [opt-env-conf-test] + [ case parseErrorMessage of
  1629. 1096.54 s [opt-env-conf-test] + ParseErrorEmpty ->
  1630. 1096.54 s [opt-env-conf-test] + [["Hit the 'empty' case of the Parser type, this should not happen."]]
  1631. 1096.54 s [opt-env-conf-test] + ParseErrorEmptySetting ->
  1632. 1096.54 s [opt-env-conf-test] + [["This setting has not been configured to be able to parse anything."]]
  1633. 1096.54 s [opt-env-conf-test] + ParseErrorNoReaders ->
  1634. 1096.54 s [opt-env-conf-test] + [ ["No readers were configured for an argument, option, or env."],
  1635. 1096.54 s [opt-env-conf-test] + ["You should not be seeing this error because the linting phase should have caught it."]
  1636. 1096.54 s [opt-env-conf-test] + ]
  1637. 1096.54 s [opt-env-conf-test] + ParseErrorCheckFailed _ err ->
  1638. 1096.54 s [opt-env-conf-test] + [["Check failed: "], [chunk $ T.pack err]]
  1639. 1096.54 s [opt-env-conf-test] + ParseErrorMissingArgument o ->
  1640. 1096.54 s [opt-env-conf-test] + [ "Missing argument: "
  1641. 1096.54 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong o)
  1642. 1096.54 s [opt-env-conf-test] + ]
  1643. 1096.54 s [opt-env-conf-test] + ParseErrorArgumentRead md errs ->
  1644. 1096.54 s [opt-env-conf-test] + ["Failed to read argument: "]
  1645. 1096.54 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  1646. 1096.54 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1647. 1096.54 s [opt-env-conf-test] + ParseErrorMissingOption o ->
  1648. 1096.54 s [opt-env-conf-test] + ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1649. 1096.54 s [opt-env-conf-test] + ParseErrorMissingSwitch o ->
  1650. 1096.54 s [opt-env-conf-test] + ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1651. 1096.54 s [opt-env-conf-test] + ParseErrorOptionRead md errs ->
  1652. 1096.54 s [opt-env-conf-test] + ["Failed to read option: "]
  1653. 1096.54 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  1654. 1096.54 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1655. 1096.54 s [opt-env-conf-test] + ParseErrorMissingEnvVar md ->
  1656. 1096.54 s [opt-env-conf-test] + ["Missing env var: "]
  1657. 1096.54 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  1658. 1096.54 s [opt-env-conf-test] + ParseErrorEnvRead md errs ->
  1659. 1096.54 s [opt-env-conf-test] + ["Failed to read env var: "]
  1660. 1096.54 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  1661. 1096.54 s [opt-env-conf-test] + ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1662. 1096.54 s [opt-env-conf-test] + ParseErrorMissingConfVal md ->
  1663. 1096.54 s [opt-env-conf-test] + ["Missing config value: "] : maybe [] renderConfDoc md
  1664. 1096.54 s [opt-env-conf-test] + ParseErrorConfigRead md s ->
  1665. 1096.54 s [opt-env-conf-test] + ["Failed to parse configuration: "]
  1666. 1096.54 s [opt-env-conf-test] + : maybe [] renderConfDoc md
  1667. 1096.54 s [opt-env-conf-test] + ++ [[chunk $ T.pack s]]
  1668. 1096.54 s [opt-env-conf-test] + ParseErrorMissingCommand cs ->
  1669. 1096.54 s [opt-env-conf-test] + ["Missing command, available commands:"]
  1670. 1096.54 s [opt-env-conf-test] + : availableCommandsLines cs
  1671. 1096.54 s [opt-env-conf-test] + ParseErrorUnrecognisedCommand c cs ->
  1672. 1096.54 s [opt-env-conf-test] + [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  1673. 1096.54 s [opt-env-conf-test] + [fore blue "available commands:"]
  1674. 1096.54 s [opt-env-conf-test] + ]
  1675. 1096.54 s [opt-env-conf-test] + ++ availableCommandsLines cs
  1676. 1096.54 s [opt-env-conf-test] + ParseErrorAllOrNothing locs ->
  1677. 1096.54 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."],
  1678. 1096.54 s [opt-env-conf-test] + ["The following settings have been parsed:"]
  1679. 1096.54 s [opt-env-conf-test] + ]
  1680. 1096.54 s [opt-env-conf-test] + ++ map (pure . srcLocChunk) (M.elems locs)
  1681. 1096.54 s [opt-env-conf-test] + ParseErrorUnrecognised leftovers ->
  1682. 1096.54 s [opt-env-conf-test] + ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  1683. 1096.54 s [opt-env-conf-test] + ParseErrorMissingCapability cap ->
  1684. 1096.54 s [opt-env-conf-test] + ["Missing capability: " : [chunk $ T.pack $ show cap]],
  1685. 1096.54 s [opt-env-conf-test] maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc
  1686. 1096.54 s [opt-env-conf-test] ]
  1687. 1096.54 s [opt-env-conf-test]
  1688. 1096.54 s [opt-env-conf-test]
  1689. 1096.54 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65
  1690. 1096.54 s [opt-env-conf-test] @@ -80,63 +80,63 @@
  1691. 1096.54 s [opt-env-conf-test] renderError :: ParseError -> [[Chunk]]
  1692. 1096.54 s [opt-env-conf-test] renderError ParseError {..} =
  1693. 1096.54 s [opt-env-conf-test] concat
  1694. 1096.54 s [opt-env-conf-test] - [ case parseErrorMessage of
  1695. 1096.54 s [opt-env-conf-test] - ParseErrorEmpty ->
  1696. 1096.54 s [opt-env-conf-test] - [["Hit the 'empty' case of the Parser type, this should not happen."]]
  1697. 1096.54 s [opt-env-conf-test] - ParseErrorEmptySetting ->
  1698. 1096.54 s [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]]
  1699. 1096.54 s [opt-env-conf-test] - ParseErrorNoReaders ->
  1700. 1096.54 s [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."],
  1701. 1096.54 s [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."]
  1702. 1096.54 s [opt-env-conf-test] - ]
  1703. 1096.54 s [opt-env-conf-test] - ParseErrorCheckFailed _ err ->
  1704. 1096.54 s [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]]
  1705. 1096.54 s [opt-env-conf-test] - ParseErrorMissingArgument o ->
  1706. 1096.54 s [opt-env-conf-test] - [ "Missing argument: "
  1707. 1096.54 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong o)
  1708. 1096.54 s [opt-env-conf-test] - ]
  1709. 1096.54 s [opt-env-conf-test] - ParseErrorArgumentRead md errs ->
  1710. 1096.54 s [opt-env-conf-test] - ["Failed to read argument: "]
  1711. 1096.54 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  1712. 1096.54 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1713. 1096.54 s [opt-env-conf-test] - ParseErrorMissingOption o ->
  1714. 1096.54 s [opt-env-conf-test] - ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1715. 1096.54 s [opt-env-conf-test] - ParseErrorMissingSwitch o ->
  1716. 1096.54 s [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1717. 1096.54 s [opt-env-conf-test] - ParseErrorOptionRead md errs ->
  1718. 1096.54 s [opt-env-conf-test] - ["Failed to read option: "]
  1719. 1096.54 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  1720. 1096.54 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1721. 1096.54 s [opt-env-conf-test] - ParseErrorMissingEnvVar md ->
  1722. 1096.54 s [opt-env-conf-test] - ["Missing env var: "]
  1723. 1096.54 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  1724. 1096.54 s [opt-env-conf-test] - ParseErrorEnvRead md errs ->
  1725. 1096.54 s [opt-env-conf-test] - ["Failed to read env var: "]
  1726. 1096.54 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  1727. 1096.54 s [opt-env-conf-test] - ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1728. 1096.54 s [opt-env-conf-test] - ParseErrorMissingConfVal md ->
  1729. 1096.54 s [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md
  1730. 1096.54 s [opt-env-conf-test] - ParseErrorConfigRead md s ->
  1731. 1096.54 s [opt-env-conf-test] - ["Failed to parse configuration: "]
  1732. 1096.54 s [opt-env-conf-test] - : maybe [] renderConfDoc md
  1733. 1096.54 s [opt-env-conf-test] - ++ [[chunk $ T.pack s]]
  1734. 1096.54 s [opt-env-conf-test] - ParseErrorMissingCommand cs ->
  1735. 1096.54 s [opt-env-conf-test] - ["Missing command, available commands:"]
  1736. 1096.54 s [opt-env-conf-test] - : availableCommandsLines cs
  1737. 1096.54 s [opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs ->
  1738. 1096.54 s [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  1739. 1096.54 s [opt-env-conf-test] - [fore blue "available commands:"]
  1740. 1096.54 s [opt-env-conf-test] - ]
  1741. 1096.54 s [opt-env-conf-test] - ++ availableCommandsLines cs
  1742. 1096.54 s [opt-env-conf-test] - ParseErrorAllOrNothing locs ->
  1743. 1096.54 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."],
  1744. 1096.54 s [opt-env-conf-test] - ["The following settings have been parsed:"]
  1745. 1096.54 s [opt-env-conf-test] - ]
  1746. 1096.54 s [opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs)
  1747. 1096.54 s [opt-env-conf-test] - ParseErrorUnrecognised leftovers ->
  1748. 1096.54 s [opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  1749. 1096.54 s [opt-env-conf-test] - ParseErrorMissingCapability cap ->
  1750. 1096.54 s [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]],
  1751. 1096.54 s [opt-env-conf-test] + [ case parseErrorMessage of
  1752. 1096.54 s [opt-env-conf-test] + ParseErrorEmpty ->
  1753. 1096.54 s [opt-env-conf-test] + [["Hit the 'empty' case of the Parser type, this should not happen."]]
  1754. 1096.54 s [opt-env-conf-test] + ParseErrorEmptySetting ->
  1755. 1096.54 s [opt-env-conf-test] + [["This setting has not been configured to be able to parse anything."]]
  1756. 1096.54 s [opt-env-conf-test] + ParseErrorNoReaders ->
  1757. 1096.54 s [opt-env-conf-test] + [ ["No readers were configured for an argument, option, or env."],
  1758. 1096.54 s [opt-env-conf-test] + ["You should not be seeing this error because the linting phase should have caught it."]
  1759. 1096.54 s [opt-env-conf-test] + ]
  1760. 1096.54 s [opt-env-conf-test] + ParseErrorCheckFailed _ err ->
  1761. 1096.54 s [opt-env-conf-test] + [["Check failed: "], [chunk $ T.pack err]]
  1762. 1096.54 s [opt-env-conf-test] + ParseErrorMissingArgument o ->
  1763. 1096.54 s [opt-env-conf-test] + [ "Missing argument: "
  1764. 1096.54 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong o)
  1765. 1096.54 s [opt-env-conf-test] + ]
  1766. 1096.54 s [opt-env-conf-test] + ParseErrorArgumentRead md errs ->
  1767. 1096.54 s [opt-env-conf-test] + ["Failed to read argument: "]
  1768. 1096.54 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  1769. 1096.54 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1770. 1096.54 s [opt-env-conf-test] + ParseErrorMissingOption o ->
  1771. 1096.54 s [opt-env-conf-test] + ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1772. 1096.54 s [opt-env-conf-test] + ParseErrorMissingSwitch o ->
  1773. 1096.54 s [opt-env-conf-test] + ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1774. 1096.54 s [opt-env-conf-test] + ParseErrorOptionRead md errs ->
  1775. 1096.54 s [opt-env-conf-test] + ["Failed to read option: "]
  1776. 1096.54 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  1777. 1096.54 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1778. 1096.54 s [opt-env-conf-test] + ParseErrorMissingEnvVar md ->
  1779. 1096.54 s [opt-env-conf-test] + ["Missing env var: "]
  1780. 1096.54 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  1781. 1096.54 s [opt-env-conf-test] + ParseErrorEnvRead md errs ->
  1782. 1096.54 s [opt-env-conf-test] + ["Failed to read env var: "]
  1783. 1096.54 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  1784. 1096.54 s [opt-env-conf-test] + ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1785. 1096.54 s [opt-env-conf-test] + ParseErrorMissingConfVal md ->
  1786. 1096.54 s [opt-env-conf-test] + ["Missing config value: "] : maybe [] renderConfDoc md
  1787. 1096.54 s [opt-env-conf-test] + ParseErrorConfigRead md s ->
  1788. 1096.54 s [opt-env-conf-test] + ["Failed to parse configuration: "]
  1789. 1096.54 s [opt-env-conf-test] + : maybe [] renderConfDoc md
  1790. 1096.54 s [opt-env-conf-test] + ++ [[chunk $ T.pack s]]
  1791. 1096.54 s [opt-env-conf-test] + ParseErrorMissingCommand cs ->
  1792. 1096.54 s [opt-env-conf-test] + ["Missing command, available commands:"]
  1793. 1096.54 s [opt-env-conf-test] + : availableCommandsLines cs
  1794. 1096.54 s [opt-env-conf-test] + ParseErrorUnrecognisedCommand c cs ->
  1795. 1096.54 s [opt-env-conf-test] + [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  1796. 1096.54 s [opt-env-conf-test] + [fore blue "available commands:"]
  1797. 1096.54 s [opt-env-conf-test] + ]
  1798. 1096.54 s [opt-env-conf-test] + ++ availableCommandsLines cs
  1799. 1096.54 s [opt-env-conf-test] + ParseErrorAllOrNothing locs ->
  1800. 1096.54 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."],
  1801. 1096.54 s [opt-env-conf-test] + ["The following settings have been parsed:"]
  1802. 1096.54 s [opt-env-conf-test] + ]
  1803. 1096.54 s [opt-env-conf-test] + ++ map (pure . srcLocChunk) (M.elems locs)
  1804. 1096.54 s [opt-env-conf-test] + ParseErrorUnrecognised leftovers ->
  1805. 1096.54 s [opt-env-conf-test] + ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  1806. 1096.54 s [opt-env-conf-test] + ParseErrorMissingCapability cap ->
  1807. 1096.54 s [opt-env-conf-test] + ["Missing capability: " : [chunk $ T.pack $ show cap]],
  1808. 1096.54 s [opt-env-conf-test] maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc
  1809. 1096.54 s [opt-env-conf-test] ]
  1810. 1096.54 s [opt-env-conf-test]
  1811. 1096.54 s [opt-env-conf-test]
  1812. 1096.54 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65
  1813. 1096.54 s [opt-env-conf-test] @@ -80,63 +80,63 @@
  1814. 1096.54 s [opt-env-conf-test] renderError :: ParseError -> [[Chunk]]
  1815. 1096.54 s [opt-env-conf-test] renderError ParseError {..} =
  1816. 1096.54 s [opt-env-conf-test] concat
  1817. 1096.54 s [opt-env-conf-test] - [ case parseErrorMessage of
  1818. 1096.54 s [opt-env-conf-test] - ParseErrorEmpty ->
  1819. 1096.54 s [opt-env-conf-test] - [["Hit the 'empty' case of the Parser type, this should not happen."]]
  1820. 1096.54 s [opt-env-conf-test] - ParseErrorEmptySetting ->
  1821. 1096.54 s [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]]
  1822. 1096.54 s [opt-env-conf-test] - ParseErrorNoReaders ->
  1823. 1096.54 s [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."],
  1824. 1096.54 s [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."]
  1825. 1096.54 s [opt-env-conf-test] - ]
  1826. 1096.54 s [opt-env-conf-test] - ParseErrorCheckFailed _ err ->
  1827. 1096.54 s [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]]
  1828. 1096.54 s [opt-env-conf-test] - ParseErrorMissingArgument o ->
  1829. 1096.54 s [opt-env-conf-test] - [ "Missing argument: "
  1830. 1096.54 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong o)
  1831. 1096.54 s [opt-env-conf-test] - ]
  1832. 1096.54 s [opt-env-conf-test] - ParseErrorArgumentRead md errs ->
  1833. 1096.54 s [opt-env-conf-test] - ["Failed to read argument: "]
  1834. 1096.54 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  1835. 1096.54 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1836. 1096.54 s [opt-env-conf-test] - ParseErrorMissingOption o ->
  1837. 1096.54 s [opt-env-conf-test] - ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1838. 1096.54 s [opt-env-conf-test] - ParseErrorMissingSwitch o ->
  1839. 1096.54 s [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1840. 1096.54 s [opt-env-conf-test] - ParseErrorOptionRead md errs ->
  1841. 1096.54 s [opt-env-conf-test] - ["Failed to read option: "]
  1842. 1096.54 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  1843. 1096.54 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1844. 1096.54 s [opt-env-conf-test] - ParseErrorMissingEnvVar md ->
  1845. 1096.54 s [opt-env-conf-test] - ["Missing env var: "]
  1846. 1096.54 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  1847. 1096.54 s [opt-env-conf-test] - ParseErrorEnvRead md errs ->
  1848. 1096.54 s [opt-env-conf-test] - ["Failed to read env var: "]
  1849. 1096.54 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  1850. 1096.54 s [opt-env-conf-test] - ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1851. 1096.54 s [opt-env-conf-test] - ParseErrorMissingConfVal md ->
  1852. 1096.54 s [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md
  1853. 1096.54 s [opt-env-conf-test] - ParseErrorConfigRead md s ->
  1854. 1096.54 s [opt-env-conf-test] - ["Failed to parse configuration: "]
  1855. 1096.54 s [opt-env-conf-test] - : maybe [] renderConfDoc md
  1856. 1096.54 s [opt-env-conf-test] - ++ [[chunk $ T.pack s]]
  1857. 1096.54 s [opt-env-conf-test] - ParseErrorMissingCommand cs ->
  1858. 1096.54 s [opt-env-conf-test] - ["Missing command, available commands:"]
  1859. 1096.54 s [opt-env-conf-test] - : availableCommandsLines cs
  1860. 1096.54 s [opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs ->
  1861. 1096.54 s [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  1862. 1096.54 s [opt-env-conf-test] - [fore blue "available commands:"]
  1863. 1096.54 s [opt-env-conf-test] - ]
  1864. 1096.54 s [opt-env-conf-test] - ++ availableCommandsLines cs
  1865. 1096.54 s [opt-env-conf-test] - ParseErrorAllOrNothing locs ->
  1866. 1096.54 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."],
  1867. 1096.54 s [opt-env-conf-test] - ["The following settings have been parsed:"]
  1868. 1096.54 s [opt-env-conf-test] - ]
  1869. 1096.54 s [opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs)
  1870. 1096.54 s [opt-env-conf-test] - ParseErrorUnrecognised leftovers ->
  1871. 1096.54 s [opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  1872. 1096.54 s [opt-env-conf-test] - ParseErrorMissingCapability cap ->
  1873. 1096.54 s [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]],
  1874. 1096.54 s [opt-env-conf-test] + [ case parseErrorMessage of
  1875. 1096.54 s [opt-env-conf-test] + ParseErrorEmpty ->
  1876. 1096.54 s [opt-env-conf-test] + [["Hit the 'empty' case of the Parser type, this should not happen."]]
  1877. 1096.54 s [opt-env-conf-test] + ParseErrorEmptySetting ->
  1878. 1096.54 s [opt-env-conf-test] + [["This setting has not been configured to be able to parse anything."]]
  1879. 1096.54 s [opt-env-conf-test] + ParseErrorNoReaders ->
  1880. 1096.54 s [opt-env-conf-test] + [ ["No readers were configured for an argument, option, or env."],
  1881. 1096.54 s [opt-env-conf-test] + ["You should not be seeing this error because the linting phase should have caught it."]
  1882. 1096.54 s [opt-env-conf-test] + ]
  1883. 1096.54 s [opt-env-conf-test] + ParseErrorCheckFailed _ err ->
  1884. 1096.54 s [opt-env-conf-test] + [["Check failed: "], [chunk $ T.pack err]]
  1885. 1096.54 s [opt-env-conf-test] + ParseErrorMissingArgument o ->
  1886. 1096.54 s [opt-env-conf-test] + [ "Missing argument: "
  1887. 1096.54 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong o)
  1888. 1096.54 s [opt-env-conf-test] + ]
  1889. 1096.54 s [opt-env-conf-test] + ParseErrorArgumentRead md errs ->
  1890. 1096.54 s [opt-env-conf-test] + ["Failed to read argument: "]
  1891. 1096.54 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  1892. 1096.54 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1893. 1096.54 s [opt-env-conf-test] + ParseErrorMissingOption o ->
  1894. 1096.55 s [opt-env-conf-test] + ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1895. 1096.55 s [opt-env-conf-test] + ParseErrorMissingSwitch o ->
  1896. 1096.55 s [opt-env-conf-test] + ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1897. 1096.55 s [opt-env-conf-test] + ParseErrorOptionRead md errs ->
  1898. 1096.55 s [opt-env-conf-test] + ["Failed to read option: "]
  1899. 1096.55 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  1900. 1096.55 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1901. 1096.55 s [opt-env-conf-test] + ParseErrorMissingEnvVar md ->
  1902. 1096.55 s [opt-env-conf-test] + ["Missing env var: "]
  1903. 1096.55 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  1904. 1096.55 s [opt-env-conf-test] + ParseErrorEnvRead md errs ->
  1905. 1096.55 s [opt-env-conf-test] + ["Failed to read env var: "]
  1906. 1096.55 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  1907. 1096.55 s [opt-env-conf-test] + ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1908. 1096.55 s [opt-env-conf-test] + ParseErrorMissingConfVal md ->
  1909. 1096.55 s [opt-env-conf-test] + ["Missing config value: "] : maybe [] renderConfDoc md
  1910. 1096.55 s [opt-env-conf-test] + ParseErrorConfigRead md s ->
  1911. 1096.55 s [opt-env-conf-test] + ["Failed to parse configuration: "]
  1912. 1096.55 s [opt-env-conf-test] + : maybe [] renderConfDoc md
  1913. 1096.55 s [opt-env-conf-test] + ++ [[chunk $ T.pack s]]
  1914. 1096.55 s [opt-env-conf-test] + ParseErrorMissingCommand cs ->
  1915. 1096.55 s [opt-env-conf-test] + ["Missing command, available commands:"]
  1916. 1096.55 s [opt-env-conf-test] + : availableCommandsLines cs
  1917. 1096.55 s [opt-env-conf-test] + ParseErrorUnrecognisedCommand c cs ->
  1918. 1096.55 s [opt-env-conf-test] + [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  1919. 1096.55 s [opt-env-conf-test] + [fore blue "available commands:"]
  1920. 1096.55 s [opt-env-conf-test] + ]
  1921. 1096.55 s [opt-env-conf-test] + ++ availableCommandsLines cs
  1922. 1096.55 s [opt-env-conf-test] + ParseErrorAllOrNothing locs ->
  1923. 1096.55 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."],
  1924. 1096.55 s [opt-env-conf-test] + ["The following settings have been parsed:"]
  1925. 1096.55 s [opt-env-conf-test] + ]
  1926. 1096.55 s [opt-env-conf-test] + ++ map (pure . srcLocChunk) (M.elems locs)
  1927. 1096.55 s [opt-env-conf-test] + ParseErrorUnrecognised leftovers ->
  1928. 1096.55 s [opt-env-conf-test] + ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  1929. 1096.55 s [opt-env-conf-test] + ParseErrorMissingCapability cap ->
  1930. 1096.55 s [opt-env-conf-test] + ["Missing capability: " : [chunk $ T.pack $ show cap]],
  1931. 1096.55 s [opt-env-conf-test] maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc
  1932. 1096.55 s [opt-env-conf-test] ]
  1933. 1096.55 s [opt-env-conf-test]
  1934. 1096.55 s [opt-env-conf-test]
  1935. 1096.55 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65
  1936. 1096.55 s [opt-env-conf-test] @@ -80,63 +80,63 @@
  1937. 1096.55 s [opt-env-conf-test] renderError :: ParseError -> [[Chunk]]
  1938. 1096.55 s [opt-env-conf-test] renderError ParseError {..} =
  1939. 1096.55 s [opt-env-conf-test] concat
  1940. 1096.55 s [opt-env-conf-test] - [ case parseErrorMessage of
  1941. 1096.55 s [opt-env-conf-test] - ParseErrorEmpty ->
  1942. 1096.55 s [opt-env-conf-test] - [["Hit the 'empty' case of the Parser type, this should not happen."]]
  1943. 1096.55 s [opt-env-conf-test] - ParseErrorEmptySetting ->
  1944. 1096.55 s [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]]
  1945. 1096.55 s [opt-env-conf-test] - ParseErrorNoReaders ->
  1946. 1096.55 s [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."],
  1947. 1096.55 s [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."]
  1948. 1096.55 s [opt-env-conf-test] - ]
  1949. 1096.55 s [opt-env-conf-test] - ParseErrorCheckFailed _ err ->
  1950. 1096.55 s [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]]
  1951. 1096.55 s [opt-env-conf-test] - ParseErrorMissingArgument o ->
  1952. 1096.55 s [opt-env-conf-test] - [ "Missing argument: "
  1953. 1096.55 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong o)
  1954. 1096.55 s [opt-env-conf-test] - ]
  1955. 1096.55 s [opt-env-conf-test] - ParseErrorArgumentRead md errs ->
  1956. 1096.55 s [opt-env-conf-test] - ["Failed to read argument: "]
  1957. 1096.55 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  1958. 1096.55 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1959. 1096.55 s [opt-env-conf-test] - ParseErrorMissingOption o ->
  1960. 1096.55 s [opt-env-conf-test] - ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1961. 1096.55 s [opt-env-conf-test] - ParseErrorMissingSwitch o ->
  1962. 1096.55 s [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  1963. 1096.55 s [opt-env-conf-test] - ParseErrorOptionRead md errs ->
  1964. 1096.55 s [opt-env-conf-test] - ["Failed to read option: "]
  1965. 1096.55 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  1966. 1096.55 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1967. 1096.55 s [opt-env-conf-test] - ParseErrorMissingEnvVar md ->
  1968. 1096.55 s [opt-env-conf-test] - ["Missing env var: "]
  1969. 1096.55 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  1970. 1096.55 s [opt-env-conf-test] - ParseErrorEnvRead md errs ->
  1971. 1096.55 s [opt-env-conf-test] - ["Failed to read env var: "]
  1972. 1096.55 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  1973. 1096.55 s [opt-env-conf-test] - ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  1974. 1096.55 s [opt-env-conf-test] - ParseErrorMissingConfVal md ->
  1975. 1096.55 s [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md
  1976. 1096.55 s [opt-env-conf-test] - ParseErrorConfigRead md s ->
  1977. 1096.55 s [opt-env-conf-test] - ["Failed to parse configuration: "]
  1978. 1096.55 s [opt-env-conf-test] - : maybe [] renderConfDoc md
  1979. 1096.55 s [opt-env-conf-test] - ++ [[chunk $ T.pack s]]
  1980. 1096.55 s [opt-env-conf-test] - ParseErrorMissingCommand cs ->
  1981. 1096.55 s [opt-env-conf-test] - ["Missing command, available commands:"]
  1982. 1096.55 s [opt-env-conf-test] - : availableCommandsLines cs
  1983. 1096.55 s [opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs ->
  1984. 1096.55 s [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  1985. 1096.55 s [opt-env-conf-test] - [fore blue "available commands:"]
  1986. 1096.55 s [opt-env-conf-test] - ]
  1987. 1096.55 s [opt-env-conf-test] - ++ availableCommandsLines cs
  1988. 1096.55 s [opt-env-conf-test] - ParseErrorAllOrNothing locs ->
  1989. 1096.55 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."],
  1990. 1096.55 s [opt-env-conf-test] - ["The following settings have been parsed:"]
  1991. 1096.55 s [opt-env-conf-test] - ]
  1992. 1096.55 s [opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs)
  1993. 1096.55 s [opt-env-conf-test] - ParseErrorUnrecognised leftovers ->
  1994. 1096.55 s [opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  1995. 1096.55 s [opt-env-conf-test] - ParseErrorMissingCapability cap ->
  1996. 1096.55 s [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]],
  1997. 1096.55 s [opt-env-conf-test] + [ case parseErrorMessage of
  1998. 1096.55 s [opt-env-conf-test] + ParseErrorEmpty ->
  1999. 1096.55 s [opt-env-conf-test] + [["Hit the 'empty' case of the Parser type, this should not happen."]]
  2000. 1096.55 s [opt-env-conf-test] + ParseErrorEmptySetting ->
  2001. 1096.55 s [opt-env-conf-test] + [["This setting has not been configured to be able to parse anything."]]
  2002. 1096.55 s [opt-env-conf-test] + ParseErrorNoReaders ->
  2003. 1096.55 s [opt-env-conf-test] + [ ["No readers were configured for an argument, option, or env."],
  2004. 1096.55 s [opt-env-conf-test] + ["You should not be seeing this error because the linting phase should have caught it."]
  2005. 1096.55 s [opt-env-conf-test] + ]
  2006. 1096.55 s [opt-env-conf-test] + ParseErrorCheckFailed _ err ->
  2007. 1096.55 s [opt-env-conf-test] + [["Check failed: "], [chunk $ T.pack err]]
  2008. 1096.55 s [opt-env-conf-test] + ParseErrorMissingArgument o ->
  2009. 1096.55 s [opt-env-conf-test] + [ "Missing argument: "
  2010. 1096.55 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong o)
  2011. 1096.55 s [opt-env-conf-test] + ]
  2012. 1096.55 s [opt-env-conf-test] + ParseErrorArgumentRead md errs ->
  2013. 1096.55 s [opt-env-conf-test] + ["Failed to read argument: "]
  2014. 1096.55 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  2015. 1096.55 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2016. 1096.55 s [opt-env-conf-test] + ParseErrorMissingOption o ->
  2017. 1096.55 s [opt-env-conf-test] + ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2018. 1096.55 s [opt-env-conf-test] + ParseErrorMissingSwitch o ->
  2019. 1096.55 s [opt-env-conf-test] + ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2020. 1096.55 s [opt-env-conf-test] + ParseErrorOptionRead md errs ->
  2021. 1096.55 s [opt-env-conf-test] + ["Failed to read option: "]
  2022. 1096.55 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  2023. 1096.55 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2024. 1096.55 s [opt-env-conf-test] + ParseErrorMissingEnvVar md ->
  2025. 1096.55 s [opt-env-conf-test] + ["Missing env var: "]
  2026. 1096.55 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  2027. 1096.55 s [opt-env-conf-test] + ParseErrorEnvRead md errs ->
  2028. 1096.55 s [opt-env-conf-test] + ["Failed to read env var: "]
  2029. 1096.55 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  2030. 1096.55 s [opt-env-conf-test] + ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2031. 1096.55 s [opt-env-conf-test] + ParseErrorMissingConfVal md ->
  2032. 1096.55 s [opt-env-conf-test] + ["Missing config value: "] : maybe [] renderConfDoc md
  2033. 1096.55 s [opt-env-conf-test] + ParseErrorConfigRead md s ->
  2034. 1096.55 s [opt-env-conf-test] + ["Failed to parse configuration: "]
  2035. 1096.55 s [opt-env-conf-test] + : maybe [] renderConfDoc md
  2036. 1096.55 s [opt-env-conf-test] + ++ [[chunk $ T.pack s]]
  2037. 1096.55 s [opt-env-conf-test] + ParseErrorMissingCommand cs ->
  2038. 1096.55 s [opt-env-conf-test] + ["Missing command, available commands:"]
  2039. 1096.55 s [opt-env-conf-test] + : availableCommandsLines cs
  2040. 1096.55 s [opt-env-conf-test] + ParseErrorUnrecognisedCommand c cs ->
  2041. 1096.55 s [opt-env-conf-test] + [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  2042. 1096.55 s [opt-env-conf-test] + [fore blue "available commands:"]
  2043. 1096.55 s [opt-env-conf-test] + ]
  2044. 1096.55 s [opt-env-conf-test] + ++ availableCommandsLines cs
  2045. 1096.55 s [opt-env-conf-test] + ParseErrorAllOrNothing locs ->
  2046. 1096.55 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."],
  2047. 1096.55 s [opt-env-conf-test] + ["The following settings have been parsed:"]
  2048. 1096.55 s [opt-env-conf-test] + ]
  2049. 1096.55 s [opt-env-conf-test] + ++ map (pure . srcLocChunk) (M.elems locs)
  2050. 1096.55 s [opt-env-conf-test] + ParseErrorUnrecognised leftovers ->
  2051. 1096.55 s [opt-env-conf-test] + ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  2052. 1096.55 s [opt-env-conf-test] + ParseErrorMissingCapability cap ->
  2053. 1096.55 s [opt-env-conf-test] + ["Missing capability: " : [chunk $ T.pack $ show cap]],
  2054. 1096.55 s [opt-env-conf-test] maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc
  2055. 1096.55 s [opt-env-conf-test] ]
  2056. 1096.55 s [opt-env-conf-test]
  2057. 1096.55 s [opt-env-conf-test]
  2058. 1096.55 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65
  2059. 1096.55 s [opt-env-conf-test] @@ -80,63 +80,63 @@
  2060. 1096.55 s [opt-env-conf-test] renderError :: ParseError -> [[Chunk]]
  2061. 1096.55 s [opt-env-conf-test] renderError ParseError {..} =
  2062. 1096.55 s [opt-env-conf-test] concat
  2063. 1096.55 s [opt-env-conf-test] - [ case parseErrorMessage of
  2064. 1096.55 s [opt-env-conf-test] - ParseErrorEmpty ->
  2065. 1096.55 s [opt-env-conf-test] - [["Hit the 'empty' case of the Parser type, this should not happen."]]
  2066. 1096.55 s [opt-env-conf-test] - ParseErrorEmptySetting ->
  2067. 1096.55 s [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]]
  2068. 1096.55 s [opt-env-conf-test] - ParseErrorNoReaders ->
  2069. 1096.55 s [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."],
  2070. 1096.55 s [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."]
  2071. 1096.55 s [opt-env-conf-test] - ]
  2072. 1096.55 s [opt-env-conf-test] - ParseErrorCheckFailed _ err ->
  2073. 1096.55 s [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]]
  2074. 1096.55 s [opt-env-conf-test] - ParseErrorMissingArgument o ->
  2075. 1096.55 s [opt-env-conf-test] - [ "Missing argument: "
  2076. 1096.55 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong o)
  2077. 1096.55 s [opt-env-conf-test] - ]
  2078. 1096.55 s [opt-env-conf-test] - ParseErrorArgumentRead md errs ->
  2079. 1096.55 s [opt-env-conf-test] - ["Failed to read argument: "]
  2080. 1096.55 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  2081. 1096.55 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2082. 1096.55 s [opt-env-conf-test] - ParseErrorMissingOption o ->
  2083. 1096.55 s [opt-env-conf-test] - ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2084. 1096.55 s [opt-env-conf-test] - ParseErrorMissingSwitch o ->
  2085. 1096.55 s [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2086. 1096.55 s [opt-env-conf-test] - ParseErrorOptionRead md errs ->
  2087. 1096.55 s [opt-env-conf-test] - ["Failed to read option: "]
  2088. 1096.55 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  2089. 1096.55 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2090. 1096.55 s [opt-env-conf-test] - ParseErrorMissingEnvVar md ->
  2091. 1096.55 s [opt-env-conf-test] - ["Missing env var: "]
  2092. 1096.55 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  2093. 1096.55 s [opt-env-conf-test] - ParseErrorEnvRead md errs ->
  2094. 1096.55 s [opt-env-conf-test] - ["Failed to read env var: "]
  2095. 1096.55 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  2096. 1096.55 s [opt-env-conf-test] - ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2097. 1096.55 s [opt-env-conf-test] - ParseErrorMissingConfVal md ->
  2098. 1096.55 s [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md
  2099. 1096.55 s [opt-env-conf-test] - ParseErrorConfigRead md s ->
  2100. 1096.55 s [opt-env-conf-test] - ["Failed to parse configuration: "]
  2101. 1096.55 s [opt-env-conf-test] - : maybe [] renderConfDoc md
  2102. 1096.55 s [opt-env-conf-test] - ++ [[chunk $ T.pack s]]
  2103. 1096.55 s [opt-env-conf-test] - ParseErrorMissingCommand cs ->
  2104. 1096.55 s [opt-env-conf-test] - ["Missing command, available commands:"]
  2105. 1096.55 s [opt-env-conf-test] - : availableCommandsLines cs
  2106. 1096.55 s [opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs ->
  2107. 1096.55 s [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  2108. 1096.55 s [opt-env-conf-test] - [fore blue "available commands:"]
  2109. 1096.55 s [opt-env-conf-test] - ]
  2110. 1096.55 s [opt-env-conf-test] - ++ availableCommandsLines cs
  2111. 1096.55 s [opt-env-conf-test] - ParseErrorAllOrNothing locs ->
  2112. 1096.55 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."],
  2113. 1096.55 s [opt-env-conf-test] - ["The following settings have been parsed:"]
  2114. 1096.55 s [opt-env-conf-test] - ]
  2115. 1096.55 s [opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs)
  2116. 1096.55 s [opt-env-conf-test] - ParseErrorUnrecognised leftovers ->
  2117. 1096.55 s [opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  2118. 1096.55 s [opt-env-conf-test] - ParseErrorMissingCapability cap ->
  2119. 1096.55 s [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]],
  2120. 1096.55 s [opt-env-conf-test] + [ case parseErrorMessage of
  2121. 1096.55 s [opt-env-conf-test] + ParseErrorEmpty ->
  2122. 1096.55 s [opt-env-conf-test] + [["Hit the 'empty' case of the Parser type, this should not happen."]]
  2123. 1096.55 s [opt-env-conf-test] + ParseErrorEmptySetting ->
  2124. 1096.55 s [opt-env-conf-test] + [["This setting has not been configured to be able to parse anything."]]
  2125. 1096.55 s [opt-env-conf-test] + ParseErrorNoReaders ->
  2126. 1096.55 s [opt-env-conf-test] + [ ["No readers were configured for an argument, option, or env."],
  2127. 1096.55 s [opt-env-conf-test] + ["You should not be seeing this error because the linting phase should have caught it."]
  2128. 1096.55 s [opt-env-conf-test] + ]
  2129. 1096.55 s [opt-env-conf-test] + ParseErrorCheckFailed _ err ->
  2130. 1096.55 s [opt-env-conf-test] + [["Check failed: "], [chunk $ T.pack err]]
  2131. 1096.55 s [opt-env-conf-test] + ParseErrorMissingArgument o ->
  2132. 1096.55 s [opt-env-conf-test] + [ "Missing argument: "
  2133. 1096.55 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong o)
  2134. 1096.55 s [opt-env-conf-test] + ]
  2135. 1096.55 s [opt-env-conf-test] + ParseErrorArgumentRead md errs ->
  2136. 1096.55 s [opt-env-conf-test] + ["Failed to read argument: "]
  2137. 1096.55 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  2138. 1096.55 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2139. 1096.55 s [opt-env-conf-test] + ParseErrorMissingOption o ->
  2140. 1096.55 s [opt-env-conf-test] + ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2141. 1096.55 s [opt-env-conf-test] + ParseErrorMissingSwitch o ->
  2142. 1096.55 s [opt-env-conf-test] + ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2143. 1096.55 s [opt-env-conf-test] + ParseErrorOptionRead md errs ->
  2144. 1096.55 s [opt-env-conf-test] + ["Failed to read option: "]
  2145. 1096.55 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  2146. 1096.55 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2147. 1096.55 s [opt-env-conf-test] + ParseErrorMissingEnvVar md ->
  2148. 1096.55 s [opt-env-conf-test] + ["Missing env var: "]
  2149. 1096.55 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  2150. 1096.55 s [opt-env-conf-test] + ParseErrorEnvRead md errs ->
  2151. 1096.55 s [opt-env-conf-test] + ["Failed to read env var: "]
  2152. 1096.55 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  2153. 1096.55 s [opt-env-conf-test] + ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2154. 1096.55 s [opt-env-conf-test] + ParseErrorMissingConfVal md ->
  2155. 1096.55 s [opt-env-conf-test] + ["Missing config value: "] : maybe [] renderConfDoc md
  2156. 1096.55 s [opt-env-conf-test] + ParseErrorConfigRead md s ->
  2157. 1096.55 s [opt-env-conf-test] + ["Failed to parse configuration: "]
  2158. 1096.55 s [opt-env-conf-test] + : maybe [] renderConfDoc md
  2159. 1096.55 s [opt-env-conf-test] + ++ [[chunk $ T.pack s]]
  2160. 1096.55 s [opt-env-conf-test] + ParseErrorMissingCommand cs ->
  2161. 1096.55 s [opt-env-conf-test] + ["Missing command, available commands:"]
  2162. 1096.55 s [opt-env-conf-test] + : availableCommandsLines cs
  2163. 1096.55 s [opt-env-conf-test] + ParseErrorUnrecognisedCommand c cs ->
  2164. 1096.55 s [opt-env-conf-test] + [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  2165. 1096.55 s [opt-env-conf-test] + [fore blue "available commands:"]
  2166. 1096.55 s [opt-env-conf-test] + ]
  2167. 1096.55 s [opt-env-conf-test] + ++ availableCommandsLines cs
  2168. 1096.55 s [opt-env-conf-test] + ParseErrorAllOrNothing locs ->
  2169. 1096.55 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."],
  2170. 1096.55 s [opt-env-conf-test] + ["The following settings have been parsed:"]
  2171. 1096.55 s [opt-env-conf-test] + ]
  2172. 1096.55 s [opt-env-conf-test] + ++ map (pure . srcLocChunk) (M.elems locs)
  2173. 1096.55 s [opt-env-conf-test] + ParseErrorUnrecognised leftovers ->
  2174. 1096.55 s [opt-env-conf-test] + ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  2175. 1096.55 s [opt-env-conf-test] + ParseErrorMissingCapability cap ->
  2176. 1096.55 s [opt-env-conf-test] + ["Missing capability: " : [chunk $ T.pack $ show cap]],
  2177. 1096.55 s [opt-env-conf-test] maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc
  2178. 1096.55 s [opt-env-conf-test] ]
  2179. 1096.55 s [opt-env-conf-test]
  2180. 1096.55 s [opt-env-conf-test]
  2181. 1096.55 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Error.hs:83:7-65
  2182. 1096.55 s [opt-env-conf-test] @@ -80,63 +80,63 @@
  2183. 1096.55 s [opt-env-conf-test] renderError :: ParseError -> [[Chunk]]
  2184. 1096.56 s [opt-env-conf-test] renderError ParseError {..} =
  2185. 1096.56 s [opt-env-conf-test] concat
  2186. 1096.56 s [opt-env-conf-test] - [ case parseErrorMessage of
  2187. 1096.56 s [opt-env-conf-test] - ParseErrorEmpty ->
  2188. 1096.56 s [opt-env-conf-test] - [["Hit the 'empty' case of the Parser type, this should not happen."]]
  2189. 1096.56 s [opt-env-conf-test] - ParseErrorEmptySetting ->
  2190. 1096.56 s [opt-env-conf-test] - [["This setting has not been configured to be able to parse anything."]]
  2191. 1096.56 s [opt-env-conf-test] - ParseErrorNoReaders ->
  2192. 1096.56 s [opt-env-conf-test] - [ ["No readers were configured for an argument, option, or env."],
  2193. 1096.56 s [opt-env-conf-test] - ["You should not be seeing this error because the linting phase should have caught it."]
  2194. 1096.56 s [opt-env-conf-test] - ]
  2195. 1096.56 s [opt-env-conf-test] - ParseErrorCheckFailed _ err ->
  2196. 1096.56 s [opt-env-conf-test] - [["Check failed: "], [chunk $ T.pack err]]
  2197. 1096.56 s [opt-env-conf-test] - ParseErrorMissingArgument o ->
  2198. 1096.56 s [opt-env-conf-test] - [ "Missing argument: "
  2199. 1096.56 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong o)
  2200. 1096.56 s [opt-env-conf-test] - ]
  2201. 1096.56 s [opt-env-conf-test] - ParseErrorArgumentRead md errs ->
  2202. 1096.56 s [opt-env-conf-test] - ["Failed to read argument: "]
  2203. 1096.56 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  2204. 1096.56 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2205. 1096.56 s [opt-env-conf-test] - ParseErrorMissingOption o ->
  2206. 1096.56 s [opt-env-conf-test] - ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2207. 1096.56 s [opt-env-conf-test] - ParseErrorMissingSwitch o ->
  2208. 1096.56 s [opt-env-conf-test] - ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2209. 1096.56 s [opt-env-conf-test] - ParseErrorOptionRead md errs ->
  2210. 1096.56 s [opt-env-conf-test] - ["Failed to read option: "]
  2211. 1096.56 s [opt-env-conf-test] - : unwordsChunks (maybe [] renderOptDocLong md)
  2212. 1096.56 s [opt-env-conf-test] - : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2213. 1096.56 s [opt-env-conf-test] - ParseErrorMissingEnvVar md ->
  2214. 1096.56 s [opt-env-conf-test] - ["Missing env var: "]
  2215. 1096.56 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  2216. 1096.56 s [opt-env-conf-test] - ParseErrorEnvRead md errs ->
  2217. 1096.56 s [opt-env-conf-test] - ["Failed to read env var: "]
  2218. 1096.56 s [opt-env-conf-test] - : maybe [] renderEnvDoc md
  2219. 1096.56 s [opt-env-conf-test] - ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2220. 1096.56 s [opt-env-conf-test] - ParseErrorMissingConfVal md ->
  2221. 1096.56 s [opt-env-conf-test] - ["Missing config value: "] : maybe [] renderConfDoc md
  2222. 1096.56 s [opt-env-conf-test] - ParseErrorConfigRead md s ->
  2223. 1096.56 s [opt-env-conf-test] - ["Failed to parse configuration: "]
  2224. 1096.56 s [opt-env-conf-test] - : maybe [] renderConfDoc md
  2225. 1096.56 s [opt-env-conf-test] - ++ [[chunk $ T.pack s]]
  2226. 1096.56 s [opt-env-conf-test] - ParseErrorMissingCommand cs ->
  2227. 1096.56 s [opt-env-conf-test] - ["Missing command, available commands:"]
  2228. 1096.56 s [opt-env-conf-test] - : availableCommandsLines cs
  2229. 1096.56 s [opt-env-conf-test] - ParseErrorUnrecognisedCommand c cs ->
  2230. 1096.56 s [opt-env-conf-test] - [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  2231. 1096.56 s [opt-env-conf-test] - [fore blue "available commands:"]
  2232. 1096.56 s [opt-env-conf-test] - ]
  2233. 1096.56 s [opt-env-conf-test] - ++ availableCommandsLines cs
  2234. 1096.56 s [opt-env-conf-test] - ParseErrorAllOrNothing locs ->
  2235. 1096.56 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."],
  2236. 1096.56 s [opt-env-conf-test] - ["The following settings have been parsed:"]
  2237. 1096.56 s [opt-env-conf-test] - ]
  2238. 1096.56 s [opt-env-conf-test] - ++ map (pure . srcLocChunk) (M.elems locs)
  2239. 1096.56 s [opt-env-conf-test] - ParseErrorUnrecognised leftovers ->
  2240. 1096.56 s [opt-env-conf-test] - ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  2241. 1096.56 s [opt-env-conf-test] - ParseErrorMissingCapability cap ->
  2242. 1096.56 s [opt-env-conf-test] - ["Missing capability: " : [chunk $ T.pack $ show cap]],
  2243. 1096.56 s [opt-env-conf-test] + [ case parseErrorMessage of
  2244. 1096.56 s [opt-env-conf-test] + ParseErrorEmpty ->
  2245. 1096.56 s [opt-env-conf-test] + [["Hit the 'empty' case of the Parser type, this should not happen."]]
  2246. 1096.56 s [opt-env-conf-test] + ParseErrorEmptySetting ->
  2247. 1096.56 s [opt-env-conf-test] + [["This setting has not been configured to be able to parse anything."]]
  2248. 1096.56 s [opt-env-conf-test] + ParseErrorNoReaders ->
  2249. 1096.56 s [opt-env-conf-test] + [ ["No readers were configured for an argument, option, or env."],
  2250. 1096.56 s [opt-env-conf-test] + ["You should not be seeing this error because the linting phase should have caught it."]
  2251. 1096.56 s [opt-env-conf-test] + ]
  2252. 1096.56 s [opt-env-conf-test] + ParseErrorCheckFailed _ err ->
  2253. 1096.56 s [opt-env-conf-test] + [["Check failed: "], [chunk $ T.pack err]]
  2254. 1096.56 s [opt-env-conf-test] + ParseErrorMissingArgument o ->
  2255. 1096.56 s [opt-env-conf-test] + [ "Missing argument: "
  2256. 1096.56 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong o)
  2257. 1096.56 s [opt-env-conf-test] + ]
  2258. 1096.56 s [opt-env-conf-test] + ParseErrorArgumentRead md errs ->
  2259. 1096.56 s [opt-env-conf-test] + ["Failed to read argument: "]
  2260. 1096.56 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDoe IsString Arg where
  2261. 1096.56 s [opt-env-conf-test] fromString = parseArg
  2262. 1096.56 s [opt-env-conf-test] Testing mutation ListLit at src/OptEnvConf/Args.hs:63:7-8
  2263. 1096.56 s [opt-env-conf-test] @@ -60,14 +60,14 @@
  2264. 1096.56 s [opt-env-conf-test] instance Validity Arg where
  2265. 1096.56 s [opt-env-conf-test] validate arg =
  2266. 1096.56 s [opt-env-conf-test] mconcat
  2267. 1096.56 s [opt-env-conf-test] - [ genericValidate arg,
  2268. 1096.56 s [opt-env-conf-test] - case arg of
  2269. 1096.56 s [opt-env-conf-test] - ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-'
  2270. 1096.56 s [opt-env-conf-test] - ArgPlain s -> declare "does not start with a dash" $ case s of
  2271. 1096.56 s [opt-env-conf-test] - ('-' : _) -> False
  2272. 1096.56 s [opt-env-conf-test] - _ -> True
  2273. 1096.56 s [opt-env-conf-test] - _ -> valid
  2274. 1096.56 s [opt-env-conf-test] - ]
  2275. 1096.56 s [opt-env-conf-test] + [ genericValidate arg,
  2276. 1096.56 s [opt-env-conf-test] + case arg of
  2277. 1096.56 s [opt-env-conf-test] + ArgDashed False (c :| _) -> declare "The first character of a short dashed is not a dash" $ c /= '-'
  2278. 1096.56 s [opt-env-conf-test] + ArgPlain s -> declare "does not start with a dash" $ case s of
  2279. 1096.56 s [opt-env-conf-test] + ('-' : _) -> False
  2280. 1096.56 s [opt-env-conf-test] + _ -> True
  2281. 1096.56 s [opt-env-conf-test] + _ -> valid
  2282. 1096.56 s [opt-env-conf-test] + ]
  2283. 1096.56 s [opt-env-conf-test]
  2284. 1096.56 s [opt-env-conf-test] instance IsString Arg where
  2285. 1096.56 s [opt-env-conf-test] fromString = parseArg
  2286. 1096.56 s [opt-env-conf-test] Testing mutation ConstBool at src/OptEnvConf/Args.hs:293:6-12
  2287. 1096.56 s [opt-env-conf-test] @@ -290,7 +290,7 @@
  2288. 1096.56 s [opt-env-conf-test] NonEmpty Char ->
  2289. 1096.56 s [opt-env-conf-test] Maybe (Maybe (NonEmpty Char))
  2290. 1096.56 s [opt-env-conf-test] consumeDashedOption dasheds isLong cs =
  2291. 1096.56 s [opt-env-conf-test] - if isLong
  2292. 1096.56 s [opt-env-conf-test] + if True
  2293. 1096.56 s [opt-env-conf-test] then
  2294. 1096.56 s [opt-env-conf-test] if DashedLong cs `elem` dasheds
  2295. 1096.56 s [opt-env-conf-test] then Just Nothing
  2296. 1096.56 s [opt-env-conf-test] Testing mutation CondFlip at src/OptEnvConf/Args.hs:258:3-69
  2297. 1096.56 s [opt-env-conf-test] @@ -255,9 +255,9 @@
  2298. 1096.56 s [opt-env-conf-test] NonEmpty Char ->
  2299. 1096.56 s [opt-env-conf-test] Maybe String
  2300. 1096.56 s [opt-env-conf-test] consumeDashedShorthandOption dasheds isLong cs =
  2301. 1096.56 s [opt-env-conf-test] - if isLong
  2302. 1096.56 s [opt-env-conf-test] - then consumeLongDashedShorthandOption (longDasheds dasheds) cs
  2303. 1096.56 s [opt-env-conf-test] - else consumeShortDashedShorthandOption (shortDasheds dasheds) cs
  2304. 1096.56 s [opt-env-conf-test] + if isLong
  2305. 1096.56 s [opt-env-conf-test] + then consumeLongDashedShorthandOption (longDasheds dasheds) cs
  2306. 1096.56 s [opt-env-conf-test] + else consumeShortDashedShorthandOption (shortDasheds dasheds) cs
  2307. 1096.56 s [opt-env-conf-test]
  2308. 1096.56 s [opt-env-conf-test] consumeLongDashedShorthandOption ::
  2309. 1096.56 s [opt-env-conf-test] [NonEmpty Char] ->
  2310. 1096.56 s [opt-env-conf-test] cLong md)
  2311. 1096.56 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2312. 1096.56 s [opt-env-conf-test] + ParseErrorMissingOption o ->
  2313. 1096.56 s [opt-env-conf-test] + ["Missing option: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2314. 1096.56 s [opt-env-conf-test] + ParseErrorMissingSwitch o ->
  2315. 1096.56 s [opt-env-conf-test] + ["Missing switch: " : unwordsChunks (maybe [] renderOptDocLong o)]
  2316. 1096.56 s [opt-env-conf-test] + ParseErrorOptionRead md errs ->
  2317. 1096.56 s [opt-env-conf-test] + ["Failed to read option: "]
  2318. 1096.56 s [opt-env-conf-test] + : unwordsChunks (maybe [] renderOptDocLong md)
  2319. 1096.56 s [opt-env-conf-test] + : map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2320. 1096.56 s [opt-env-conf-test] + ParseErrorMissingEnvVar md ->
  2321. 1096.56 s [opt-env-conf-test] + ["Missing env var: "]
  2322. 1096.56 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  2323. 1096.56 s [opt-env-conf-test] + ParseErrorEnvRead md errs ->
  2324. 1096.56 s [opt-env-conf-test] + ["Failed to read env var: "]
  2325. 1096.56 s [opt-env-conf-test] + : maybe [] renderEnvDoc md
  2326. 1096.56 s [opt-env-conf-test] + ++ map (\err -> [chunk $ T.pack err]) (NE.toList errs)
  2327. 1096.56 s [opt-env-conf-test] + ParseErrorMissingConfVal md ->
  2328. 1096.56 s [opt-env-conf-test] + ["Missing config value: "] : maybe [] renderConfDoc md
  2329. 1096.56 s [opt-env-conf-test] + ParseErrorConfigRead md s ->
  2330. 1096.56 s [opt-env-conf-test] + ["Failed to parse configuration: "]
  2331. 1096.56 s [opt-env-conf-test] + : maybe [] renderConfDoc md
  2332. 1096.56 s [opt-env-conf-test] + ++ [[chunk $ T.pack s]]
  2333. 1096.56 s [opt-env-conf-test] + ParseErrorMissingCommand cs ->
  2334. 1096.56 s [opt-env-conf-test] + ["Missing command, available commands:"]
  2335. 1096.56 s [opt-env-conf-test] + : availableCommandsLines cs
  2336. 1096.56 s [opt-env-conf-test] + ParseErrorUnrecognisedCommand c cs ->
  2337. 1096.56 s [opt-env-conf-test] + [ [fore red "Unrecognised command: ", fore yellow $ chunk (T.pack c)],
  2338. 1096.56 s [opt-env-conf-test] + [fore blue "available commands:"]
  2339. 1096.56 s [opt-env-conf-test] + ]
  2340. 1096.56 s [opt-env-conf-test] + ++ availableCommandsLines cs
  2341. 1096.56 s [opt-env-conf-test] + ParseErrorAllOrNothing locs ->
  2342. 1096.56 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."],
  2343. 1096.56 s [opt-env-conf-test] + ["The following settings have been parsed:"]
  2344. 1096.56 s [opt-env-conf-test] + ]
  2345. 1096.56 s [opt-env-conf-test] + ++ map (pure . srcLocChunk) (M.elems locs)
  2346. 1096.56 s [opt-env-conf-test] + ParseErrorUnrecognised leftovers ->
  2347. 1096.56 s [opt-env-conf-test] + ["Unrecognised args: " : unwordsChunks (map (pure . chunk . T.pack) (NE.toList leftovers))]
  2348. 1096.56 s [opt-env-conf-test] + ParseErrorMissingCapability cap ->
  2349. 1096.56 s [opt-env-conf-test] + ["Missing capability: " : [chunk $ T.pack $ show cap]],
  2350. 1096.56 s [opt-env-conf-test] maybe [] (pure . ("see " :) . pure . srcLocChunk) parseErrorSrcLoc
  2351. 1096.56 s [opt-env-conf-test] ]
  2352. 1096.56 s [opt-env-conf-test]
  2353. 1096.56 s [opt-env-conf-test]
  2354. 1096.56 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Test.hs:67:3-96
  2355. 1096.56 s [opt-env-conf-test] @@ -64,10 +64,10 @@
  2356. 1096.56 s [opt-env-conf-test]
  2357. 1096.56 s [opt-env-conf-test] parserLintTest :: Parser a -> IO ()
  2358. 1096.56 s [opt-env-conf-test] parserLintTest parser =
  2359. 1096.56 s [opt-env-conf-test] - case lintParser parser of
  2360. 1096.56 s [opt-env-conf-test] - Nothing -> pure ()
  2361. 1096.56 s [opt-env-conf-test] - Just errs ->
  2362. 1096.56 s [opt-env-conf-test] - expectationFailure $ T.unpack $ renderChunksText With24BitColours $ renderLintErrors errs
  2363. 1096.56 s [opt-env-conf-test] + case lintParser parser of
  2364. 1096.56 s [opt-env-conf-test] + Nothing -> pure ()
  2365. 1096.56 s [opt-env-conf-test] + Just errs ->
  2366. 1096.56 s [opt-env-conf-test] + expectationFailure $ T.unpack $ renderChunksText With24BitColours $ renderLintErrors errs
  2367. 1096.56 s [opt-env-conf-test]
  2368. 1096.56 s [opt-env-conf-test] settingsParserArgsTest :: (Show a, Eq a, HasParser a) => [String] -> a -> IO ()
  2369. 1096.56 s [opt-env-conf-test] settingsParserArgsTest = parserArgsTest settingsParser
  2370. 1096.56 s [opt-env-conf-test]
  2371. 1096.56 s [opt-env-conf-test] RemoveCase at src/OptEnvConf/Test.hs:149:13-24
  2372. 1096.56 s [opt-env-conf-test] @@ -146,14 +146,14 @@
  2373. 1096.56 s [opt-env-conf-test]
  2374. 1096.56 s [opt-env-conf-test] generatedFileComment :: CallStack -> T.Text
  2375. 1096.56 s [opt-env-conf-test] generatedFileComment cs =
  2376. 1096.56 s [opt-env-conf-test] - let loc = case getCallStack cs of
  2377. 1096.56 s [opt-env-conf-test] - (_, srcLoc) : _ ->
  2378. 1096.56 s [opt-env-conf-test] - packageName (Stack.srcLocPackage srcLoc)
  2379. 1096.56 s [opt-env-conf-test] - <> ":"
  2380. 1096.56 s [opt-env-conf-test] - <> Stack.srcLocFile srcLoc
  2381. 1096.56 s [opt-env-conf-test] - <> ":"
  2382. 1096.56 s [opt-env-conf-test] - <> show (Stack.srcLocStartLine srcLoc)
  2383. 1096.56 s [opt-env-conf-test] - [] -> "unknown"
  2384. 1096.56 s [opt-env-conf-test] + let loc = case getCallStack cs of
  2385. 1096.56 s [opt-env-conf-test] + (_, srcLoc) : _ ->
  2386. 1096.56 s [opt-env-conf-test] + packageName (Stack.srcLocPackage srcLoc)
  2387. 1096.56 s [opt-env-conf-test] + <> ":"
  2388. 1096.56 s [opt-env-conf-test] + <> Stack.srcLocFile srcLoc
  2389. 1096.56 s [opt-env-conf-test] + <> ":"
  2390. 1096.56 s [opt-env-conf-test] + <> show (Stack.srcLocStartLine srcLoc)
  2391. 1096.56 s [opt-env-conf-test] + [] -> "unknown"
  2392. 1096.56 s [opt-env-conf-test] in T.pack $
  2393. 1096.56 s [opt-env-conf-test] unlines $
  2394. 1096.56 s [opt-env-conf-test] map
  2395. 1096.56 s [opt-env-conf-test]
  2396. 1096.56 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:35-84
  2397. 1096.56 s [opt-env-conf-test] @@ -177,4 +177,4 @@
  2398. 1096.56 s [opt-env-conf-test] where
  2399. 1096.56 s [opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
  2400. 1096.56 s [opt-env-conf-test] go (c : rest) = c : go rest
  2401. 1096.56 s [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2402. 1096.56 s [opt-env-conf-test] + isVersion v = not (null v) && True
  2403. 1096.56 s [opt-env-conf-test]
  2404. 1096.56 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:49-84
  2405. 1096.56 s [opt-env-conf-test] @@ -177,4 +177,4 @@
  2406. 1096.56 s [opt-env-conf-test] where
  2407. 1096.56 s [opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
  2408. 1096.56 s [opt-env-conf-test] go (c : rest) = c : go rest
  2409. 1096.56 s [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2410. 1096.56 s [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && True
  2411. 1096.56 s [opt-env-conf-test]
  2412. 1096.56 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:60-81
  2413. 1096.56 s [opt-env-conf-test] @@ -177,4 +177,4 @@
  2414. 1096.56 s [opt-env-conf-test] where
  2415. 1096.56 s [opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
  2416. 1096.56 s [opt-env-conf-test] go (c : rest) = c : go rest
  2417. 1096.56 s [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2418. 1096.56 s [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> True) v
  2419. 1096.56 s [opt-env-conf-test]
  2420. 1096.56 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:73-81
  2421. 1096.56 s [opt-env-conf-test] @@ -177,4 +177,4 @@
  2422. 1096.56 s [opt-env-conf-test] where
  2423. 1096.56 s [opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
  2424. 1096.56 s [opt-env-conf-test] go (c : rest) = c : go rest
  2425. 1096.56 s [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2426. 1096.56 s [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || True) v
  2427. 1096.56 s [opt-env-conf-test]
  2428. 1096.56 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:60-69
  2429. 1096.56 s [opt-env-conf-test] @@ -177,4 +177,4 @@
  2430. 1096.56 s [opt-env-conf-test] where
  2431. 1096.56 s [opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
  2432. 1096.56 s [opt-env-conf-test] go (c : rest) = c : go rest
  2433. 1096.56 s [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2434. 1096.56 s [opt-env-conf-test] + isVersion v = not (null v) && elem '.' v && all (\c -> True || c == '.') v
  2435. 1096.56 s [opt-env-conf-test]
  2436. 1096.56 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:35-45
  2437. 1096.56 s [opt-env-conf-test] @@ -177,4 +177,4 @@
  2438. 1096.56 s [opt-env-conf-test] where
  2439. 1096.56 s [opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
  2440. 1096.56 s [opt-env-conf-test] go (c : rest) = c : go rest
  2441. 1096.56 s [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2442. 1096.56 s [opt-env-conf-test] + isVersion v = not (null v) && True && all (\c -> isDigit c || c == '.') v
  2443. 1096.56 s [opt-env-conf-test]
  2444. 1096.56 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:19-31
  2445. 1096.56 s [opt-env-conf-test] @@ -177,4 +177,4 @@
  2446. 1096.56 s [opt-env-conf-test] where
  2447. 1096.56 s [opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
  2448. 1096.56 s [opt-env-conf-test] go (c : rest) = c : go rest
  2449. 1096.56 s [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2450. 1096.56 s [opt-env-conf-test] + isVersion v = True && elem '.' v && all (\c -> isDigit c || c == '.') v
  2451. 1096.56 s [opt-env-conf-test]
  2452. 1096.56 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:23-31
  2453. 1096.56 s [opt-env-conf-test] @@ -177,4 +177,4 @@
  2454. 1096.56 s [opt-env-conf-test] where
  2455. 1096.56 s [opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
  2456. 1096.56 s [opt-env-conf-test] go (c : rest) = c : go rest
  2457. 1096.56 s [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2458. 1096.56 s [opt-env-conf-test] + isVersion v = not False && elem '.' v && all (\c -> isDigit c || c == '.') v
  2459. 1096.56 s [opt-env-conf-test]
  2460. 1096.56 s [opt-env-conf-test] ConstBool at src/OptEnvConf/Test.hs:180:24-30
  2461. 1096.56 s [opt-env-conf-test] @@ -177,4 +177,4 @@
  2462. 1096.56 s [opt-env-conf-test] where
  2463. 1096.56 s [opt-env-conf-test] version = takeWhile (\c -> isDigit c || c == '.') rest
  2464. 1096.56 s [opt-env-conf-test] go (c : rest) = c : go rest
  2465. 1096.56 s [opt-env-conf-test] - isVersion v = not (null v) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2466. 1096.56 s [opt-env-conf-test] + isVersion v = not (False) && elem '.' v && all (\c -> isDigit c || c == '.') v
  2467. 1096.56 s [opt-env-conf-test] checkPhase completed in 12 minutes 26 seconds
  2468. 1096.56 s [opt-env-conf-test] Phase: haddockPhase
  2469. 1096.56 s [opt-env-conf-test] Phase: installPhase
  2470. 1096.65 s [opt-env-conf-test] Installing library in /nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-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
  2471. 1096.87 s [opt-env-conf-test] Phase: fixupPhase
  2472. 1096.89 s [opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-opt-env-conf-test-0.0.0.4
  2473. 1096.89 s [opt-env-conf-test] shrinking /nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-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
  2474. 1096.92 s [opt-env-conf-test] checking for references to /build/ in /nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-opt-env-conf-test-0.0.0.4...
  2475. 1096.93 s [opt-env-conf-test] patching script interpreter paths in /nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-opt-env-conf-test-0.0.0.4
  2476. 1096.94 s [opt-env-conf-test] stripping (with command strip and flags -S -p) in /nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-opt-env-conf-test-0.0.0.4/lib
  2477. 1096.98 s [opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/7s7cga7bl2rv73bfjz69rhim4wmnfxnp-opt-env-conf-test-0.0.0.4-manifest
  2478. 1096.99 s [opt-env-conf-test] checking for references to /build/ in /nix/store/7s7cga7bl2rv73bfjz69rhim4wmnfxnp-opt-env-conf-test-0.0.0.4-manifest...
  2479. 1097.00 s [opt-env-conf-test] patching script interpreter paths in /nix/store/7s7cga7bl2rv73bfjz69rhim4wmnfxnp-opt-env-conf-test-0.0.0.4-manifest
  2480. 1097.00 s [opt-env-conf-test] shrinking RPATHs of ELF executables and libraries in /nix/store/ihlbx204dbjmgrv47bn5p04wpgibzsxw-opt-env-conf-test-0.0.0.4-report
  2481. 1097.06 s [opt-env-conf-test] checking for references to /build/ in /nix/store/ihlbx204dbjmgrv47bn5p04wpgibzsxw-opt-env-conf-test-0.0.0.4-report...
  2482. 1097.13 s [opt-env-conf-test] patching script interpreter paths in /nix/store/ihlbx204dbjmgrv47bn5p04wpgibzsxw-opt-env-conf-test-0.0.0.4-report
  2483. 1097.24 s [post-build-hook] Uploading to cachix cache "sydtest": /nix/store/7s7cga7bl2rv73bfjz69rhim4wmnfxnp-opt-env-conf-test-0.0.0.4-manifest /nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-opt-env-conf-test-0.0.0.4 /nix/store/ihlbx204dbjmgrv47bn5p04wpgibzsxw-opt-env-conf-test-0.0.0.4-report
  2484. 1110.05 s [post-build-hook] Pushing 3 paths (268 are already present) using zstd to cache sydtest ⏳
  2485. 1110.05 s [post-build-hook]
  2486. 1113.36 s [post-build-hook] Pushing /nix/store/7s7cga7bl2rv73bfjz69rhim4wmnfxnp-opt-env-conf-test-0.0.0.4-manifest (1.00 MiB)
  2487. 1113.40 s [post-build-hook] Pushing /nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-opt-env-conf-test-0.0.0.4 (2.20 MiB)
  2488. 1113.53 s [post-build-hook] Pushing /nix/store/ihlbx204dbjmgrv47bn5p04wpgibzsxw-opt-env-conf-test-0.0.0.4-report (2.81 MiB)
  2489. 1119.42 s [post-build-hook]
  2490. 1119.42 s [post-build-hook] All done.
  2491. 1119.44 s [post-build-hook] Uploading to the NixCI staging cache: /nix/store/7s7cga7bl2rv73bfjz69rhim4wmnfxnp-opt-env-conf-test-0.0.0.4-manifest /nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-opt-env-conf-test-0.0.0.4 /nix/store/ihlbx204dbjmgrv47bn5p04wpgibzsxw-opt-env-conf-test-0.0.0.4-report
  2492. 1119.48 s [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
  2493. 1119.77 s [post-build-hook] copying 3 paths...
  2494. 1119.77 s [post-build-hook] copying path '/nix/store/7s7cga7bl2rv73bfjz69rhim4wmnfxnp-opt-env-conf-test-0.0.0.4-manifest' to 'https://cache.staging.nix-ci.com'...
  2495. 1119.77 s [post-build-hook] copying path '/nix/store/ihlbx204dbjmgrv47bn5p04wpgibzsxw-opt-env-conf-test-0.0.0.4-report' to 'https://cache.staging.nix-ci.com'...
  2496. 1119.77 s [post-build-hook] copying path '/nix/store/hcm4hmdqf3bsrfqfdj7sid6ghrbddvnq-opt-env-conf-test-0.0.0.4' to 'https://cache.staging.nix-ci.com'...
  2497. 1120.79 s [post-build-hook] warning: 'warn-short-path-literals' is deprecated, use 'lint-short-path-literals = ignore' instead
  2498. 1121.00 s [post-build-hook] copying 1 paths...
  2499. 1121.00 s [post-build-hook] copying path '/nix/store/4m35mapfxfyy3akdln5rbpmgb0wwf1gi-opt-env-conf-test-0.0.0.4.drv' to 'https://cache.staging.nix-ci.com'...
  2500. 1121.18 s Progress: 8 of 9 built, 2 of 2 downloaded from cache
More Logs Raw Logs

Agent Instructions

Wait for completion, without logs:

curl --netrc -N https://staging.nix-ci.com/gh:NorfairKing:sydtest/mutation-testing/f4e3b1708494f4658b32dcbaa6a779a0860b2840/cf6e047e-112c-465a-adae-677700a0aaec/wait

Latest logs, with timestamps (streams while running):

curl --netrc -N https://staging.nix-ci.com/gh:NorfairKing:sydtest/mutation-testing/f4e3b1708494f4658b32dcbaa6a779a0860b2840/cf6e047e-112c-465a-adae-677700a0aaec/tail

All logs, with timestamps (available after completion):

curl --netrc https://staging.nix-ci.com/gh:NorfairKing:sydtest/mutation-testing/f4e3b1708494f4658b32dcbaa6a779a0860b2840/cf6e047e-112c-465a-adae-677700a0aaec/logs

Raw logs, from the start (no timestamps):

curl --netrc -N https://staging.nix-ci.com/gh:NorfairKing:sydtest/mutation-testing/f4e3b1708494f4658b32dcbaa6a779a0860b2840/cf6e047e-112c-465a-adae-677700a0aaec/raw-logs

Content types available for /logs and /tail (use Accept header):

Example:

curl --netrc -H "Accept: text/csv" https://staging.nix-ci.com/gh:NorfairKing:sydtest/mutation-testing/f4e3b1708494f4658b32dcbaa6a779a0860b2840/cf6e047e-112c-465a-adae-677700a0aaec/logs

Reproduce locally: https://staging.nix-ci.com/gh:NorfairKing:sydtest/mutation-testing/f4e3b1708494f4658b32dcbaa6a779a0860b2840/cf6e047e-112c-465a-adae-677700a0aaec/repro

For more instructions, fetch https://staging.nix-ci.com/instructions .