diff options
| author | krasimir <krasimir@chalmers.se> | 2015-12-20 14:04:52 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2015-12-20 14:04:52 +0000 |
| commit | bef9d8c5fce740fde65934b170cca33b121fde67 (patch) | |
| tree | 8a8c86569cd4ea329f3c5a5a9caefdcdf36211c3 /src/runtime/haskell-bind/PGF2 | |
| parent | 0b9395fd7006592d0434503751a88ef95ab47603 (diff) | |
added a primitive full-text search index in libsg. This can be use for finding an abstract tree whose linearization matches given keywords
Diffstat (limited to 'src/runtime/haskell-bind/PGF2')
| -rw-r--r-- | src/runtime/haskell-bind/PGF2/FFI.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/runtime/haskell-bind/PGF2/FFI.hs b/src/runtime/haskell-bind/PGF2/FFI.hs index c6fc2e2e2..ee26214c7 100644 --- a/src/runtime/haskell-bind/PGF2/FFI.hs +++ b/src/runtime/haskell-bind/PGF2/FFI.hs @@ -9,6 +9,9 @@ import Foreign.ForeignPtr import Control.Exception import GHC.Ptr +data PGF = PGF {pgf :: Ptr PgfPGF, pgfMaster :: ForeignPtr GuPool} +data Concr = Concr {concr :: Ptr PgfConcr, concrMaster :: PGF} + ------------------------------------------------------------------ -- libgu API |