view test/call_suite/rand-sig.lua @ 185:a41bc98e101c

- impl. for allocwx stuff on POSIX-strict systems where there is no MAP_ANON for mmap()
author Tassilo Philipp
date Fri, 24 Feb 2017 23:05:53 +0100
parents 3e629dc19168
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