diff options
Diffstat (limited to 'tests/atomic.lua')
-rw-r--r-- | tests/atomic.lua | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/tests/atomic.lua b/tests/atomic.lua new file mode 100644 index 0000000..a027453 --- /dev/null +++ b/tests/atomic.lua | |||
@@ -0,0 +1,18 @@ | |||
1 | -- | ||
2 | -- ATOMIC.LUA | ||
3 | -- | ||
4 | -- Test program for Lua Lanes | ||
5 | -- | ||
6 | |||
7 | require "lanes" | ||
8 | |||
9 | local linda= lanes.linda() | ||
10 | local key= "$" | ||
11 | |||
12 | local f= lanes.genatomic( linda, key, 5 ) | ||
13 | |||
14 | local v | ||
15 | v= f(); print(v); assert(v==6) | ||
16 | v= f(-0.5); print(v); assert(v==5.5) | ||
17 | |||
18 | v= f(-10); print(v); assert(v==-4.5) | ||