diff test/callback_suite/mk-cases.lua @ 507:5a3c07a0f376

cleanups
author Tassilo Philipp
date Sat, 09 Apr 2022 14:00:59 +0200
parents 049e04af13c8
children f3d44195dbdf
line wrap: on
line diff
--- a/test/callback_suite/mk-cases.lua	Sat Apr 09 13:57:27 2022 +0200
+++ b/test/callback_suite/mk-cases.lua	Sat Apr 09 14:00:59 2022 +0200
@@ -2,7 +2,7 @@
 
 function trim(l) return l:gsub("^%s+",""):gsub("%s+$","") end
 function mkcase(id,sig)
-  local nargs = string.len(sig) - 2 -- @@@STRUCT wrong, b/c ignores callconv prefixes
+  local nargs = string.len(sig) - 2
   local rtype = string.sub(sig, nargs + 2, nargs + 2)
   local s   = "F" .. nargs .. "(f" .. id .. "," .. rtype
   for i = 1, nargs do
@@ -13,7 +13,6 @@
   return s
 end
 
--- @@@STRUCT same as in call_suite{,_aggrs}, share?
 function mkfuntab(n)
   local s = { "funptr G_funtab[] = {\n"}
   for i = 0, n-1 do
@@ -23,7 +22,6 @@
   return table.concat(s,"")
 end
 
--- @@@STRUCT same as in call_suite{,_aggrs}, share?
 function mksigtab(sigs)
   local s = { "const char * G_sigtab[] = {\n"}
   for k,v in pairs(sigs) do
@@ -34,7 +32,7 @@
 end
 
 function mkall()
-  -- force minargs for ordered mode @@@STRUCT why?
+  -- force minargs for ordered mode
   if mode == "ordered" then
     minargs = 0
   end