Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- type OrderService() =
- let mutable client : option<IDuplexClient> = None
- let mutable orderName : string = null
- let mutable orderQuantity : int = 0
- member x.Order (name: string, quantity: int) =
- client <- Some (OperationContext.Current.GetCallbackChannel<IDuplexClient> ())
- orderName <- name
- orderQuantity <- quantity
- use timer = new Timer (new TimerCallback (CallClient), null, 5000, 5000)
- Thread.Sleep 11000
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement