Bug#1070015: haskel-pandoc: FTBFS on armel: Couldn't match expected type: WriterState -> m a

Sebastian Ramacher sramacher at debian.org
Sun Apr 28 16:14:33 BST 2024


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: sramacher at 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



More information about the Pkg-haskell-maintainers mailing list