diff options
Diffstat (limited to 'Text')
-rw-r--r-- | Text/Pandoc/Readers/RDF.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/Text/Pandoc/Readers/RDF.hs b/Text/Pandoc/Readers/RDF.hs index 0d9aa26..e2b21d0 100644 --- a/Text/Pandoc/Readers/RDF.hs +++ b/Text/Pandoc/Readers/RDF.hs @@ -48,7 +48,6 @@ import System.Directory ( getXdgDirectory, XdgDirectory(..) , createDirectoryIfMissing ) import Control.Monad (zipWithM) import Data.Maybe (mapMaybe) -import Control.DeepSeq import Redland @@ -159,8 +158,7 @@ readRDF bu rf t = do createDirectoryIfMissing True cacheDir withWSMU "hashes" [("hash-type", "bdb"), ("dir", cacheDir)] "rdf-cache" "" (uriToString id bu "") $ \world' _ model' _ -> do - r <- mapM (readTriple (world', model')) $ prepareTriples triples - r `deepseq` pure r + mapM (readTriple (world', model')) $ prepareTriples triples readTriple :: ( ForeignPtr RedlandWorld , ForeignPtr RedlandModel) -> Triple |