diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/runtime/haskell-bind/PGF2.hsc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/runtime/haskell-bind/PGF2.hsc b/src/runtime/haskell-bind/PGF2.hsc index 3d9c44488..618976539 100644 --- a/src/runtime/haskell-bind/PGF2.hsc +++ b/src/runtime/haskell-bind/PGF2.hsc @@ -112,7 +112,7 @@ generateAll p cat = unsafePerformIO $ do genPl <- gu_new_pool exprPl <- gu_new_pool - enum <- withCString cat $ \cat -> + enum <- withCString cat $ \cat -> do exn <- gu_new_exn genPl pgf_generate_all (pgf p) cat exn genPl exprPl genFPl <- newForeignPtr gu_pool_finalizer genPl |