Mercurial > pub > dyncall > dyncall
view test/call_suite/rand-sig.lua @ 0:3e629dc19168
initial from svn dyncall-1745
author | Daniel Adler |
---|---|
date | Thu, 19 Mar 2015 22:24:28 +0100 |
parents | |
children | 1cb8a65ea27f |
line wrap: on
line source
require"config" rtypes = "v"..types math.randomseed(2342) local sigs = { } local id for i = 1, ncases do id = math.random(#rtypes) local nargs = math.random(minargs,maxargs) local sig = { rtypes:sub(id,id)} for j = 1, nargs do id = math.random(#types) sig[#sig+1] = types:sub(id,id) end io.write(table.concat(sig)) io.write("\n") end