[all reports]
| Install |
InstallOk |
| Docs |
Ok |
| Tests |
Ok |
| Time submitted |
2023-02-13 07:48:32.324328001 UTC
|
| Compiler |
ghc-9.2.4 |
| OS |
linux |
| Arch |
x86_64 |
| Dependencies |
base-4.16.3.0, blaze-builder-0.4.2.2, blaze-html-0.9.1.2, blaze-markup-0.8.2.8, bytestring-0.11.3.1, bytestring-builder-0.10.8.2.0, containers-0.6.5.1, parsec-3.1.15.0, text-1.2.5.0, unordered-containers-0.2.19.1 |
| Flags |
none
|
Code Coverage
| expressions | 98% (10442/10621) |
|---|
| boolean | guards | 76% (73/96) |
|---|
| conditions | 90% (10/11) |
|---|
| qualifiers | 100% (0/0) |
|---|
| alternatives | 94% (315/333) |
|---|
| local declarations | 100% (89/89) |
|---|
| top-level declarations | 92% (231/251) |
|---|
Build log
[view raw]
Resolving dependencies...
Starting data-array-byte-0.1.0.1
Starting bytestring-builder-0.10.8.2.0
Starting blaze-builder-0.4.2.2
Building data-array-byte-0.1.0.1
Building bytestring-builder-0.10.8.2.0
Building blaze-builder-0.4.2.2
Completed bytestring-builder-0.10.8.2.0
Completed data-array-byte-0.1.0.1
Starting hashable-1.4.2.0
Building hashable-1.4.2.0
Completed blaze-builder-0.4.2.2
Starting blaze-markup-0.8.2.8
Building blaze-markup-0.8.2.8
Completed hashable-1.4.2.0
Starting unordered-containers-0.2.19.1
Building unordered-containers-0.2.19.1
Completed blaze-markup-0.8.2.8
Starting blaze-html-0.9.1.2
Building blaze-html-0.9.1.2
Completed unordered-containers-0.2.19.1
Completed blaze-html-0.9.1.2
Downloading xmlhtml-0.2.5.4
Downloaded xmlhtml-0.2.5.4
Starting xmlhtml-0.2.5.4
Building xmlhtml-0.2.5.4
Completed xmlhtml-0.2.5.4
Test log
[view raw]
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