diff options
| author | Gregor Kleen <gkleen@yggdrasil.li> | 2016-06-10 19:56:24 +0200 |
|---|---|---|
| committer | Gregor Kleen <gkleen@yggdrasil.li> | 2016-06-10 19:56:24 +0200 |
| commit | 49d5fbcf0ac5322ba010230f0340b701d89d7fc2 (patch) | |
| tree | a651511ebdae05c14b188982f695c19463fff7b1 /src/Sequence/Contact | |
| parent | 0daa059aa8c6ece13d337e6f3dba30b89527530d (diff) | |
| download | 2017-01-16_17:13:37-49d5fbcf0ac5322ba010230f0340b701d89d7fc2.tar 2017-01-16_17:13:37-49d5fbcf0ac5322ba010230f0340b701d89d7fc2.tar.gz 2017-01-16_17:13:37-49d5fbcf0ac5322ba010230f0340b701d89d7fc2.tar.bz2 2017-01-16_17:13:37-49d5fbcf0ac5322ba010230f0340b701d89d7fc2.tar.xz 2017-01-16_17:13:37-49d5fbcf0ac5322ba010230f0340b701d89d7fc2.zip | |
taking damage
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 |