blob: 8a55a666e7627d7c90c138932cd3cadaf20f24aa (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
discard """
cmd: "nim cpp --gc:arc --threads:on $file"
output: '''ok1
ok2
destroyed
destroyed
destroyed
'''
"""
import threadpool, os
type
MyObj = object
p: int
MyObjRef = ref MyObj
proc `=destroy`(x: var MyObj) =
if x.p != 0:
echo "destroyed"
proc thread1(): string =
os.sleep(1000)
return "ok1"
proc thread2(): ref string =
os.sleep(1000)
new(result)
result[] = "ok2"
proc thread3(): ref MyObj =
os.sleep(1000)
new(result)
result[].p = 2
var fv1 = spawn thread1()
var fv2 = spawn thread2()
var fv3 = spawn thread3()
sync()
echo ^fv1
echo (^fv2)[]
proc thread4(x: MyObjRef): MyObjRef {.nosinks.} =
os.sleep(1000)
result = x
proc thread5(x: sink MyObjRef): MyObjRef =
os.sleep(1000)
result = x
proc ref_forwarding_test =
var x = new(MyObj)
x[].p = 2
var y = spawn thread4(x)
proc ref_sink_forwarding_test =
var x = new(MyObj)
x[].p = 2
var y = spawn thread5(x)
ref_forwarding_test()
ref_sink_forwarding_test()
sync()
|