Commit2b656c9

committed

FX_NO_CREATE_DELEGATE --- dead code removal

1 parent32d6492 commit2b656c9Copy full SHA for 2b656c9

File tree

-4

lines changed

-4

lines changed

Lines changed: 0 additions & 2 deletions

Original file line number	Diff line number	Diff line change
`@@ -1691,7 +1691,6 @@ namespace Microsoft.FSharp.Control`
`1691`	`1691`	`letbeginAction=fun(a1,callback,state)-> AsBeginEndHelpers.beginAction((computation a1), callback, state)`
`1692`	`1692`	`beginAction, AsBeginEndHelpers.endAction<'T>, AsBeginEndHelpers.cancelAction<'T>`
`1693`	`1693`
`1694`		`-#if!FX_NO_CREATE_DELEGATE`
`1695`	`1694`	`static memberAwaitEvent(event:IEvent<'Delegate,'T>,?cancelAction):Async<'T>=`
`1696`	`1695`	`async{let!token= getCancellationToken()`
`1697`	`1696`	`letresultCell=new ResultCell<_>()`
`@@ -1736,7 +1735,6 @@ namespace Microsoft.FSharp.Control`
`1736`	`1735`
`1737`	`1736`	`// Return the async computation that allows us to await the result`
`1738`	`1737`	`return! Async.AwaitAndReifyResult(resultCell)}`
`1739`		`-#endif`
`1740`	`1738`
`1741`	`1739`	`typeAsyncwith`
`1742`	`1740`	`static memberIgnore(p:Async<'T>)= bindA p(fun _-> doneA)`

Lines changed: 0 additions & 2 deletions

Original file line number	Diff line number	Diff line change
`@@ -217,7 +217,6 @@ namespace Microsoft.FSharp.Control`
`217`	`217`	`/// <returns>An asynchronous computation that provides the callback with the current continuations.</returns>`
`218`	`218`	`static memberFromContinuations:callback:(('T-> unit)(exn-> unit)(OperationCanceledException-> unit)-> unit)->Async<'T>`
`219`	`219`
`220`		`-#if!FX_NO_CREATE_DELEGATE`
`221`	`220`	`/// <summary>Creates an asynchronous computation that waits for a single invocation of a CLI`
`222`	`221`	`/// event by adding a handler to the event. Once the computation completes or is`
`223`	`222`	`/// cancelled, the handler is removed from the event.</summary>`
`@@ -233,7 +232,6 @@ namespace Microsoft.FSharp.Control`
`233`	`232`	`/// cancellation is issued.</param>`
`234`	`233`	`/// <returns>An asynchronous computation that waits for the event to be invoked.</returns>`
`235`	`234`	`static memberAwaitEvent:event:IEvent<'Del,'T>* ?cancelAction:(unit-> unit)-> Async<'T> when 'Del: delegate<'T,unit> and 'Del:> System.Delegate`
`236`		`-#endif`
`237`	`235`
`238`	`236`	`///<summary>Creates an asynchronous computation that will wait on the given WaitHandle.</summary>`
`239`	`237`	`///`

Comments

(0)