Your message dated Wed, 01 May 2024 21:20:13 +0000
with message-id <e1s2hn7-00gchy...@fasolo.debian.org>
and subject line Bug#1070015: fixed in haskell-pandoc 3.1.3-2
has caused the Debian Bug report #1070015,
regarding haskel-pandoc: FTBFS on armel: Couldn't match expected type: 
WriterState -> m a
to be marked as done.

This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
Bug report if necessary, and/or fix the problem forthwith.

(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact ow...@bugs.debian.org
immediately.)


-- 
1070015: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=1070015
Debian Bug Tracking System
Contact ow...@bugs.debian.org with problems
--- Begin Message ---
Source: haskell-pandoc
Version: 3.1.3-1
Severity: serious
Tags: ftbfs
Justification: fails to build from source (but built successfully in the past)
X-Debbugs-Cc: sramac...@debian.org

https://buildd.debian.org/status/fetch.php?pkg=haskell-pandoc&arch=armel&ver=3.1.3-1%2Bb1&stamp=1713911741&raw=0

[162 of 212] Compiling Text.Pandoc.Writers.Muse

src/Text/Pandoc/Writers/Muse.hs:85:25: error:
    • Couldn't match expected type: WriterState -> m a
                  with actual type: Set.Set Text
    • Possible cause: ‘($)’ is applied to too many arguments
      In the expression: evalStateT $ runReaderT document env
      In an equation for ‘evalMuse’:
          evalMuse document env = evalStateT $ runReaderT document env
    • Relevant bindings include
        document :: Muse m a
          (bound at src/Text/Pandoc/Writers/Muse.hs:85:10)
        evalMuse :: Muse m a -> WriterEnv -> WriterState -> m a
          (bound at src/Text/Pandoc/Writers/Muse.hs:85:1)
   |
85 | evalMuse document env = evalStateT $ runReaderT document env
   |                         ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:85:38: error:
    • Couldn't match expected type ‘WriterState’
                  with actual type ‘StateT WriterState m a’
    • In the second argument of ‘($)’, namely ‘runReaderT document env’
      In the expression: evalStateT $ runReaderT document env
      In an equation for ‘evalMuse’:
          evalMuse document env = evalStateT $ runReaderT document env
    • Relevant bindings include
        document :: Muse m a
          (bound at src/Text/Pandoc/Writers/Muse.hs:85:10)
        evalMuse :: Muse m a -> WriterEnv -> WriterState -> m a
          (bound at src/Text/Pandoc/Writers/Muse.hs:85:1)
   |
85 | evalMuse document env = evalStateT $ runReaderT document env
   |                                      ^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:233:11: error:
    • Couldn't match expected type: ReaderT
                                      WriterEnv (StateT WriterState m) a2
                  with actual type: Int -> Set.Set Text -> Bool -> WriterState
    • Probable cause: ‘($)’ is applied to too few arguments
      In a stmt of a 'do' block: modify $ \ st -> st {stUseTags = False}
      In the expression:
        do modify $ \ st -> st {stUseTags = False}
           hang 2 "- " <$> blockListToMuse item
      In an equation for ‘bulletListItemToMuse’:
          bulletListItemToMuse item
            = do modify $ \ st -> ...
                 hang 2 "- " <$> blockListToMuse item
    • Relevant bindings include
        bulletListItemToMuse :: [Block] -> Muse m (Doc Text)
          (bound at src/Text/Pandoc/Writers/Muse.hs:232:9)
    |
233 |           modify $ \st -> st { stUseTags = False }
    |           ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:233:20: error:
    • Couldn't match expected type: [[Block]]
                  with actual type: WriterState -> WriterState
    • The lambda expression ‘\ st -> ...’ has one value argument,
        but its type ‘[[Block]]’ has none
      In the second argument of ‘($)’, namely
        ‘\ st -> st {stUseTags = False}’
      In a stmt of a 'do' block: modify $ \ st -> st {stUseTags = False}
    |
