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
