From 14b32a115ca47c2799b292ad0777098e705247c0 Mon Sep 17 00:00:00 2001 From: krasimir Date: Thu, 26 Jan 2017 06:40:13 +0000 Subject: add unStr,unInt and unFloat in the Haskell binding --- src/runtime/haskell-bind/PGF2/FFI.hs | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/runtime/haskell-bind/PGF2/FFI.hs') diff --git a/src/runtime/haskell-bind/PGF2/FFI.hs b/src/runtime/haskell-bind/PGF2/FFI.hs index 5e7dfe260..9e51bb34b 100644 --- a/src/runtime/haskell-bind/PGF2/FFI.hs +++ b/src/runtime/haskell-bind/PGF2/FFI.hs @@ -266,6 +266,9 @@ foreign import ccall "pgf/pgf.h pgf_expr_int" foreign import ccall "pgf/pgf.h pgf_expr_float" pgf_expr_float :: CDouble -> Ptr GuPool -> IO PgfExpr +foreign import ccall "pgf/pgf.h pgf_expr_unlit" + pgf_expr_unlit :: PgfExpr -> CInt -> IO (Ptr a) + foreign import ccall "pgf/pgf.h pgf_expr_unapply" pgf_expr_unapply :: PgfExpr -> Ptr GuPool -> IO (Ptr PgfApplication) -- cgit v1.2.3