The history of luaTEX 2006–2009 / v 0.50 - Pragma ADE

function lua.delay(f)
delayed[#delayed+1] = f
end
function lua.flush_delayed(...)
local t = delayed
delayed = { }
for _, fun in ipairs(t) do
fun(...)
end
end
function lua.flush(...)
tex.sprint("\\directlua 0 {lua.flush_delayed(" ..
table.concat({...},',') .. ")}")
end
end
Usage is similar:
function test(n)
lua.delay(function(...)
tex.sprint(string.format("pi: %s %s %s\\par",...))
end)
tex.sprint(string.format("\\setbox0=\\hbox{%s}",math.pi*n))
lua.flush(tex.wd[0],tex.ht[0],tex.dp[0])
end
Dirty tricks 77