view test/call_suite/rand-sig.lua @ 298:b69f328cdfe6

- simpler ./configure check if freebsd/mips platform is hard-float
author Tassilo Philipp
date Thu, 17 May 2018 16:55:24 +0200
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