view test/callback_suite/make-invoke-macros.lua @ 351:6b37ccbb2f91

Added tag r1.1-RC4 for changeset 127fe78cb7dd
author Tassilo Philipp
date Fri, 10 Jan 2020 13:29:49 +0100
parents 3e629dc19168
children d8f0e6cecdab
line wrap: on
line source

require "config"
if mode == "ordered" then
  minargs = 0
end
local i
for i = minargs, maxargs do
  local line = "#define F" .. i .. "(ID,R"
  local argdef = ""
  local argset = ""
  if i > 0 then
    line = line .. ","
    local j
    for j = 0, i-1 do
      if j > 0 then 
        argdef = argdef .. ","
        argset = argset .. ","
      end
      argdef = argdef .. "A" .. j
      argset = argset .. "A[" .. j .. "].A" .. j
    end
  end
  line = line .. argdef .. ") void ID(void* addr) { Result.R = ((CONFIG_API R(*)("  .. argdef .. "))addr)(" .. argset .. ");}\n"
  io.write(line)
end
io.flush()