diff options
Diffstat (limited to 'tests/destructor/tprevent_assign3.nim')
-rw-r--r-- | tests/destructor/tprevent_assign3.nim | 54 |
1 files changed, 54 insertions, 0 deletions
diff --git a/tests/destructor/tprevent_assign3.nim b/tests/destructor/tprevent_assign3.nim new file mode 100644 index 000000000..aa834a66c --- /dev/null +++ b/tests/destructor/tprevent_assign3.nim @@ -0,0 +1,54 @@ +discard """ + errormsg: "'=dup' is not available for type <Foo>; requires a copy because it's not the last read of 'otherTree'" + file: "tprevent_assign3.nim" + line: 47 +""" + +type + Foo = object + x: int + +proc `=destroy`(f: var Foo) = f.x = 0 +proc `=copy`(a: var Foo; b: Foo) {.error.} # = a.x = b.x +proc `=dup`(a: Foo): Foo {.error.} +proc `=sink`(a: var Foo; b: Foo) = a.x = b.x + +proc createTree(x: int): Foo = + Foo(x: x) + +proc take2(a, b: sink Foo) = + echo a.x, " ", b.x + +when false: + var otherTree: Foo + try: + for i in 0..3: + while true: + #if i == 0: + otherTree = createTree(44) + case i + of 0: + echo otherTree + take2(createTree(34), otherTree) + of 1: + take2(createTree(34), otherTree) + else: + discard + finally: + discard + +proc preventThis2() = + var otherTree: Foo + try: + try: + otherTree = createTree(44) + echo otherTree + finally: + take2(createTree(34), otherTree) + finally: + echo otherTree + +#allowThis() +preventThis2() + + |