Add files, move towards joining items in inventory

This commit is contained in:
2024-09-09 23:13:00 +01:00
parent db4a6a10de
commit 52d0008441
12 changed files with 230 additions and 270 deletions
+19
View File
@@ -0,0 +1,19 @@
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TemplateHaskell #-}
module Dodge.Data.ComposedItem
where
import Control.Lens
import Data.Aeson
import Data.Aeson.TH
data ComposedItem = WeaponCI
| BulletAmmoCI
| UncomposableCI
deriving (Eq,Ord,Show,Read)
makeLenses ''ComposedItem
deriveJSON defaultOptions ''ComposedItem