diff --git a/app/Main.hs b/app/Main.hs
index ddf45c772..e5bcda8dc 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -51,6 +51,7 @@ instance Storable TSNode where
   poke p n = cPoke p n
 
 foreign import ccall "app/bridge.h ts_document_root_node_p" ts_document_root_node_p :: Ptr TSDocument -> Ptr TSNode -> IO ()
+foreign import ccall "prototype/External/tree-sitter/include/tree_sitter/runtime.h ts_node_p_name" ts_node_p_name :: Ptr TSNode -> Ptr TSDocument -> IO CString
 
 main :: IO ()
 main = do