mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-23 11:42:49 -06:00
fix the type signature for exprSize
This commit is contained in:
@@ -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