diff options
| author | Krasimir Angelov <kr.angelov@gmail.com> | 2017-09-05 10:08:55 +0200 |
|---|---|---|
| committer | Krasimir Angelov <kr.angelov@gmail.com> | 2017-09-05 10:08:55 +0200 |
| commit | 5ed0e3ae7f73dbbfca504f0b5af5a9b8d3a2e5f4 (patch) | |
| tree | bc146434814185c580c5d5c36ddb9ba39e8c607e | |
| parent | 30b7ba04c701ef156992eb53a7b65accebfa9f21 (diff) | |
fix the type signature for exprSize
| -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 dfddb9708..f56bb8a2d 100644 --- a/src/runtime/haskell-bind/PGF2.hsc +++ b/src/runtime/haskell-bind/PGF2.hsc @@ -331,7 +331,7 @@ exprHash h (Expr c_expr touch1) = touch1 return (fromIntegral h) -exprSize :: Expr -> Int32 +exprSize :: Expr -> Int exprSize (Expr c_expr touch1) = unsafePerformIO $ do size <- pgf_expr_size c_expr |