diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/Test.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/Test.hs b/test/Test.hs index 3db8aa3..983b48d 100644 --- a/test/Test.hs +++ b/test/Test.hs @@ -119,7 +119,7 @@ prop_move_not_result_check = atAnyTwoStates (\b1 b2 -> Black -> not (check Black b2) ) -prop_dont_touch_my_pieces :: PGN -> Bool +prop_dont_touch_my_pieces :: PGN -> Property prop_dont_touch_my_pieces = atAnyTwoStates (\b1 b2 -> notMoved (turn b2) b1 b2) where notMoved :: Color -> Board -> Board -> Bool |