diff options
Diffstat (limited to 'src/Sequence/Contact')
| -rw-r--r-- | src/Sequence/Contact/Types.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Sequence/Contact/Types.hs b/src/Sequence/Contact/Types.hs index dff886d..47687b7 100644 --- a/src/Sequence/Contact/Types.hs +++ b/src/Sequence/Contact/Types.hs | |||
| @@ -36,6 +36,8 @@ hitzone = iso (Hitzone . CI.mk) (CI.original . _hitzone) | |||
| 36 | instance IsString Hitzone where | 36 | instance IsString Hitzone where |
| 37 | fromString = view hitzone | 37 | fromString = view hitzone |
| 38 | 38 | ||
| 39 | makePrisms ''Hitzone | ||
| 40 | |||
| 39 | makeLenses ''Armor | 41 | makeLenses ''Armor |
| 40 | 42 | ||
| 41 | instance Default Armor where | 43 | instance Default Armor where |