GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-30 14:52:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

an initial sketch for PGF building API in the Haskell binding

Browse Source
This commit is contained in:
Krasimir Angelov
2017-09-08 15:15:23 +02:00
parent 16172be940
commit 71e6562eaa
3 changed files with 303 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/runtime/haskell-bind/PGF2/Expr.hsc
View File

@@ -51,7 +51,7 @@ mkAbs bind_type var (Expr body bodyTouch) =
exprFPl <- newForeignPtr gu_pool_finalizer exprPl
return (Expr c_expr (bodyTouch >> touchForeignPtr exprFPl))
where
cbind_type =
cbind_type =
case bind_type of
Explicit -> (#const PGF_BIND_TYPE_EXPLICIT)
Implicit -> (#const PGF_BIND_TYPE_IMPLICIT)