From ce4587d7b721839ffa8ed4c9d1c2abd8f308f99d Mon Sep 17 00:00:00 2001 From: Fabian Keller Date: Mon, 20 Feb 2017 09:31:52 +0100 Subject: Enabled explicitly unknown lock levels (#5409) * enabled explicitly unknown lock levels * allowing "unknown" as locks pragma * added test case for locks pragma * updated docs on locks pragma --- tests/pragmas/tlocks.nim | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 tests/pragmas/tlocks.nim (limited to 'tests/pragmas') diff --git a/tests/pragmas/tlocks.nim b/tests/pragmas/tlocks.nim new file mode 100644 index 000000000..ba66a2dca --- /dev/null +++ b/tests/pragmas/tlocks.nim @@ -0,0 +1,13 @@ + +type SomeBase* = ref object of RootObj +type SomeDerived* = ref object of SomeBase + memberProc*: proc () + +method testMethod(g: SomeBase) {.base, locks: "unknown".} = discard +method testMethod(g: SomeDerived) = + if g.memberProc != nil: + g.memberProc() + +# ensure int literals still work +proc plain*() {.locks: 0.} = + discard -- cgit 1.4.1-2-gfad0