test for Task.Run
This commit is contained in:
parent
008f1f16f7
commit
8329da7aed
6
TestSuite/generics55.pas
Normal file
6
TestSuite/generics55.pas
Normal file
|
|
@ -0,0 +1,6 @@
|
||||||
|
begin
|
||||||
|
var f: function: byte := ()->byte(2);
|
||||||
|
var t := System.Threading.Tasks.Task&<byte>.Run(f);
|
||||||
|
t.Wait();
|
||||||
|
assert(t.Result = 2);
|
||||||
|
end.
|
||||||
Loading…
Reference in a new issue