From 262e44c208c615d384fe1fe4fe0f117735eb2fb3 Mon Sep 17 00:00:00 2001 From: Krasimir Angelov Date: Sun, 9 Jan 2022 08:24:41 +0100 Subject: [PATCH] fix typo --- src/runtime/haskell/PGF2.hsc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/runtime/haskell/PGF2.hsc b/src/runtime/haskell/PGF2.hsc index 3f4b7daa4..b07772129 100644 --- a/src/runtime/haskell/PGF2.hsc +++ b/src/runtime/haskell/PGF2.hsc @@ -673,7 +673,7 @@ tabularLinearize c e = withForeignPtr marshaller $ \m -> bracket (withPgfExn "tabularLinearize" (pgf_tabular_linearize (c_db c) c_revision c_e nullPtr m)) free $ \c_texts -> do if c_texts == nullPtr - then [] + then return [] else peekTable c_texts where peekTable c_texts = do