aboutsummaryrefslogtreecommitdiff
path: root/tests/basic.lua
diff options
context:
space:
mode:
Diffstat (limited to 'tests/basic.lua')
-rw-r--r--tests/basic.lua12
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/basic.lua b/tests/basic.lua
index 97783cb..f44c75f 100644
--- a/tests/basic.lua
+++ b/tests/basic.lua
@@ -76,7 +76,7 @@ end
76PRINT("\n\n", "---=== Tasking (basic) ===---", "\n\n") 76PRINT("\n\n", "---=== Tasking (basic) ===---", "\n\n")
77 77
78local function task(a, b, c) 78local function task(a, b, c)
79 set_debug_threadname("task("..a..","..b..","..c..")") 79 lane_threadname("task("..a..","..b..","..c..")")
80 --error "111" -- testing error messages 80 --error "111" -- testing error messages
81 assert(hey) 81 assert(hey)
82 local v=0 82 local v=0
@@ -329,7 +329,7 @@ SLEEP(1)
329PRINT("\n\n", "---=== Stdlib naming ===---", "\n\n") 329PRINT("\n\n", "---=== Stdlib naming ===---", "\n\n")
330 330
331local function dump_g(_x) 331local function dump_g(_x)
332 set_debug_threadname "dump_g" 332 lane_threadname "dump_g"
333 assert(print) 333 assert(print)
334 print("### dumping _G for '" .. _x .. "'") 334 print("### dumping _G for '" .. _x .. "'")
335 for k, v in pairs(_G) do 335 for k, v in pairs(_G) do
@@ -339,7 +339,7 @@ local function dump_g(_x)
339end 339end
340 340
341local function io_os_f(_x) 341local function io_os_f(_x)
342 set_debug_threadname "io_os_f" 342 lane_threadname "io_os_f"
343 assert(print) 343 assert(print)
344 print("### checking io and os libs existence for '" .. _x .. "'") 344 print("### checking io and os libs existence for '" .. _x .. "'")
345 assert(io) 345 assert(io)
@@ -348,7 +348,7 @@ local function io_os_f(_x)
348end 348end
349 349
350local function coro_f(_x) 350local function coro_f(_x)
351 set_debug_threadname "coro_f" 351 lane_threadname "coro_f"
352 assert(print) 352 assert(print)
353 print("### checking coroutine lib existence for '" .. _x .. "'") 353 print("### checking coroutine lib existence for '" .. _x .. "'")
354 assert(coroutine) 354 assert(coroutine)
@@ -388,7 +388,7 @@ PRINT("\n\n", "---=== Comms criss cross ===---", "\n\n")
388-- 388--
389local tc= lanes_gen("io", {gc_cb = gc_cb}, 389local tc= lanes_gen("io", {gc_cb = gc_cb},
390 function(linda, ch_in, ch_out) 390 function(linda, ch_in, ch_out)
391 set_debug_threadname("criss cross " .. ch_in .. " -> " .. ch_out) 391 lane_threadname("criss cross " .. ch_in .. " -> " .. ch_out)
392 local function STAGE(str) 392 local function STAGE(str)
393 io.stderr:write(ch_in..": "..str.."\n") 393 io.stderr:write(ch_in..": "..str.."\n")
394 linda:send(nil, ch_out, str) 394 linda:send(nil, ch_out, str)
@@ -488,7 +488,7 @@ PRINT("\n\n", "---=== :join test ===---", "\n\n")
488 488
489local S= lanes_gen("table", {gc_cb = gc_cb}, 489local S= lanes_gen("table", {gc_cb = gc_cb},
490 function(arg) 490 function(arg)
491 set_debug_threadname "join test lane" 491 lane_threadname "join test lane"
492 set_finalizer(function() end) 492 set_finalizer(function() end)
493 aux= {} 493 aux= {}
494 for i, v in ipairs(arg) do 494 for i, v in ipairs(arg) do