Skip to content

Commit

Permalink
Renamed tests
Browse files Browse the repository at this point in the history
  • Loading branch information
oncicaradupopovici authored Dec 15, 2020
1 parent 4ac9189 commit f21d42d
Showing 1 changed file with 2 additions and 2 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -115,7 +115,7 @@ let ``EventHandler.append left identity law `` (f: SomeEvent->unit option) (req:
run (empty ++ f') = run f'

[<Property>]
let ``RequestHandler.append right identity law`` (f: SomeEvent->unit option) (req: SomeEvent) =
let ``EventHandler.append right identity law`` (f: SomeEvent->unit option) (req: SomeEvent) =
let f' = f >> Effect.pure'
let interpreter = createInterpreter()
let run h =
Expand All @@ -127,7 +127,7 @@ let ``RequestHandler.append right identity law`` (f: SomeEvent->unit option) (re
run (f' ++ empty) = run f'

[<Property>]
let ``RequestHandler.append associativity law`` (f: SomeEvent->unit option) (g: SomeEvent->unit option) (h: SomeEvent->unit option) (req: SomeEvent) =
let ``EventHandler.append associativity law`` (f: SomeEvent->unit option) (g: SomeEvent->unit option) (h: SomeEvent->unit option) (req: SomeEvent) =
let f' = f >> Effect.pure'
let g' = g >> Effect.pure'
let h' = h >> Effect.pure'
Expand Down

0 comments on commit f21d42d

Please sign in to comment.