aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--tests/basic.lua8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/basic.lua b/tests/basic.lua
index 16919a3..c36088a 100644
--- a/tests/basic.lua
+++ b/tests/basic.lua
@@ -220,6 +220,10 @@ local chunk= function( linda )
220 220
221 k,v=receive(); WR( v.." received\n" ); assert( v==4 ) 221 k,v=receive(); WR( v.." received\n" ); assert( v==4 )
222 222
223 local subT1 = { "subT1"}
224 local subT2 = { "subT2"}
225 send { subT1, subT2, subT1, subT2}; WR( "{ subT1, subT2, subT1, subT2} sent\n" )
226
223 WR( "Lane ends!\n" ) 227 WR( "Lane ends!\n" )
224end 228end
225 229
@@ -263,6 +267,10 @@ assert( tables_match( a, {'a','b','c',d=10} ) )
263assert( PEEK() == nil ) 267assert( PEEK() == nil )
264SEND(4) 268SEND(4)
265 269
270local complex_table = RECEIVE(); WR( type(complex_table).." received\n" )
271assert( complex_table[1] == complex_table[3] and complex_table[2] == complex_table[4])
272WR( table.concat( {complex_table[1][1],complex_table[2][1],complex_table[3][1],complex_table[4][1]},", "))
273
266t = nil 274t = nil
267collectgarbage() 275collectgarbage()
268-- wait 276-- wait