summaryrefslogtreecommitdiff
path: root/src/runtime/haskell-bind/PGF2
diff options
context:
space:
mode:
authorkrangelov <kr.angelov@gmail.com>2020-08-14 20:54:15 +0200
committerkrangelov <kr.angelov@gmail.com>2020-08-14 20:54:15 +0200
commit23edeec5a95bb7378d8f075e5bee5e67235adadd (patch)
treec521597bbd8b606db7abb293eddafa596be0fe51 /src/runtime/haskell-bind/PGF2
parent830dbe760db2df0c573c06cb481d0611bf55908b (diff)
added an API for cloning expressions/types/literals
Diffstat (limited to 'src/runtime/haskell-bind/PGF2')
-rw-r--r--src/runtime/haskell-bind/PGF2/FFI.hsc3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/runtime/haskell-bind/PGF2/FFI.hsc b/src/runtime/haskell-bind/PGF2/FFI.hsc
index 082b58d36..f0a811c6d 100644
--- a/src/runtime/haskell-bind/PGF2/FFI.hsc
+++ b/src/runtime/haskell-bind/PGF2/FFI.hsc
@@ -551,3 +551,6 @@ foreign import ccall "pgf/data.h pgf_lzr_index"
foreign import ccall "pgf/data.h pgf_production_is_lexical"
pgf_production_is_lexical :: Ptr PgfProductionApply -> Ptr GuBuf -> Ptr GuPool -> IO (#type bool)
+
+foreign import ccall "pgf/expr.h pgf_clone_expr"
+ pgf_clone_expr :: PgfExpr -> Ptr GuPool -> IO PgfExpr