diff --git a/apiblobs/0.11.0-nightly.msgpack b/apiblobs/0.11.0-nightly.msgpack new file mode 100644 index 0000000..3462519 Binary files /dev/null and b/apiblobs/0.11.0-nightly.msgpack differ diff --git a/nvim-hs.cabal b/nvim-hs.cabal index fe9db6e..71e6186 100644 --- a/nvim-hs.cabal +++ b/nvim-hs.cabal @@ -38,6 +38,8 @@ extra-source-files: test-files/hello , apiblobs/0.5.0.msgpack , apiblobs/0.6.1.msgpack , apiblobs/0.8.0.msgpack + , apiblobs/0.10.4.msgpack + , apiblobs/0.11.0-nightly.msgpack , api extra-doc-files: CHANGELOG.md diff --git a/src/Neovim/API/TH.hs b/src/Neovim/API/TH.hs index 9688505..b88dd0e 100644 --- a/src/Neovim/API/TH.hs +++ b/src/Neovim/API/TH.hs @@ -107,6 +107,7 @@ stringListTypeMap = , ("Float", [t|Double|]) , ("String", [t|String|]) , ("Array", [t|[Object]|]) + , ("Dict", [t|Map String Object|]) , ("Dictionary", [t|Map String Object|]) , ("void", [t|()|]) ] @@ -123,6 +124,7 @@ textVectorTypeMap = adjustTypeMapForText = Map.insert "String" [t|Text|] . Map.insert "Array" [t|Vector Object|] + . Map.insert "Dict" [t|Map Text Object|] . Map.insert "Dictionary" [t|Map Text Object|] bytestringVectorTypeMap :: TypeMap @@ -134,6 +136,7 @@ bytestringVectorTypeMap = adjustTypeMapForByteString = Map.insert "String" [t|ByteString|] . Map.insert "Array" [t|Vector Object|] + . Map.insert "Dict" [t|Map ByteString Object|] . Map.insert "Dictionary" [t|Map ByteString Object|] apiTypeToHaskellType :: TypeMap -> NeovimType -> Q Type