233 |           modify $ \st -> st { stUseTags = False }
    |                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:243:11: error:
    • Couldn't match expected type: ReaderT
                                      WriterEnv (StateT WriterState m) a3
                  with actual type: Int -> Set.Set Text -> Bool -> WriterState
    • Probable cause: ‘($)’ is applied to too few arguments
      In a stmt of a 'do' block: modify $ \ st -> st {stUseTags = False}
      In the expression:
        do modify $ \ st -> st {stUseTags = False}
           label' <- local
                       (\ env -> env {envOneLine = True, envAfterSpace = True})
                       $ inlineListToMuse' label
           let ind = offset' label'
           hang ind (nowrap label') . vcat <$> mapM descriptionToMuse defs
      In an equation for ‘definitionListItemToMuse’:
          definitionListItemToMuse (label, defs)
            = do modify $ \ st -> ...
                 label' <- local
                             (\ env -> env {envOneLine = True, envAfterSpace = 
True})
                             $ inlineListToMuse' label
                 let ind = ...
                 ....
            where
                offset' d
                  = maximum (0 :| map T.length (T.lines $ render Nothing d))
    • Relevant bindings include
        definitionListItemToMuse :: ([Inline], [[Block]])
                                    -> Muse m (Doc Text)
          (bound at src/Text/Pandoc/Writers/Muse.hs:242:9)
    |
243 |           modify $ \st -> st { stUseTags = False }
    |           ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:243:20: error:
    • Couldn't match expected type: [[Block]]
                  with actual type: WriterState -> WriterState
    • The lambda expression ‘\ st -> ...’ has one value argument,
        but its type ‘[[Block]]’ has none
      In the second argument of ‘($)’, namely
        ‘\ st -> st {stUseTags = False}’
      In a stmt of a 'do' block: modify $ \ st -> st {stUseTags = False}
    |
243 |           modify $ \st -> st { stUseTags = False }
    |                    ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:257:10: error:
    • Illegal term-level use of the type constructor or class ‘WriterState’
    • defined at src/Text/Pandoc/Writers/Muse.hs:70:1
    • Perhaps use variable ‘gets’ (imported from Control.Monad.State.Strict)
    • In a stmt of a 'do' block: ids <- gets stIds
      In the expression:
        do opts <- asks envOptions
           topLevel <- asks envTopLevel
           contents <- local (\ env -> env {envOneLine = True})
                         $ inlineListToMuse' inlines
           ids <- gets stIds
           ....
      In an equation for ‘blockToMuse’:
          blockToMuse (Header level (ident, _, _) inlines)
            = do opts <- asks envOptions
                 topLevel <- asks envTopLevel
                 contents <- local (\ env -> env {envOneLine = True})
                               $ inlineListToMuse' inlines
                 ....
    |
257 |   ids <- gets stIds
    |          ^^^^

src/Text/Pandoc/Writers/Muse.hs:289:24: error:
    • Illegal term-level use of the type constructor or class ‘WriterState’
    • defined at src/Text/Pandoc/Writers/Muse.hs:70:1
    • Perhaps use variable ‘gets’ (imported from Control.Monad.State.Strict)
    • In the second argument of ‘(<$>)’, namely ‘gets stNotes’
      In a stmt of a 'do' block: notes <- reverse <$> gets stNotes
      In the expression:
        do notes <- reverse <$> gets stNotes
           modify $ \ st -> st {stNotes = mempty}
           notesToMuse notes
    |
289 |   notes <- reverse <$> gets stNotes
    |                        ^^^^

src/Text/Pandoc/Writers/Muse.hs:298:8: error:
    • Illegal term-level use of the type constructor or class ‘WriterState’
    • defined at src/Text/Pandoc/Writers/Muse.hs:70:1
    • Perhaps use variable ‘gets’ (imported from Control.Monad.State.Strict)
    • In a stmt of a 'do' block: n <- gets stNoteNum
      In the expression:
        do n <- gets stNoteNum
           modify $ \ st -> st {stNoteNum = stNoteNum st + length notes}
           vsep <$> zipWithM noteToMuse [n .. ] notes
      In an equation for ‘notesToMuse’:
          notesToMuse notes
            = do n <- gets stNoteNum
                 modify $ \ st -> ...
                 vsep <$> zipWithM noteToMuse [n .. ] notes
    |
298 |   n <- gets stNoteNum
    |        ^^^^

src/Text/Pandoc/Writers/Muse.hs:526:14: error:
    • Illegal term-level use of the type constructor or class ‘WriterState’
    • defined at src/Text/Pandoc/Writers/Muse.hs:70:1
    • Perhaps use variable ‘gets’ (imported from Control.Monad.State.Strict)
    • In a stmt of a 'do' block: useTags <- gets stUseTags
      In the expression:
        do start <- asks envInlineStart
           afterSpace <- asks envAfterSpace
           topLevel <- asks envTopLevel
           insideAsterisks <- asks envInsideAsterisks
           ....
      In an equation for ‘renderInlineList’:
          renderInlineList (x : xs)
            = do start <- asks envInlineStart
                 afterSpace <- asks envAfterSpace
                 topLevel <- asks envTopLevel
                 ....
    |
526 |   useTags <- gets stUseTags
    |              ^^^^

src/Text/Pandoc/Writers/Muse.hs:553:3: error:
    • Couldn't match expected type: ReaderT
                                      WriterEnv (StateT WriterState m) a1
                  with actual type: Int -> Set.Set Text -> Bool -> WriterState
    • Probable cause: ‘($)’ is applied to too few arguments
      In a stmt of a 'do' block: modify $ \ st -> st {stUseTags = False}
      In the expression:
        do lst' <- normalizeInlineList . fixNotes
                     <$>
                       preprocessInlineList (map (removeKeyValues . 
replaceSmallCaps) lst)
           insideAsterisks <- asks envInsideAsterisks
           start <- asks envInlineStart
           modify $ \ st -> st {stUseTags = False}
           ....
      In an equation for ‘inlineListToMuse’:
          inlineListToMuse lst
            = do lst' <- normalizeInlineList . fixNotes
                           <$>
                             preprocessInlineList (map (removeKeyValues . 
replaceSmallCaps) lst)
                 insideAsterisks <- asks envInsideAsterisks
                 start <- asks envInlineStart
                 ....
    • Relevant bindings include
        inlineListToMuse :: [Inline] -> Muse m (Doc Text)
          (bound at src/Text/Pandoc/Writers/Muse.hs:549:1)
    |
553 |   modify $ \st -> st { stUseTags = False } -- Previous character is 
likely a '>' or some other markup
    |   ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:553:12: error:
    • Couldn't match expected type: [[Block]]
                  with actual type: WriterState -> WriterState
    • The lambda expression ‘\ st -> ...’ has one value argument,
        but its type ‘[[Block]]’ has none
      In the second argument of ‘($)’, namely
        ‘\ st -> st {stUseTags = False}’
      In a stmt of a 'do' block: modify $ \ st -> st {stUseTags = False}
    |
553 |   modify $ \st -> st { stUseTags = False } -- Previous character is 
likely a '>' or some other markup
    |            ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:569:3: error:
    • Couldn't match expected type: ReaderT
                                      WriterEnv (StateT WriterState m) a0
                  with actual type: Int -> Set.Set Text -> Bool -> WriterState
    • Probable cause: ‘($)’ is applied to too few arguments
      In a stmt of a 'do' block:
        modify $ \ st -> st {stUseTags = useTags}
      In the expression:
        do contents <- local
                         (\ env -> env {envInsideAsterisks = inAsterisks})
                         $ inlineListToMuse lst
           modify $ \ st -> st {stUseTags = useTags}
           return $ literal b <> contents <> literal e
      In an equation for ‘emphasis’:
          emphasis b e lst
            = do contents <- local
                               (\ env -> env {envInsideAsterisks = inAsterisks})
                               $ inlineListToMuse lst
                 modify $ \ st -> ...
                 return $ literal b <> contents <> literal e
            where
                inAsterisks = T.last b == '*' || T.head e == '*'
                useTags = T.last e /= '>'
    • Relevant bindings include
        emphasis :: Text -> Text -> [Inline] -> Muse m (Doc Text)
          (bound at src/Text/Pandoc/Writers/Muse.hs:567:1)
    |
569 |   modify $ \st -> st { stUseTags = useTags }
    |   ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:569:12: error:
    • Couldn't match expected type: [[Block]]
                  with actual type: WriterState -> WriterState
    • The lambda expression ‘\ st -> ...’ has one value argument,
        but its type ‘[[Block]]’ has none
      In the second argument of ‘($)’, namely
        ‘\ st -> st {stUseTags = useTags}’
      In a stmt of a 'do' block:
        modify $ \ st -> st {stUseTags = useTags}
    |
569 |   modify $ \st -> st { stUseTags = useTags }
    |            ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

src/Text/Pandoc/Writers/Muse.hs:584:14: error:
    • Illegal term-level use of the type constructor or class ‘WriterState’
    • defined at src/Text/Pandoc/Writers/Muse.hs:70:1
    • Perhaps use variable ‘gets’ (imported from Control.Monad.State.Strict)
    • In a stmt of a 'do' block: useTags <- gets stUseTags
      In the expression:
        do useTags <- gets stUseTags
           let lst' = normalizeInlineList lst
           if useTags then
               emphasis "<em>**" "**</em>" lst'
           else
               if null lst' || startsWithSpace lst' || endsWithSpace lst' then
                   emphasis "*<strong>" "</strong>*" lst'
               else
                   emphasis "***" "***" lst'
      In an equation for ‘inlineToMuse’:
          inlineToMuse (Emph [Strong lst])
            = do useTags <- gets stUseTags
                 let lst' = ...
                 if useTags then
                     emphasis "<em>**" "**</em>" lst'
                 else
                     if null lst' || startsWithSpace lst' || endsWithSpace lst' 
then
                         emphasis "*<strong>" "</strong>*" lst'
                     else
                         emphasis "***" "***" lst'
    |
584 |   useTags <- gets stUseTags
    |              ^^^^
[163 of 212] Compiling Text.Pandoc.Writers.Ms
[164 of 212] Compiling Text.Pandoc.Writers.MediaWiki
[165 of 212] Compiling Text.Pandoc.Writers.XWiki
[166 of 212] Compiling Text.Pandoc.Writers.LaTeX.Util
[167 of 212] Compiling Text.Pandoc.Writers.LaTeX.Table
[168 of 212] Compiling Text.Pandoc.Writers.LaTeX
[169 of 212] Compiling Text.Pandoc.Writers.ICML
[170 of 212] Compiling Text.Pandoc.Writers.HTML
[171 of 212] Compiling Text.Pandoc.Writers.Markdown.Inline
[172 of 212] Compiling Text.Pandoc.Writers.Markdown
[173 of 212] Compiling Text.Pandoc.Writers.OPML
[174 of 212] Compiling Text.Pandoc.Writers.Ipynb
[175 of 212] Compiling Text.Pandoc.Writers.CommonMark
[176 of 212] Compiling Text.Pandoc.Writers.ChunkedHTML
[177 of 212] Compiling Text.Pandoc.Writers.EPUB
[178 of 212] Compiling Text.Pandoc.Writers.DokuWiki
[179 of 212] Compiling Text.Pandoc.Writers.DocBook
[180 of 212] Compiling Text.Pandoc.Writers.ConTeXt
[181 of 212] Compiling Text.Pandoc.Writers.AsciiDoc
[182 of 212] Compiling Text.Pandoc.Readers.RST
[183 of 212] Compiling Text.Pandoc.Readers.LaTeX
[184 of 212] Compiling Text.Pandoc.Readers.Org.Inlines
[185 of 212] Compiling Text.Pandoc.Readers.Org.Meta
[186 of 212] Compiling Text.Pandoc.Readers.Org.Blocks
[187 of 212] Compiling Text.Pandoc.Readers.Org
[188 of 212] Compiling Text.Pandoc.Readers.HTML
[189 of 212] Compiling Text.Pandoc.Readers.Textile
[190 of 212] Compiling Text.Pandoc.Readers.TWiki
[191 of 212] Compiling Text.Pandoc.Readers.MediaWiki
[192 of 212] Compiling Text.Pandoc.Readers.Markdown
[193 of 212] Compiling Text.Pandoc.Readers.OPML
[194 of 212] Compiling Text.Pandoc.Readers.Ipynb
[195 of 212] Compiling Text.Pandoc.Readers.EPUB
[196 of 212] Compiling Text.Pandoc.Citeproc.BibTeX
[197 of 212] Compiling Text.Pandoc.Writers.BibTeX
[198 of 212] Compiling Text.Pandoc.Readers.BibTeX
[199 of 212] Compiling Text.Pandoc.Readers
[200 of 212] Compiling Text.Pandoc.App.Input
[201 of 212] Compiling Text.Pandoc.Citeproc
[202 of 212] Compiling Text.Pandoc.Writers.JATS
[203 of 212] Compiling Text.Pandoc.Writers.Docx.Table
[204 of 212] Compiling Text.Pandoc.Writers.Docx
-e: error: debian/hlibrary.setup build --builddir=dist-ghc returned exit code 1
 at /usr/share/perl5/Debian/Debhelper/Dh_Lib.pm line 875.
        Debian::Debhelper::Dh_Lib::error("debian/hlibrary.setup build 
--builddir=dist-ghc returned exit"...) called at 
/usr/share/perl5/Debian/Debhelper/Dh_Lib.pm line 614
        Debian::Debhelper::Dh_Lib::error_exitcode("debian/hlibrary.setup build 
--builddir=dist-ghc") called at /usr/share/perl5/Debian/Deb
        helper/Dh_Lib.pm line 477
        Debian::Debhelper::Dh_Lib::doit("debian/hlibrary.setup", "build", 
"--builddir=dist-ghc") called at 
/usr/share/perl5/Debian/Debhelper/Buildsystem/Haskell/Recipes.pm line 656
        Debian::Debhelper::Buildsystem::Haskell::Recipes::build_recipe() called 
at -e line 1
make: *** [/usr/share/cdbs/1/class/hlibrary.mk:158: build-ghc-stamp] Error 25

Cheers
-- 
Sebastian Ramacher

--- End Message ---
--- Begin Message ---
Source: haskell-pandoc
Source-Version: 3.1.3-2
Done: Ilias Tsitsimpis <ilias...@debian.org>

We believe that the bug you reported is fixed in the latest version of
haskell-pandoc, which is due to be installed in the Debian FTP archive.

A summary of the changes between this version and the previous one is
attached.

Thank you for reporting the bug, which will now be closed.  If you
have further comments please address them to 1070...@bugs.debian.org,
and the maintainer will reopen the bug report if appropriate.

Debian distribution maintenance software
pp.
Ilias Tsitsimpis <ilias...@debian.org> (supplier of updated haskell-pandoc 
package)

(This message was generated automatically at their request; if you
believe that there is a problem with it please contact the archive
administrators by mailing ftpmas...@ftp-master.debian.org)


-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA512

Format: 1.8
Date: Wed, 01 May 2024 12:36:13 +0300
Source: haskell-pandoc
Architecture: source
Version: 3.1.3-2
Distribution: unstable
Urgency: medium
Maintainer: Debian Haskell Group 
<pkg-haskell-maintain...@lists.alioth.debian.org>
Changed-By: Ilias Tsitsimpis <ilias...@debian.org>
Closes: 1069165 1070015
Changes:
 haskell-pandoc (3.1.3-2) unstable; urgency=medium
 .
   * Run build target twice, as a workaround for a GHC bug (Closes: #1070015)
   * Disable tests on loong64 (Closes: #1069165)
Checksums-Sha1:
 ce71ced4b4edcd8cf51765c5b0ddc8208b77d5cb 8576 haskell-pandoc_3.1.3-2.dsc
 66f038da38a86f2aab2a058a46c708c4f9d7d036 14424 
haskell-pandoc_3.1.3-2.debian.tar.xz
 56fc071c499fcc5668f010b9d17aa9e500fb9232 24496 
haskell-pandoc_3.1.3-2_amd64.buildinfo
Checksums-Sha256:
 3e13bf95d3d4c95ce9650f3d375ebc08c6fc49cfff1a3ff06bba2bb083605dbb 8576 
haskell-pandoc_3.1.3-2.dsc
 83d9d0c2b0827fa1206ccdcf1e8054ad19fc5d7f4b71434a5d7c3ea3a9a68ef7 14424 
haskell-pandoc_3.1.3-2.debian.tar.xz
 42a4aec678c28394e8bfed78283df1c1693c4e354acd75ebaaf12a7312e96068 24496 
haskell-pandoc_3.1.3-2_amd64.buildinfo
Files:
 810617aa31d3d834c20392717f61e9b8 8576 haskell optional 
haskell-pandoc_3.1.3-2.dsc
 13b53dd46b4c4011688e6e3e787a2cbc 14424 haskell optional 
haskell-pandoc_3.1.3-2.debian.tar.xz
 0847284f25ca69be769a64c1f5618dd0 24496 haskell optional 
haskell-pandoc_3.1.3-2_amd64.buildinfo

-----BEGIN PGP SIGNATURE-----

iQJIBAEBCgAyFiEEJ9c8pfW11+AaUTb116hngMxkQDwFAmYyr2cUHGlsaWFzdHNp
QGRlYmlhbi5vcmcACgkQ16hngMxkQDzutRAAtUDo6lfa0FHW20eDclG5itEHfQe4
kv5Wqmv9vKREiIGWKXVblMAoPC20Tk/fNGDVq4f9mou7C54ELk5Q3gd1fE+kpz2L
50+/yahkxhGVzBsYfkvFgqBn7vhE51BLPo5rXjzGK++GIpmlF0xqdEj6NMgvC1GN
UAe+ei9plO8t8zkLl/v5IEL/jgcixcDc84reIcZJK+v35Wp7CgBnBt8FqJoCcXiT
UTh0ekE4IX0ERr4qRYiN4/p3g/WuxjN5uqhM5diOnR2IzLVSDg5pSazzYfRYcZOV
f98SfO1DS1agZxKAlljZU1y6Y2vpFlB9LxED7673UJBrsh94dbstJHSVx0Z1/OpV
NXzpX0xdx7RGjvPUJSyhnPjKsDIM0M8RDNempYDYP0ak0d1TIvSDOV2L37J5sDuv
xSH2Eprqz68btQirzpLiuD1gMM8yIhVk8TwU2FSj1ypGzSN6gMCXfyAfPRJk3gZ/
Ue7gT0bMD1yrqh8mT5TbJoVG4oBCxt+pqOHVRcj8wbBPn01/OX9l99yBYhaG7MEZ
A5SZMf9GaOnG1+LDhgwF1kTcINI2wI//xHtG5wmBbZk/bn25QwvpDGKI/vxAXaTG
JCRu+0Y8kfwqa2quWsOKp5aAnVqdKj1Nrqm+TCf1218mExzVdw0sQH/b48W0HWuI
dFyosKj4lskVqcQ=
=WgFw
-----END PGP SIGNATURE-----

Attachment: pgpoPxsYxUZVa.pgp
Description: PGP signature


--- End Message ---

Reply via email to