mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-10-30 10:23:18 -06:00
fix the type signature for exprSize
This commit is contained in:
1 parent
30b7ba04c7
commit
5ed0e3ae7f
1 file changed
+1
-1
@@ -331,7 +331,7 @@ exprHash h (Expr c_expr touch1) =
|
|||||||
touch1
|
touch1
|
||||||
return (fromIntegral h)
|
return (fromIntegral h)
|
||||||
|
|
||||||
exprSize :: Expr -> Int32
|
exprSize :: Expr -> Int
|
||||||
exprSize (Expr c_expr touch1) =
|
exprSize (Expr c_expr touch1) =
|
||||||
unsafePerformIO $ do
|
unsafePerformIO $ do
|
||||||
size <- pgf_expr_size c_expr
|
size <- pgf_expr_size c_expr
|
||||||
|
|||||||
Reference in new issue
Block a user