diff options
Diffstat (limited to '')
| -rw-r--r-- | lib/Tiled2.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/Tiled2.hs b/lib/Tiled2.hs index 0f20061..a82de2c 100644 --- a/lib/Tiled2.hs +++ b/lib/Tiled2.hs @@ -227,8 +227,12 @@ instance ToJSON Frame where data Tile = Tile { tileId :: Int , tileProperties :: Maybe (Vector Value) , tileImage :: Maybe Value - , tileObjectGroup :: Maybe (Vector Object) + , tileObjectGroup :: Maybe Value , tileAnimation :: Maybe (Vector Frame) + , tileImageheight :: Maybe Int + , tileImagewidth :: Maybe Int + , tileProbability :: Maybe Float + , tileType :: Maybe Text } deriving (Eq, Generic, Show) instance FromJSON Tile where |