diff test/callback_suite/make-invokers.lua @ 0:3e629dc19168

initial from svn dyncall-1745
author Daniel Adler
date Thu, 19 Mar 2015 22:24:28 +0100
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/callback_suite/make-invokers.lua	Thu Mar 19 22:24:28 2015 +0100
@@ -0,0 +1,16 @@
+require "config"
+local id = 1
+for signature in io.lines() do
+  local nargs = string.len(signature) - 2
+  local rtype = string.sub(signature, nargs + 2, nargs + 2)
+  local outline   = "F" .. nargs .. "(f" .. id .. "," .. rtype
+  for i = 1, nargs do
+    local type  = string.sub(signature, i, i)
+    outline = outline .. "," .. type 
+  end
+  outline = outline .. ")\n"
+  io.write( outline )
+  id = id + 1
+end
+io.flush()
+