Skip to content

Commit

Permalink
More test cases
Browse files Browse the repository at this point in the history
  • Loading branch information
edgarfgp committed Aug 5, 2024
1 parent 5bb9415 commit 358d296
Showing 1 changed file with 9 additions and 1 deletion.
Original file line number Diff line number Diff line change
Expand Up @@ -17,4 +17,12 @@ ae.Handle(
function
| :? OperationCanceledException -> true
| _ -> false
))
))

let m () =
fun x ->(function x -> function y -> function z -> <@ x + y + z @>)

let f () =
(function
| None -> fun x -> x + 2
| Some f -> f)

0 comments on commit 358d296

Please sign in to comment.