Resolving dependencies... Build profile: -w ghc-9.2.4 -O0 In order, the following will be built (use -v for more details): - xmlhtml-0.2.5.4 (first run) Configuring xmlhtml-0.2.5.4... Preprocessing library for xmlhtml-0.2.5.4.. Building library for xmlhtml-0.2.5.4.. [ 1 of 10] Compiling Text.XmlHtml.HTML.Meta ( src/Text/XmlHtml/HTML/Meta.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/HTML/Meta.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/HTML/Meta.dyn_o ) [ 2 of 10] Compiling Text.XmlHtml.Common ( src/Text/XmlHtml/Common.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/Common.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/Common.dyn_o ) [ 3 of 10] Compiling Text.XmlHtml.TextParser ( src/Text/XmlHtml/TextParser.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/TextParser.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/TextParser.dyn_o ) [ 4 of 10] Compiling Text.XmlHtml.XML.Parse ( src/Text/XmlHtml/XML/Parse.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/XML/Parse.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/XML/Parse.dyn_o ) [ 5 of 10] Compiling Text.XmlHtml.HTML.Parse ( src/Text/XmlHtml/HTML/Parse.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/HTML/Parse.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/HTML/Parse.dyn_o ) [ 6 of 10] Compiling Text.XmlHtml.XML.Render ( src/Text/XmlHtml/XML/Render.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/XML/Render.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/XML/Render.dyn_o ) [ 7 of 10] Compiling Text.XmlHtml.HTML.Render ( src/Text/XmlHtml/HTML/Render.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/HTML/Render.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/HTML/Render.dyn_o ) [ 8 of 10] Compiling Text.XmlHtml ( src/Text/XmlHtml.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml.dyn_o ) [ 9 of 10] Compiling Text.XmlHtml.Cursor ( src/Text/XmlHtml/Cursor.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/Cursor.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/XmlHtml/Cursor.dyn_o ) [10 of 10] Compiling Text.Blaze.Renderer.XmlHtml ( src/Text/Blaze/Renderer/XmlHtml.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/Blaze/Renderer/XmlHtml.o, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/Text/Blaze/Renderer/XmlHtml.dyn_o ) Preprocessing test suite 'testsuite' for xmlhtml-0.2.5.4.. Building test suite 'testsuite' for xmlhtml-0.2.5.4.. [1 of 6] Compiling Text.XmlHtml.OASISTest ( test/src/Text/XmlHtml/OASISTest.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/testsuite/testsuite-tmp/Text/XmlHtml/OASISTest.o ) test/src/Text/XmlHtml/OASISTest.hs:5:1: warning: [-Wunused-imports] The import of Control.Applicative is redundant except perhaps to import instances from Control.Applicative To import instances alone, use: import Control.Applicative() | 5 | import Control.Applicative ((<*>)) | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/OASISTest.hs:9:1: warning: [-Wunused-imports] The import of Data.Functor is redundant except perhaps to import instances from Data.Functor To import instances alone, use: import Data.Functor() | 9 | import Data.Functor ((<$>)) | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/OASISTest.hs:13:1: warning: [-Wunused-imports] The import of Data.Monoid is redundant except perhaps to import instances from Data.Monoid To import instances alone, use: import Data.Monoid() | 13 | import Data.Monoid (mconcat) | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/OASISTest.hs:99:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Either String Document not matched: Left _ Right (HtmlDocument _ _ _) | 99 | let Right (XmlDocument _ _ ns) = parseXML name testListSrc | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/OASISTest.hs:100:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Node not matched: Nothing | 100 | let Just c = listToMaybe (filter isElement ns) | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/OASISTest.hs:160:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Either String Document not matched: Left _ | 160 | let Right d = parseXML "" src | ^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/OASISTest.hs:162:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Either String Document not matched: Left _ | 162 | let Right d2 = parseXML "" src2 | ^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/OASISTest.hs:187:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Either String Document not matched: Left _ | 187 | let Right d = parseHTML "" src | ^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/OASISTest.hs:189:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Either String Document not matched: Left _ | 189 | let Right d2 = parseHTML "" src2 | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ [2 of 6] Compiling Text.XmlHtml.TestCommon ( test/src/Text/XmlHtml/TestCommon.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/testsuite/testsuite-tmp/Text/XmlHtml/TestCommon.o ) [3 of 6] Compiling Text.XmlHtml.DocumentTests ( test/src/Text/XmlHtml/DocumentTests.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/testsuite/testsuite-tmp/Text/XmlHtml/DocumentTests.o ) [4 of 6] Compiling Text.XmlHtml.CursorTests ( test/src/Text/XmlHtml/CursorTests.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/testsuite/testsuite-tmp/Text/XmlHtml/CursorTests.o ) test/src/Text/XmlHtml/CursorTests.hs:111:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 111 | let Just e1 = firstChild r | ^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:112:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 112 | let Just e2 = getChild 1 r | ^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:113:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 113 | let Just e3 = lastChild r | ^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:127:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 127 | do let Just a = lastChild e2 | ^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:132:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 132 | do let Just a = right e1 | ^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:133:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 133 | let Just b = right a | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:138:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 138 | let Just c = left e3 | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:139:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 139 | let Just d = left e2 | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:144:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 144 | do let Just r1 = parent e2 | ^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:147:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 147 | do let Just cmt = firstChild e2 | ^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:156:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 156 | let Just cmt = firstChild e2 | ^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:159:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 159 | let Just em = lastChild e2 | ^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:162:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 162 | let Just pelem = lastChild e3 | ^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:163:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 163 | let Just ptext = lastChild pelem | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:171:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 171 | let Just e1 = findChild isFirst r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:172:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 172 | let Just e2 = findChild ((==(Just "bob")) . getAttribute "name" . current) r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:173:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 173 | let Just e3 = findChild isLast r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:197:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 197 | let Just e1 = firstChild r | ^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:198:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 198 | let Just e2 = right e1 | ^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:199:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 199 | let Just e3 = lastChild r | ^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:201:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 201 | do let Just cmt = firstChild e2 | ^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:203:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 203 | let Just e2' = parent cmt' | ^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:226:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 226 | let Just alice = firstChild r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:227:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 227 | let Just bob = getChild 1 r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:228:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 228 | let Just camille = lastChild r | ^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:237:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 237 | let Just a = findLeft isFirst ins | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:241:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 241 | let Just b = right a | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:245:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 245 | let Just c = right b | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:249:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 249 | let Just d = right c | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:258:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 258 | let Just a = findLeft isFirst ins | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:267:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 267 | let Just a = findRight isLast ins | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:271:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 271 | let Just b = left a | ^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:275:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 275 | let Just c = left b | ^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:279:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 279 | let Just d = left c | ^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:288:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 288 | let Just a = findRight isLast ins | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:300:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 300 | let Just a = left ins | ^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:304:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 304 | let Just b = left a | ^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:308:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 308 | let Just c = left b | ^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:317:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 317 | let Just a = right ins | ^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:321:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 321 | let Just b = right a | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:325:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 325 | let Just c = right b | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:330:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 330 | do let Just ins1 = insertFirstChild fred r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:331:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 331 | let Just ins2 = insertLastChild mary ins1 | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:333:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 333 | let Just a = firstChild ins2 | ^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:337:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 337 | let Just b = right a | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:341:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 341 | let Just c = right b | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:345:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 345 | let Just d = right c | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:349:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 349 | let Just e = right d | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:355:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 355 | do let Just cmt = firstChild bob | ^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:366:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 366 | do let Just ins = insertManyFirstChild new r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:368:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 368 | let Just a = firstChild ins | ^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:372:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 372 | let Just b = right a | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:376:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 376 | let Just c = right b | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:380:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 380 | let Just d = right c | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:384:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 384 | let Just e = right d | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:391:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 391 | do let Just ins = insertManyLastChild new r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:393:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 393 | let Just a = firstChild ins | ^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:397:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 397 | let Just b = right a | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:401:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 401 | let Just c = right b | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:405:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 405 | let Just d = right c | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:409:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 409 | let Just e = right d | ^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:416:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 416 | let Just a = right ins | ^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:424:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 424 | let Just a = right ins | ^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:432:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 432 | let Just a = left ins | ^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:440:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 440 | let Just a = left ins | ^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:450:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 450 | let Just alice = firstChild r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:451:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 451 | let Just bob = getChild 1 r | ^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:452:9: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 452 | let Just camille = lastChild r | ^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:455:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe (Node, Cursor) not matched: Nothing | 455 | do let Just (n,del) = removeLeft bob | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:456:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type [Node] not matched: [] [(TextNode _)] [(Comment _)] [(Element _ _ _)] ... | 456 | let [b,c] = siblings del | ^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:465:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe (Node, Cursor) not matched: Nothing | 465 | do let Just (n,del) = removeRight bob | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:466:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type [Node] not matched: [] [(TextNode _)] [(Comment _)] [(Element _ _ _)] ... | 466 | let [a,b] = siblings del | ^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:475:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 475 | do let Just del = removeGoLeft bob | ^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:476:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 476 | let Just c = right del | ^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:486:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 486 | do let Just del = removeGoRight bob | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:487:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 487 | let Just a = left del | ^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:497:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type Maybe Cursor not matched: Nothing | 497 | do let Just del = removeGoUp bob | ^^^^^^^^^^^^^^^^^^^^^^^^^ test/src/Text/XmlHtml/CursorTests.hs:498:12: warning: [-Wincomplete-uni-patterns] Pattern match(es) are non-exhaustive In a pattern binding: Patterns of type [Node] not matched: [] [(TextNode _)] [(Comment _)] [(Element _ _ _)] ... | 498 | let [a,c] = childNodes (current del) | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ [5 of 6] Compiling Text.XmlHtml.Tests ( test/src/Text/XmlHtml/Tests.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/testsuite/testsuite-tmp/Text/XmlHtml/Tests.o ) test/src/Text/XmlHtml/Tests.hs:9:1: warning: [-Wunused-imports] The import of Data.Monoid is redundant except perhaps to import instances from Data.Monoid To import instances alone, use: import Data.Monoid() | 9 | import Data.Monoid (mappend, mempty) | ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ [6 of 6] Compiling Main ( test/src/TestSuite.hs, /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/testsuite/testsuite-tmp/Main.o ) Linking /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/build/testsuite/testsuite ... Running 1 test suites... Test suite testsuite: RUNNING... Test suite testsuite: PASS Test suite logged to: /home/builder/builder-dir/build-cache/tmp-install/reports/xmlhtml-0.2.5.4.test Writing: xmlhtml-0.2.5.4-inplace/Text.XmlHtml.HTML.Meta.hs.html Writing: xmlhtml-0.2.5.4-inplace/Text.Blaze.Renderer.XmlHtml.hs.html Writing: xmlhtml-0.2.5.4-inplace/Text.XmlHtml.Cursor.hs.html Writing: xmlhtml-0.2.5.4-inplace/Text.XmlHtml.hs.html Writing: hpc_index.html Writing: hpc_index_fun.html Writing: hpc_index_alt.html Writing: hpc_index_exp.html Test coverage report written to /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/hpc/vanilla/html/testsuite/hpc_index.html 1 of 1 test suites (1 of 1 test cases) passed. Writing: xmlhtml-0.2.5.4-inplace/Text.XmlHtml.HTML.Meta.hs.html Writing: xmlhtml-0.2.5.4-inplace/Text.Blaze.Renderer.XmlHtml.hs.html Writing: xmlhtml-0.2.5.4-inplace/Text.XmlHtml.Cursor.hs.html Writing: xmlhtml-0.2.5.4-inplace/Text.XmlHtml.hs.html Writing: hpc_index.html Writing: hpc_index_fun.html Writing: hpc_index_alt.html Writing: hpc_index_exp.html Package coverage report written to /home/builder/builder-dir/build-cache/tmp-install/dist-newstyle/build/x86_64-linux/ghc-9.2.4/xmlhtml-0.2.5.4/noopt/hpc/vanilla/html/xmlhtml-0.2.5.4/hpc_index.html