From ff5797fde5c59fd8bf094356fda612560d24780a Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Tue, 24 Nov 2015 14:13:41 -0500 Subject: [PATCH] TSLength is many things. --- app/Main.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/app/Main.hs b/app/Main.hs index 9b3819f5c..8aefd6b17 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -30,6 +30,7 @@ foreign import ccall "prototype/External/tree-sitter/include/tree_sitter/runtime foreign import ccall "prototype/External/tree-sitter/include/tree_sitter/runtime.h ts_document_free" ts_document_free :: Foreign.Ptr TSDocument -> IO () data TSLength = TsLength { bytes :: CSize, chars :: CSize } + deriving (Show, Eq, Generic, CStorable) data TSNode = TsNode deriving (Show, Eq, Generic, CStorable) foreign import ccall "prototype/External/tree-sitter/include/tree_sitter/runtime.h ts_document_root_node" ts_document_root_node :: Foreign.Ptr TSDocument -> IO (Foreign.Ptr TSNode)