- Clone and build this project: https://github.com/fable-compiler/fable-suave-scaffold
- Open ClientServer.sln.
- Observe that things work.
- Add a new file that defines the following:
type private MaybeBuilder() =
member x.Bind(v, f) = Option.bind f v
member x.Return(v) = Some v
member x.Zero() = Some ()
member x.Combine(v, f:unit -> _) = Option.bind f v
member x.Delay(f : unit -> 'T) = f
member x.Run(f) = f()
member x.While(cond, f) =
if cond() then x.Bind(f(), fun _ -> x.While(cond, f))
else x.Zero()
let private maybe = MaybeBuilder()
let testFxn =
let ret =
maybe {
let! x = Some 1
let! y = Some 2
return x + y
}
ret
- Close ClientServer.sln.
- Re-open it.
- Find All References on a
maybe.
You will see duplicate results in the Find All References window.
Old issue:
